Question

visual basic 编一个WEB浏览器出错，求解

进入主页后点击链接出错。

出错代码：

如果删除，点击链接会调用IE浏览器打开。

最后还想问，我做的浏览器状态栏显示不全，如何调整？

多谢了！





Answer 1

你有form1这个名字的窗体吗？如果没有的话会提示这个错误

追问

是这个：

追答

你的名称已经变了，变成了statusbar了，后面的是物理文件的名称
dim frm as statusbar

追问

可以改回form1吧？

追答

为什么要改呢？你直接将程序中所有的form1改为statusbar不就可以了吗？或者把statusbar命名为form1也可以。如果要改物理名称的话，你先把工程关掉，然后找到你的窗体文件，改名称后。在打开工程，在添加现有窗体，重新加载进来

Answer 2

将这个过程修改：
Private Sub WebBrowser1_NewWindow2(ppDisp As Object, Cancel As Boolean)
On Error Resume Next
Dim frmWB As Form1
Set frmWB = New Form1
frmWB.WebBrowser1.RegisterAsBrowser = True
Set ppDisp = frmWB.WebBrowser1.object
frmWB.Visible = True
frmWB.Top = Form1.Top
frmWB.Left = Form1.Left
frmWB.Width = Form1.Width
frmWB.Height = Form1.Height
End Sub
第二个问题：可以将这个框的长度调大些

追问

不行啊！

 

还是：

追答

将form1改成你这个窗体的名字