解答VB语言

来源：百度知道 编辑：UC知道 时间：2024/06/07 01:11:59
Dim i As Integer

Private Sub Form_Load()
Hide
Timer1.Interval = 1000
Timer1.Enabled = True
End Sub

Private Sub Timer1_Timer()
i = i + 1
If i = 3600 Then Show: Timer1.Enabled = False
End Sub

这是我在百度上看来的，我不知道那个i=i+1还有后面的那个if语句有什么作用，大家能帮我解答一下吗？
是3600毫秒吧，那么就不是一个小时了，而那个interval属性的大小好像有限制，不能到一小时
好像错了，你们，i+1有什么意思你们完全没有解释。只看到了3600

错！3600毫秒是3.6秒。
这个if语句的意思是说，如果i的值=3600，就显示窗口，然后停止Timer1定时器
i+1的意思是说,定时器每触发一次Timer事件，就使i变量的值加一。

If i = 3600 Then Show: Timer1.Enabled = False
意思：
当i的值为3600时，Timer1控件停止运转，即i的值不再增加

Private Sub Timer1_Timer()
i = i + 1
If i = 3600 Then Show: Timer1.Enabled = False
End Sub
这个方法表示在每一秒钟 i 加1
如果到1小时即3600秒就停止时钟计算