假设定义
Dim i as long
Dim n as long
i=n*1000
我发现即使i和n定义为长整型,如果n*1000的乘积超过整型的范围,是长整型,虽然i是长整型变量,程序同样会报错,解决的方法有两种。
1.把i=n*1000改成i=n*Clng(1000)
2.定义一个新的长整型变量
Dim j as long
j=1000
i=n*j
假设定义
Dim i as long
Dim n as long
i=n*1000
我发现即使i和n定义为长整型,如果n*1000的乘积超过整型的范围,是长整型,虽然i是长整型变量,程序同样会报错,解决的方法有两种。
1.把i=n*1000改成i=n*Clng(1000)
2.定义一个新的长整型变量
Dim j as long
j=1000
i=n*j