如何用VB做在原窗口打开本地网页

如题所述

VB 主窗体菜单[工程]-->[部件],在控件列表找到 Microsoft Internet Controls ,把它前面的钩打上。
然后控件栏就会出现一个 WebBrowser 控件,添加这个控件到窗体,以下代码打开网页
Private Sub Command1_Click()
Me.WebBrowser1.Navigate ("http://www.163.com")
End Sub追问

对不起,我要的是在VB原窗口打开本地网页文件,而不是互联网上的,请问你知道应该怎么办吗?如果用你的方法,输入文件地址,会提示程序无法显示网页!你能帮我决绝吗?谢谢,好的话给分哦!谢谢,谢谢,再谢谢。(在线等……)

追答

Me.WebBrowser1.Navigate ("c:\index.htm")

我这里很正常的显示网页,如果你那里显示不了,可能是网页的问题吧。

温馨提示:内容为网友见解,仅供参考
无其他回答

如何用VB做在原窗口打开本地网页
VB 主窗体菜单[工程]-->[部件],在控件列表找到 Microsoft Internet Controls ,把它前面的钩打上。然后控件栏就会出现一个 WebBrowser 控件,添加这个控件到窗体,以下代码打开网页 Private Sub Command1_Click()Me.WebBrowser1.Navigate ("http:\/\/www.163.com")End Sub ...

在VB中怎样让点击的网页还在VB窗口中打开
有两种方法。一种是还是在原来的窗口上打开。另一种是新窗口上打开。代码如下:1.原来的窗口 Private Sub WebBrowser1_NewWindow2(ppDisp As Object, Cancel As Boolean)Cancel = True WebBrowser1.Navigate2 WebBrowser1.Document.activeElement.href End Sub 2.新窗口 Private Sub WebBrowser1_NewWin...

vb 按钮 打开网页
首先,打开你的VB项目,选择或创建一个适当的窗体,然后在窗体上添加一个命令按钮。通常,命令按钮可以使用快捷键“Alt + 1”快速访问。接着,双击命令按钮以跳转到代码编辑器。在代码编辑器中,输入以下代码:vba Private Sub Command1_Click() On Error Resume Next Dim o As Object Set o = Crea...

VB 如何调用系统默认程序打开指定网页?
首先你得找到浏览器的路径。然后在vb中使用如下代码,例如用猎豹浏览器打开指定网页:Private Sub Command1_Click()Shell "F:\\Program Files\\liebao\\LBBrowser\\liebao.exe 网页绝对地址"End Sub 路径和地址之间有一空格。

怎样让所有的网页都用VB做的浏览器打开?
新建一个WebBrowser1,代码如下:Private Sub WebBrowser1_NewWindow2(ppDisp As Object, Cancel As Boolean)Dim newform1 As New Form1 Set ppDisp = newform1.WebBrowser1.object newform1.Show End Sub Private Sub Form_Load()WebBrowser1.Navigate "http:\/\/mail.163.com" '''你想要打开的...

如何在VB程序中打开网页(网页窗口位于程序里)
工程→部件,添加一个MICROSOFT INTERNET CONTROLS勾上,按确定,再从左边添加一个WebBrowser的控件,Private Sub Form_Load()WebBrowser1.Navigate "http:\/\/www.baidu.com"End Sub

VB如何在当前窗口打开网页
有些是使用默认浏览器的 Private Sub Form_Load()WebBrowser1.Navigate "www.baidu.com"End Sub

求VB后台打开网页代码
即:Private Sub Label1_Click()ShellExecute Me.hwnd, "open", "http:\/\/wpa.qq.com\/msgrd?V=1&Uin=10000&Site=ioshenmue&Menu=yes", "", "", SW_HIDE End Sub 最后的那个参数,确定了窗口的可视性情况,详解如下:请用下述任何一个常数 SW_HIDE 隐藏窗口,活动状态给令一个窗口 SW_...

vb打开网页要如何弄?
Label Lable1 地址:Text Text1 (空)Command cmdView 浏览 Command cmdForward 向前 Command cmdBackward 向后 Command cmdCloseView 关闭浏览窗口 Command cmdExit 退出 对上述窗体添加如下代码即可实现对Internet Explorer的调用与控制,Dim WithEvents ieView As InternetExplorer '在通用模块中定义Internet ...

如何用vb打开网页
保存扩展名为vbs的文件 程序已经调试过 ok~set ws=createobject("wscript.shell")ws.run"iexplore.exe www.baidu.com"

相似回答