1.右のメニュー画面
>リストで見つかった「参照」、「HTMLオブジェクトライブラリ」のチェックマーク、それにOKを押して - 「プロジェクト」メニューをクリックしてください。
そして、自分自身のコントロールを追加
MSHTML.HTMLDocumentとしてWITHEVENTS M_Dom薄暗い
booleanとしてプライベート関数M_Dom_oncontextmenu()
M_Dom_oncontextmenu =偽
エンド機能
プライベートサブWebbrowser1_DownloadComplete()
を設定しM_Dom = Webbrowser1.Document
End Subの
2.国境だけでなく、インタラクティブなJS
プライベートサブWebBrowser1_DocumentComplete(ByValのpDispオブジェクトとして、バリアントとしてURL)
設定しM_Dom = WebBrowser1.Document
「Me.PopupMenu mymenuを
「オンエラーは次の再開
『pDisp.Document.body.setAttributeを拡張』、私は」JSとウェブとの対話に使用されている
WebBrowser1 'でボーダレスセット
.Document.body.Scroll = 『NO』
.Document.body.Style.border = "0PX"
.Document.body.Style.margin = "0PX"
.Document.body.Style.overflow = "隠された"
で終わる
End Subの
関数のdoSomething(ByValのsParam $)イベントの「処理ページ
のMsgBox sParam、vbInformationまたはvbOKOnly、 "doSomethingの"
エンド機能
VBプログラムは、ページ内のdoSomethingのを呼び出します。
<a href="void(0)" onclick="document.body. 延長 .doSomething('www.google.com-000000');return false;"> google.comする</a> <br />