投稿者 MAXV  (中学生) 投稿日時 2010/6/6 16:51:27
私は、でウェブブラウザを作っています。
http://rucio.cloudapp.net/ThreadDetail.aspx?ThreadId=9661

ウェブブラウザ(WebBrowser1)を読み込んだときに、プログレスバー(ToolStripProgressBar1)の値(Value)をWebBrowser1の進行状況にし、
進行状況ラベル(ToolStripStatusLabel1)の内容を、「ページが表示されました。」や、「ページでエラーが発生しました。」などを表示するには、どうすればいいですか?

Private Sub WebBrowser1_ProgressChanged(ByVal sender As ObjectByVal e As System.Windows.Forms.WebBrowserProgressChangedEventArgs) Handles WebBrowser1.ProgressChanged
        BackgroundWorker1.RunWorkerAsync()
End Sub

Private Sub BackgroundWorker1_ProgressChanged(ByVal sender As ObjectByVal e As System.ComponentModel.ProgressChangedEventArgs) Handles BackgroundWorker1.ProgressChanged

        ToolStripProgressBar1.Value = e.ProgressPercentage

        ToolStripStatusLabel2.Text = e.ProgressPercentage

End Sub

Private Sub BackgroundWorker1_DoWork(ByVal sender As ObjectByVal e As System.ComponentModel.DoWorkEventArgs) Handles BackgroundWorker1.DoWork

        Dim i As Integer
        For i = 1 To 100
            System.Threading.Thread.Sleep(100)
            BackgroundWorker1.ReportProgress(i)

        Next

End Sub