高手帮做一段VB倒计时器的代码,关闭后仍可以继续倒计时的。谢谢咯!距离10月1日。

2025-02-23 10:29:17
推荐回答(2个)
回答1:

关闭后还可以倒计时?
Dim a As Long

Private Sub Form_Load()
a = 100
Timer1.Interval = 1000
End Sub

Private Sub Timer1_Timer()
a = a - 1
If a = 0 Then a = 100
Text1.Text = a
End Sub

回答2:

不建议使用1楼的timer 因为vb里面timer计时是很不准确的 跟计算机运行情况有很大关联
如果你够狠就上api计时
如果简单点 你可以用now 或者去网络上获取现在的时间 然后与10月1日 之间进行一系列计算来得到 然后用一个timer来 实现 没多少毫秒更新一次 就可以了 这个对timer的要求就很低了 主要电脑能跑就可以