Question

用VB编程时提示错误"溢出"是什么意思

Dim dtmBeginTime As Date, dtmEndTime As Date Private Sub cmdEnd_Click() Dim intTimeCost As Integer, intWordCount As Integer dtmEndTime = Time() intTimeCost = DateDiff("s", dtmBeginTime, dtmEndTime) intWordCount = Len(txtInput.Text) txtSpeed.Text = intWordCount / (intTimeCost / 60) End Sub Private Sub cmdStart_Click() dtmBeginTime = Time0 End Sub

Answer 1

用VB编程时提示错误"溢出"是赋值超出目标（内存）的限制而产生的错误。
溢出（错误
6）
当赋值超出目标的限制时，就会发生溢出。此错误有以下的原因和解决方法：
赋值、计算或数据类型的结果的转换太大，以致于不能在变量类型所允许的范围内表示出来。
赋值给足够表示值的范围的类型的变量上。
给属性的赋值超过属性能接受的最大值。
确保赋值适合属性的范围。
试图在计算中使用一个数字，并且该数字被强制为一个整数，但是结果超过了整数的范围，例如：
Dim x As Long
x = 2000 * 365 ' 错误: 溢出
要解决这个问题，请按如下方式键入该数字：
Dim
x
As
Long
x = CLng(2000) * 365