用VB编写一个每隔一段时间循环启动一个软件的程序

来源：百度知道 编辑：UC知道 时间：2024/06/08 07:41:41
间隔时间是一定的：5个小时
程序是固定的：d:\wj\1.exe

Dim a As Integer
Private Sub Form_Load()
 Timer1.Interval = 60000 '1分钟
 a = 300 '300分钟 = 5小时
End Sub
Private Sub Timer1_Timer()
 a = a - 1
 If a = 0 Then
  Shell "d:\wj\1.exe"
  a = 300
 End If
End Sub

用timer控件.