Question

求助一段vb代码（vb6）

这个代码的作用是，后台打开一个网页10秒后结束
过程是：运行程序--------后台打开一个网页（如：http://baidu.com）----等待10秒-----退出
求这段代码
后台完成，没有显示界面

Answer 1

'加一个timer和WebBrowser控件
'WebBrowser控件就是Microsoft Internet Controls
'下面的放入代码编译器
Private Sub Form_Load()
Timer1.Enabled = False
Timer1.Interval = 10000
Me.Visible = False
WebBrowser1.Navigate "http://baidu.com"
Timer1.Enabled = True
End Sub

Private Sub Timer1_Timer()
End
End Sub

Answer 2

是要循环执行吗?