参照元情報簡単 WebBrowser の作成は（Visual Basic ガイド ツアー）
「簡単 WebBrowser の作成」にジャンプする
作成方法の詳細は上記を参照願います。
簡単 WebBrowser の作成の完成ファイル簡単 WebBrowser の作成の解説とおりに作業を実施すると、プロジェクトファイル群が完成しますが、若干の修正を加えて作成しました。
完成ファイルは以下からダウンロードできます。
ダウンロード後は解凍してから使用してください。
[簡単 WebBrowser の作成]をダウンロードする。解凍すると「WebBrowser1」フォルダーがあります。
注（１）「Print」フォルダーの「WebBrowser1.sln」ファイルをダブルクリックすると「Microsoft Visual Basic 2010 Express」が起動します。
注（２）メニューの「ウインド」＿「ウインドレイアウトのリセット」で標準に戻ります。
注（３）「ソリューションエクスプローラ」ウインドウ内の「Form1.vb」をダブルクリックすると「デザイン」が表示されます。
注（４）メニューの「表示」＿「コード」を選択するとコードが表示されます。
注（５）「WebBrowser1.sln」の動作確認は「デバッグ」＿「デバッグ開始」で実行します。デバッグ機能を用いて動作確認を行います。
WebBrowser1の実行（１）「Microsoft Visual Basic 2010 Express」のデバッグ機能を使用します。
（２）「デバッグ」＿「デバッグ開始」を選択します。
（３）MyWebBrowser画面が表示されます。
（４）URLのTEXTボックスにカーソルをセットして、「Enter」キーを押します。
（５）Googleのトップ画面が表示されます。
（６）検索機能でリンク先を検索して、リンク先にジャンプします。
（７）学習用ですので、こまかな機能はありません。
（８）クローズボックスでプログラムを終了します。
新規プロジェクトの作成（１）新規プロジェクト
新規プロジェクトを作成すると「デザイナー」にはForm1が自動生成されます。
（２） Formコード
Public Class Form1
End Class
が自動生成されます。
（３） パーツレイアウト
Form1にTextBoxとWebBrowserをツールボックスから設定します。
TextBoxにURLのアドレスを設定します。
Public Class Form1の全コード
Public Class Form1
Private Sub TextBox1_KeyDown(ByVal sender As System.Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles TextBox1.KeyDown
If e.KeyCode = Keys.Enter Then
WebBrowser1.ScriptErrorsSuppressed = True
WebBrowser1.Navigate(TextBox1.Text)
End If
End Sub
Private Sub WebBrowser1_Navigated(ByVal sender As System.Object, ByVal e As System.Windows.Forms.WebBrowserNavigatedEventArgs) Handles WebBrowser1.Navigated
TextBox1.Text = WebBrowser1.Url.ToString()
Dim Title As String = WebBrowser1.DocumentTitle
End Sub
End Class
Private Sub TextBox1_KeyDown
Private Sub TextBox1_KeyDown(ByVal sender As System.Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles TextBox1.KeyDown
If e.KeyCode = Keys.Enter Then
WebBrowser1.ScriptErrorsSuppressed = True
WebBrowser1.Navigate(TextBox1.Text)
End If
（１）Private Sub TextBox1_KeyDownはTextBox1.KeyDownイベントで呼び出されます。（２） If e.KeyCode = Keys.Enter Thenは「Enter」キーが押された場合、下記を実行します。
（３）WebBrowser1.ScriptErrorsSuppressed = Trueはスクリプトエラー防止用のコードでTrueを設定しないとエラーが多発する場合があります。
（４）WebBrowser1.Navigate(TextBox1.Text)はTextBox1に設定されたURLを参照してハイパージャンプします。
（５）基本的にはWebBrowser1.Navigateだけで動作します。
Private Sub WebBrowser1_Navigated
Private Sub WebBrowser1_Navigated(ByVal sender As System.Object, ByVal e As System.Windows.Forms.WebBrowserNavigatedEventArgs) Handles WebBrowser1.Navigated
TextBox1.Text = WebBrowser1.Url.ToString()
Dim Title As String = WebBrowser1.DocumentTitle
End Sub
（１）Private Sub WebBrowser1_Navigatedはブラウザでリンク先をクリックしたときに呼び出されます。（２）TextBox1.Text = WebBrowser1.Url.ToString()はTextBox1にリンク先のURLを設定します。
（３）Dim Title As String = WebBrowser1.DocumentTitleは変数Titleにリンク先のタイトルを設定します。
感想：
（１）非常に簡単なコードでブラウザができます。
（２）スクリプトエラーで苦労しました。
（３）スクリプトエラーの原因はHTMLファイルの改行コードの差異によるものでした。
（４）HTMLファイルの作成は、通常テキストエディタを使用しますが、改行コードは自動的に挿入されます。ウインドウズパソコンでは、 CR（復帰）'0x0d'、 LF（改行）'0x0a'の順のコードで改行を判定していますが、マック系パソコンでは LF（改行）'0x0a'のコードのみで改行を判定しています。
（５）マック系パソコンの LF（改行）'0x0a'のみでも通常表示は問題が無いのですが、このコードにおいては、WebBrowser1.ScriptErrorsSuppressed = Trueを設定しないとスクリプトエラーが多発します。
（まいった！！）
１４章：チュートリアル13:WPF アプリケーション の作成に行く。