如何等待几秒后运行某段代码

zenkifox

如何等待几秒后运行某段代码
Private Sub Form_Current()

END SUB


我想窗体加载后，等待2秒，怎么写。或者告诉我窗体加载后自动帮我点击窗体上的一个按钮，这样的程序怎么写，应该很简单的，可我就是不会{:soso_e109:}

Henry D. Sy

1
窗体有计时器触发事件
2
或者告诉我窗体加载后自动帮我点击窗体上的一个按钮，这样的程序怎么写
直接把按钮事件写进加载事件中

zenkifox

Henry D. Sy 发表于 2011-11-21 10:32
1
窗体有计时器触发事件
2

请给段示例代码

Henry D. Sy

Private Sub Form_Load()
    Me.TimerInterval = 2000
End Sub

Private Sub Form_Timer()
    MsgBox "hello"
End Sub