フォームにWEBページを表示する方法

◆概要

 このページは、Visual Basic 6.0において、フォームにWEBページを表示する方法を記載しています。


 Visual Basic 6.0 で Web ページを表示させるには、ActiveX コントロールの WebBrowser を使用します。
 WebBrowser コントロールを利用には、まず、[プロジェクト]メニューの[コンポーネント]を選択して、[コンポーネント]ダイアログを開きます。表示されたダイアログの[コントロール]タブで、「Microsoft Internet Control」にチッェクを付け、[OK]ボタンをクリックします。すると、ツールボックスに WebBrowser が追加されます。


WebBrowserコントロール






次に、ツールボックスに追加された WebBrowser コントロール、テキストボックス、コマンドボタンを Form に貼り付け、下記のコードを実装します。

フォームモジュール

Option Explicit

Private Sub Form_Load()
    Text1.Text = "http://www7b.biglobe.ne.jp/~whitetiger/index.html"
    ' WebBrowserの設定
    WebBrowser1.Left = 0
    WebBrowser1.Width = Me.Width
End Sub

Private Sub Command1_Click()
    WebBrowser1.Navigate (Text1.Text)
    
End Sub

◆実行結果





▼ページトップへ