適当に書いてみたサンプル。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
こんな感じ?
あってるか確認してください。
ありがとうございます。
思っていたように動かすことができました。