Excel中带有长变量的错误6

Question

Sub Testing()
Dim Ttt As Long
Dim a As Variant
Dim s As String
s = "11:30:05.500"
Ttt = (11 * 50 * 10 * 10)
'a = Split(StrConv(s, 64), Chr(0))
'Ttt = TimeGet(a)
End Sub

我只是想存储一个大的数字，这个数字甚至没有那么大。为什么这会抛出一个错误运行时错误6?我肯定我正在做一些非常愚蠢的事情。

Answer 1

试试这个：

Ttt = (11& * 50& * 10& * 10&)

原因是您提供的文本被解释为Integer值，并且乘法是按操作顺序进行的，因此最终结果对于一个Integer来说太大了，然后才分配给您的Long数据类型( Ttt变量)。

通过使用&类型字符，您可以告诉编译器您的文本实际上是Long值。