Question

VB中如何将Timer控件的Interval属性设置值设置为3600000秒

Answer 1

Interval不能为3600000秒
Interval为毫秒1000为一秒
若需要长时间的计时器
就用其他变量代替
在timer里面累加

如需要比较精确的 就用系统api GettickCount 来计时
毕竟timer实在是不精确太受影响了
长时间累计 误差很大

所以推荐 在timer里面调用 Gettickcount api 来计时

Answer 2

用变量来控制即可
Dim s As Long
Private Sub Form_Load()
Timer1.Interval = 1000
End Sub

Private Sub Timer1_Timer()
s = s + 1
If s = 3600000 Then
MsgBox "到了"
s = 0
End If
End Sub

Answer 3

Timer1.Interval=3600000000

Answer 4

不能大于9999