フォームに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
◆実行結果