Автообновление WebBrowser каждые 3 секунды - Visual Basic .NET

Формулировка задачи:

Всем привет!Сильно не пинайте, т.к. я до этого не сталкивался с написанием программ. Пожалуйста помогите вставить код для автоматического обновления браузеров. В программке их четыре, браузер 1,2 и 3 должны обновляться каждые 2-3 секунды.

Public Class Form1

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        WebBrowser1.Navigate("192.168.1.170/3003/th")
        WebBrowser4.Visible = True
    End Sub
 
    Private Sub Button4_Click(sender As Object, e As EventArgs) Handles Button4.Click
        WebBrowser4.Navigate("192.168.1.170/3003/ts")
        WebBrowser4.Visible = True
    End Sub
 
    Private Sub Button5_Click(sender As Object, e As EventArgs) Handles Button5.Click
        WebBrowser4.Navigate("192.168.1.170/3003/op")
        WebBrowser4.Visible = True
    End Sub
 
    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
 
    End Sub
 
    Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
        WebBrowser2.Navigate("192.168.1.170/3003/oc")
        WebBrowser2.Visible = True
    End Sub
 
    Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
        WebBrowser3.Navigate("192.168.1.170/3003/ic")
        WebBrowser3.Visible = True
    End Sub
 
    Private Sub WebBrowser3_DocumentCompleted(sender As Object, e As WebBrowserDocumentCompletedEventArgs) Handles WebBrowser3.DocumentCompleted
 
    End Sub
 
    Private Sub WebBrowser4_DocumentCompleted(sender As Object, e As WebBrowserDocumentCompletedEventArgs) Handles WebBrowser4.DocumentCompleted
 
    End Sub
 
    Private Sub WebBrowser1_DocumentCompleted(sender As Object, e As WebBrowserDocumentCompletedEventArgs) Handles WebBrowser1.DocumentCompleted

    End Sub

End Class

Решение задачи: «Автообновление WebBrowser каждые 3 секунды»

textual
                            Листинг программы 
                        

                              Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        WebBrowser1.Refresh()
    End Sub
                        