vb.net打开新网页,vbnet new

vb.net WebBrowser报错当前IE设置限制打开新窗口，也可能安装了某个插件

部分代码如下：

在窗口及WebBrowser创建完以后，写此代码：

WebBrowser.OnNewWindow2:=IE1NewWindow2;

给主窗口创建一个方法：

procedure TBrowForm.IE1NewWindow2(Sender: TObject; var ppDisp: IDispatch;var Cancel: WordBool);

Var NewForm:TBrowForm;

begin

try

NewForm :=TPopBrowerForm.Create(application);

NewForm.WebBrowser.OnNewWindow2 :=IE1NewWindow2;//如果在窗口的Oncreate事件

//有此代码，此处就可以省略

ppDisp := NewForm.WebBrowser.Application;

NewForm.Show;

Cancel:=false;

except

end;

end;

相关问答

Q1: vb.net 如何让webrowser中的window.open网页在新窗口打开而不是IE中打开

【首发答案】

在NewWindow事件中，

Private Sub WebBrowser1_NewWindow(ByVal sender As Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles WebBrowser1.NewWindow

Dim newUrl = WebBrowser1.StatusText

'Dim newUrl = WebBrowser1.Url.AbsoluteUri '是这个还是上面那个的我忘了..你都试试..

WebBrowser1.Navigate(newUrl) '加载新的网址

e.Cancel = True '使外部浏览器无法捕获此事件

End Sub

Q2: VB.net 点击显示新窗口 如何新窗口不关闭时 点击后不重复创建窗口 显示已加载的窗口

这样写，每次点击按钮事件都会创建一个新的form。

你想要的效果是主窗口生命周期内，子form是一个。

根据这个你再考虑下怎么实现。比如主form加载时创建子form。点击事件中去获取子form的焦点。

Q3: vb.net怎么打开一个新窗口，关闭旧窗口，为什么旧窗口关闭，程序就结束了？

你应该是这样写的：

Form2.Show()

Me.Close()

用hide:

Form2.Show()

Me.Hide()

Q4: vb.net中webbrowser控件。打开网页后

webbrowser的newwindows中写代码

1 不弹出新窗口，但跳转到新网页

Set ppDisp = WebBrowser.Object

2 禁止弹出

cancel=true