中科新闻网exo《为了你》歌词分配:vb编程问题
来源：百度文库 编辑：中科新闻网 时间：2024/05/12 09:55:50
Private Sub Form_Activate()
s = 1 * 2 * 3 * 4 * 5 * 6 * 7 * 8 * 9 * 10
Print s
End Sub
怎么不行?
s = 1 * 2 * 3 * 4 * 5 * 6 * 7 * 8 * 9 * 10
Print s
End Sub
怎么不行?
这里的赋值式没错,仅是在VB运行时1,2 - 8,9,10这些值的精度未定,按整数运算,变量s运算中储存位数缩短,造成溢出（错误 6）,属VB的一个BUG,解决方法,对赋值式中的第一个数1后加!号标识成Single 数据类型或加#号标识为Double 数据类型,以保证变量s在运算中的精度:
Private Sub Form_Activate()
s = 1! * 2 * 3 * 4 * 5 * 6 * 7 * 8 * 9 * 10
Print s
End Sub
因为没dim 变量
应该先
diam s as integer
s = ...
print s
就可以了。。你试试。
少佐一个show哦，你试下啦