戻る



WebBrowser コントロールでページ内検索ダイアログを表示する
動作環境 Windows2000(IE6.0) 開発環境 Visual Basic 6.0 (+SP5)
説明 WebBrowser コントロールを利用したブラウザにページ内検索機能を追加します。
用意するもの：標準フォーム(Form1)、WebBrowser コントロール(WebBrowser1)、コマンドボタン(Command1)


'変数の明示的な宣言を強制
Option Explicit

Private Sub Command1_Click()

WebBrowser1.SetFocus
SendKeys "^f", True

End Sub

Private Sub Form_Load()

WebBrowser1.Navigate "http://homepage1.nifty.com/kurichan/"

End Sub