vb页面设置的实现代码只需要代码

发布网友发布时间：2022-05-13 14:19

共1个回答

热心网友时间：2023-10-12 03:23

1、窗体中首先加入WebBrowser控件。点击窗体顶部菜单--工程--部件，在弹出的部件窗口选择Microsoft Internet Controls，勾选然后确定
2、部件添加成功后，窗体左侧出现WebBrowser控件，点击控件添加到窗体上。
3、窗体启动时加入如下代码：
Private Sub Form_Load()
WebBrowser1.Navigate2 "要打开的网站网址"
End Sub
4、窗体加入一个Timer控件，控件属性Interval根据自己需要设置好时间，注意timer单位是毫秒，10秒就是10000毫秒。
5、窗体加入一下代码：就是间隔多少秒自动刷新WebBrowser中的网页。
Private Sub Timer1_Timer()
WebBrowser1.Refresh '或者重新写 WebBrowser1.Navigate2 "要打开的网站网址"
End Sub