vb时钟控件如何定时更久，时钟控件取值只有0~65535，也就是一分钟，那么该如何让它10分钟或一小时启动一次

答案:3 悬赏:30 手机版

解决时间 2021-02-13 12:18

提问者网友：温旧梦泪无声
2021-02-13 06:23

最佳答案

五星知识达人网友：西岸风
2021-02-13 06:33

你可以在时钟控件事件内部用个静态变量累加，然后根据这个数值再来决定是否进行下一步动作嘛。比如你把时钟控件设为一分钟触发一次，那么里面的变量每累加一次就表示增加了一分钟，当这个变量除以10的余数为0时（也就是10分钟、20分钟、30分钟……）就执行你设定的代码即可。一小时也一样，就是检测变量除以60的余数是否为0（当然也可以是0到59的任何一个数字，随你喜欢）。如果你还不明白，我可以给你个例子

全部回答

1楼网友：不想翻身的咸鱼
2021-02-13 08:17

interval里边设置时钟时间（单位为毫秒），到这个时间，则执行时钟里的代码。 enable是指这个时钟控件是否被激活，激活则计时，不激活则不计时，不执行如：新建一个exe工程，添加一个time控件，将其interval里边设置1000，在代码页加入以下代码： private sub timer1_timer() form1.print time end sub 运行，你会看到form窗体是每格一秒显示一个时间

2楼网友：三千妖杀
2021-02-13 06:57

一看就明白了： Private Sub Form_Load() Timer1.Interval = 60000 '每分钟触发一次 End Sub Private Sub Timer1_Timer() Static iCount As Integer iCount = iCount + 1 If iCount = 60 Then iCount = 0 '每小时触发一次的代码 End If End Sub

我要举报

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息