VB 每隔5分钟执行一次程序
PrivateSubForm_Load()Timer1.Interval=1000EndSubPrivateSubTimer1_Timer()StaticaAsInteg...
Private Sub Form_Load()
Timer1.Interval = 1000
End Sub
Private Sub Timer1_Timer()
Static a As Integer, b As Integer
a = 1
If a = 60 Then
b = 1:a=0
If b = 5 Then
“...”
end if
End Sub
这代码我怎么看都只是5分钟到了就执行一次代码后就结素了程序，我想要的是每隔5分钟执行一次 “...”中 的代码，求高手解释以下吧，谢谢！ 展开
Timer1.Interval = 1000
End Sub
Private Sub Timer1_Timer()
Static a As Integer, b As Integer
a = 1
If a = 60 Then
b = 1:a=0
If b = 5 Then
“...”
end if
End Sub
这代码我怎么看都只是5分钟到了就执行一次代码后就结素了程序，我想要的是每隔5分钟执行一次 “...”中 的代码，求高手解释以下吧，谢谢！ 展开
6个回答
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
