Private Sub Command1_Click()
strExeFunc = "javascript:alert(""asd"")"
WebBrowser1.Document.parentWindow.execScript strExeFunc, "JavaScript"
End Sub
Private Sub Form_Load()
WebBrowser1.Navigate "about:blank"
End Sub
===========================================
不知道lz,想要的是不是这个?
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024