Private Sub Form_Load()
Show
Dim a%, b%
a = 200: b = 20
'Text1 = "200" * a / b'字符型数字与整型数据进行非&运算时,被视作数值来进行,但要先算数值型数据,即先算除法,所以不会像D那样产生溢出。结果 text1=2000
'Text1 = a / b * a'作为数值计算,然后赋值。赋值时会自动转换为字符型。结果text1=2000
'Text1 = a & b & a'数值型数字进行&运算时,被当作字符进行。结果text1=20020200
Text1 = a * a / b '作为数值计算,但a*a=40000,这超出了数据类型的取值范围-32768~32767。报错:溢出。
End Sub
锄禾日当午,汗滴禾下土。