適当に書いてみたサンプル。Form に WebBrowser、Timer、Button、Label を貼り付けるという前提のコード。ボタンをクリックすると Timer を起動してから Web にアクセスする。Timer は 2 秒ごとに呼び出され、WebBrowser の状態をチェックする。もし、Complete していなければ Reload(Refresh) する。もし、Complete していれば、Timer を停止する。
Public Class Form1 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Timer1.Interval = 2000 Timer1.Start() WebBrowser1.Url = New Uri("http://www.hatena.ne.jp/") End Sub Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick If WebBrowser1.ReadyState <> WebBrowserReadyState.Complete Then Label1.Text = "refresh" WebBrowser1.Refresh() Else Label1.Text = "stop" Timer1.Stop() End If End Sub End Class
こんな感じ?
あってるか確認してください。
ありがとうございます。
思っていたように動かすことができました。