VB数值溢出怎么解决?

Question

比如我编写一个小代码如下:
Private Sub Command1_Click()
Dim a As Integer
a = Text1.Text
MsgBox "你输入的是:" & a
End Sub
如果我在文本框中输入过大的数值.则会提示数值溢出.如何解决这个问题呢?

Answer 1

LONG型数据占用4个字节，而DOUBLE型数据占用8个字节，如果LONG型数据类型溢出的话，不妨把数据类型DOUBLE型试一下，如果DOUBLE型还是溢出的话，那只有另想一些技巧性的方法了
可以先试一下:Double,若还是不行的话就直接用:Variant来定义它，就一定够用了。

Answer 2

VB的Integer类型只能允许-32768~+32767。
Long类型是允许-2147483648~+2147483647。
所以，如果是Integer类型溢出，那就改为Long类型，若还太小的话，可以改为Double类型。

Answer 3

选择合适的数据类型。VB中的数据类型数值型的有Integer、Long、Byte、Single和Double.
Byte (0-255);
Integer(0-2^16-1);
Long(0-2^32-1).

Answer 4

定义为LONG或DOUBLE类型