IEの操作:Webbrowserを使いURLを開く(WebBrowser1.Navigate)

VB2008でWebbrowserを使いURLを開く実行例サンプルです。

IE(インターネットエクスプローラ)の操作へ



■実行画面
「URLを開く」ボタンをクリックすると、このサイトのTopページが開きます。
HPを開いたWebbrowserコントロール

フォームにWebbrowserコントロールを設置しています。
実行手順は
1)Navigateに開くURLを指定します。
2)開くまでループで待ちます。
  Webbrowserは開くと、DocumentCompletedイベントが発生するので、イベントが発生しフラッグがTRUEになるまでループします。

■実行コード

Public Class Form1

Private webcompflag As Boolean

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
WebBrowser1.Navigate("http://www.feedsoft.net/vb/")
webcompflag = False
Do While (webcompflag = False)
System.Windows.Forms.Application.DoEvents()
System.Threading.Thread.Sleep(10)
Loop
End Sub

Private Sub WebBrowser1_DocumentCompleted(ByVal sender As Object, ByVal e As System.Windows.Forms.WebBrowserDocumentCompletedEventArgs) Handles WebBrowser1.DocumentCompleted
webcompflag = True
End Sub
End Class


Visual Basic 2008 Express Edition実践入門