VB中的一个怪问题

来源:百度知道 编辑:UC知道 时间:2024/06/10 08:48:13
Private Sub Form_Load()
Dim a As Long

a = 255 * 255

End Sub
居然报溢出?这算什么名堂?

因为第一个数 是255 属于Integer 而255*255 已经超过其能表示的范围。
如果你这样写就不会了。
Private Sub Form_Load()
Dim a As Long, b As Long
b = 255
a = b * 255
Debug.Print a
End Sub