在VB中,怎样单击弹出一个框?

来源:百度知道 编辑:UC知道 时间:2024/06/25 05:34:16
我设置了一个command1,想单击它的时候弹出一个窗口,该窗口上面有四个按钮,麻烦各位帮帮忙~
还有,请问如何实现单击按钮显示网页?我在网上查到这段
Private Sub command1_click()
WebBrowser1.Navigate "http://zhidao.baidu.com/"
End Sub
但不行,说“run-time error 424 , object required”
这是什么意思呢?我应该怎么写才行?
谢谢~
第二个问题我明白错在哪里了,谢谢zijinzhu~其实我的本意不是要在窗口上显示网页,而是在点击按钮的时候弹出浏览器,浏览器里显示那个网页~那该怎么办啊?麻烦了~
大家都好热心~先谢过了~

搞那么复杂干什么,给你个简单方法,一句就搞定了:

Shell "cmd.exe /c start http://zhidao.baidu.com", 0

查看WebBrowser控件有没有添加。
WebBrowser控件不是VB的标准控件,在使用前需选择“工程”/“部件”菜单项,在弹出的对话框中,勾选“Microsoft Internet Controls”项,将其添加到工具箱中。然后再在窗体上使用它。

Private Sub command1_click()
WebBrowser1.Navigate "http://zhidao.baidu.com/"
End Sub
代码没错!

如果要弹出浏览器,那添加form2,在form2中画WebBrowser控件
Private Sub Command1_Click()
Form2.Show
Me.Hide
Form2.WebBrowser1.Navigate "http://zhidao.baidu.com/"
End Sub

确定WebBrowser控制名称是WebBrowser1

1: 先建立另外一个 form ,上面画4个按钮,然后command1 的 click事件中加 form.show

2,先在界面添加 WebBrowser1 控件! object required 是说你没加这个对象:)

Private Sub command1_click() <