‘计时器 ,窗体上加一个timer ,一个label Private Sub Timer1_Timer() ‘timer1 的interval 设为10 Static i i = i + 1 Label1.Caption = Format(i / 3600 & ":" & (i Mod 3600) / 60 & ":" & i Mod 60, "hh:mm:ss") End Sub
计时器 的代码
最新推荐文章于 2025-02-04 00:15:00 发布
‘计时器 ,窗体上加一个timer ,一个label Private Sub Timer1_Timer() ‘timer1 的interval 设为10 Static i i = i + 1 Label1.Caption = Format(i / 3600 & ":" & (i Mod 3600) / 60 & ":" & i Mod 60, "hh:mm:ss") End Sub