vb怎么每隔一秒自动点击按钮

VB可使用Timer控件的Timer事件实现执行按钮的Click事件来实现。

Timer 控件，通过引发 Timer 事件，Timer 控件可以有规律地隔一段时间执行一次代码。

Timer 事件，在一个 Timer 控件的预定的时间间隔过去之后发生。该间隔的频率储存于该控件的 Interval 属性中，它以千分之一秒为单位指定时间的长度。

实例代码：

Option Explicit
    Dim i As Long
    
Private Sub Command1_Click()
    Me.Cls
    i = i + 1
    Me.Print i
End Sub

Private Sub Form_Load()
    Timer1.Interval = 1000
    Timer1.Enabled = True
End Sub

Private Sub Timer1_Timer()
    Command1_Click
End Sub

先在窗体上放两个commandbutton和一个timer控件 代码 如下：

Option Explicit

Private Sub Command1_Click()           '这里是命令按钮1的单击事件
MsgBox ""
End Sub

Private Sub Command2_Click()          '单击命令按钮2将会关闭timer的调用
Timer1.Enabled = False
End Sub

Private Sub Form_Load()               '设置一秒
Timer1.Interval = 60000
End Sub

Private Sub Timer1_Timer()            '每过一秒调用一次命令按钮1的单击事件
Call Command1_Click
End Sub

程序代码win7+vb6.0下运行正常 望采纳