主题：[求助]计时器代码长时间就报错

以下内容为程序代码:

1 If Vars("VarD0") = 1 Then
2 Vars("ChartLogic") = 0
3 ElseIf Vars("VarD0") = 3 Then
4 ElseIf Vars("VarD0") = 4 Then
5
6 End If
7 Vars("MainPlanCount") += 1

以下内容为程序代码:

1 '几个变量多是全局变量
2 Vars.Add("VarD0", GetType(Integer), 0)
3 Vars.Add("ChartLogic", GetType(Integer), 0)
4 Vars.Add("MainPlanCount", GetType(Integer), 0)