Dim i As Integer
Private Sub Timer1_Timer()
i = i + 1
If i = 4 Then i = 1
Me.Caption = i
End Sub
Private Sub Timer1_Timer()
i = i + 1
If i = 4 Then i = 1
Me.Caption = i
End Sub
温馨提示：内容为网友见解，仅供参考
无其他回答
相似回答
