VB6.0:怎么实现每过60秒,分钟的倒计时?即秒数按1秒倒计时,分钟数按1分钟(60秒)倒计时。

2024-11-24 00:25:43
推荐回答(1个)
回答1:

mindec 和 secdec 设为全局变量

Private Sub Timer1_Timer()
secdec = secdec - 1
Form2.Label2.Caption = secdec
Form2.Label1.Caption = secdec \ 60
End Sub