VB WebBrowser1 怎么防止网页中的弹出窗口

2024-12-04 11:24:53

推荐回答（3个）

回答1：

目前只有弹出后自己关闭它。。

补充：WebBrowser 是一个 .NET 控件类，在 .NET Framework 2.0 版中新增。WebBrowser 类使用户可以在窗体中导航网页。

回答2：

试过了，网上说的其他办法都不行，还是弹出后自动关闭它最好，尤其是网页上提交成功后的页面，根本就判断不到。。
经过测试，目前只有弹出后自己关闭它。。
Private Sub Timer1_Timer()

iii = iii + 1

If iii >= 0 Then
Dim dlghwnd As Long
Dim buttonhwnd As Long
dlghwnd = FindWindow("#32770", "Microsoft Internet Explorer")
buttonhwnd = GetDlgItem(dlghwnd, 2) '其中的2，用spy++获得
SendMessage buttonhwnd, BM_CLICK, 0&, ByVal 0&
End If

End Sub

回答3：

是网页弹出来吗