VB中屏蔽webbrowser的弹出错误对话框!
作者:admin 日期:2008-11-16
Private Sub WebBrowser1_DownloadBegin()
WebBrowser1.Silent = True
End Sub
Private Sub WebBrowser1_DownloadComplete()
WebBrowser1.Silent = True
End Sub
Private Sub Form_Load()
WebBrowser1.Silent = True '这样就可以屏蔽了。。
End Sub
'而不是在设计中选中Webbrowser1控件把silent设为true,一定要代码写在form_load中
广告位