在VB中如何实现定时执行程序

Question

现在要在VB中点击一个按钮执行一段程序，想要在以后的时间内每隔30秒再执行一次这段程序，要如何实现！ 请各位大侠帮帮忙，急用的！！ 谢谢！！！

Answer 1

对精度要求不是很高的话，30秒的interval完全可以用timer控件
timer控件的interval属性设为30000，enable设为false
点击一个按钮时将enable设为true ,这种方法应该是比较简单的方法

Answer 2

Timer1控件的interval属性设为30000，enable设为false
把这段要执行的程序写在
Sub xxx
End Sub
里面
Private Sub Command1_Click()
xxx
Timer1.Enabled
End SubPrivate Sub Timer1_Timer()
xxx
End Sub

Answer 3

Timer1控件的interval属性设为30000，enable设为false
把这段要执行的程序写在
Sub xxx
End Sub
里面
Private Sub Command1_Click()
xxx
Timer1.Enabled
End Sub
Private Sub Timer1_Timer()
xxx
End Sub