这主要是定义的数据类型不能满足要求导到的如 integer是有符号数占两个节!最大表示65535,你的计算的值超过了它能装下的数据,就溢出了
成都创新互联是一家集网站建设,抚顺县企业网站建设,抚顺县品牌网站建设,网站定制,抚顺县网站建设报价,网络营销,网络优化,抚顺县网站推广为一体的创新建站企业,帮助传统企业提升企业形象加强企业竞争力。可充分满足这一群体相比中小企业更为丰富、高端、多元的互联网需求。同时我们时刻保持专业、时尚、前沿,时刻以成就客户成长自我,坚持不断学习、思考、沉淀、净化自己,让我们为更多的企业打造出实用型网站。
1、
虚拟内存
不宜设得过大,不能超过2G(2048M)
2、可试用
系统还原
解决。用它容易见效且不费时间。方法:右键“我的电脑”——属性——系统还原——设置——关闭其它盘监视
C盘
——确定。然后点“开始”——程序——附件——
系统工具
——系统还原。系统会提示你一步步恢复原点而恢复正常的。
这样就不会溢出了:
Private
counter(1)
As
Double
Private
Sub
Command1_Click()
Dim
a
As
Double
a
=
Val(Text1.Text)
counter(0)
=
a
MsgBox
"给数组中的一个元素赋值成功"
End
Sub
用VB编程时提示错误"溢出"是赋值超出目标(内存)的限制而产生的错误。
溢出(错误 6)
当赋值超出目标的限制时,就会发生溢出。此错误有以下的原因和解决方法:
赋值、计算或数据类型的结果的转换太大,以致于不能在变量类型所允许的范围内表示出来。
赋值给足够表示值的范围的类型的变量上。
给属性的赋值超过属性能接受的最大值。
确保赋值适合属性的范围。
试图在计算中使用一个数字,并且该数字被强制为一个整数,但是结果超过了整数的范围,例如:
Dim x As Long
x = 2000 * 365 ' 错误: 溢出
要解决这个问题,请按如下方式键入该数字:
Dim x As Long
x = CLng(2000) * 365
你好,你这样的问题我在做vb的时候也遇到,而且是经常,很容易解决,首先工程另存为你指定的位置,然后关闭软件,然后从新打开vb软件
在导航栏文件选项打开工程,找到你原先保存的那个保存了的作业,然后再重新生成工程组就行了。