VB中的timer

i是局部變量，只在過程裏有效。因此，在代碼

Private Sub Timer1_Timer()

i = i + 1

Text1.Text = i

End Sub

裏，每次i都是以0開始。

解決方法1：全局變量（窗體模塊裏）

Dim?i?As?Integer?'全局變量i

Private?Sub?Form_Load()

i?=?0?'其實可以省略

Timer1.Interval?=?1000

End?Sub

Private?Sub?Timer1_Timer()

i?=?i?+?1

Text1.Text?=?i

End?Sub 解決方法2：靜態變量

Private?Sub?Form_Load()

Timer1.Interval?=?1000

End?Sub

Private?Sub?Timer1_Timer()

Static?i?As?Integer?'靜態變量i

i?=?i?+?1

Text1.Text?=?i

End?Sub

另外，為了避免使用未定義的變量，建議在每個模塊的第壹行寫上

Option?Explicit?'使用未定義的變量的時候會發生編譯錯誤

不懂請追問，滿意請采納

上一篇:怎麽學編程

下一篇:怎樣用matlab判斷數列的收斂性