代码如下:
Private Sub Timer1_Timer()
Label1.Caption = Format(Now, "long time")
End Sub
为什么无效果?谢谢
Timer1.Interval = 1000 设置时间间隔
Timer1.Enabled = True 启动计时器。
interval属性和enabled属性设置了没有,前者设置为1000,后者设置为true
另外,我不是很记得 format 能不能这么写了,你直接 label1.Caption = Now 看看
要么是timer控件没有启用
Timer1.Enabled = True 启用控件
要么是Timer控件的Interval属性不对,可以设大一点
要么是窗体的visible属性不对,应该设置为true
不知道你这个问题是否已经解决, 如果还没有解决的话:你在使用Timer控件时遇到的问题可能是因为在VB中的Timer控件有一些注意事项需要遵守。这里提供一些可能的解决方案:
Private Sub Form_Load()
Timer1.Enabled = True
End Sub
Private Sub Form_Load()
Timer1.Interval = 1000 '设置为1秒触发一次
End Sub
Private Sub Timer1_Timer()
MsgBox "Timer事件被触发!"
End Sub
如果以上解决方案均未解决您的问题,可能需要进一步检查您的代码和应用程序环境,或者尝试其他的调试方法。