Listboxdaki Siteleri Webbrowserda Açma ?

Soru : listboxdaki siteleri webbrowserda sıralı olarak açma ?

arkadaşlar soru aslında bul

listboxdaki siteleri webrowserda sıralı olarak açma kod buldum ama bu kodu sıralı ve 20 sn de bir siteleri degiştirip sitelere girecek kodu yazarsanız senirim . galiba bunun için timer ve döngü kullanıyomuş ama bir türlü beceremedim . eger yardımcı olursanız sevinirim .

aşagıdaki kod sadece ilk siteyi açıyor .digerlerini açmıyor .benim istedigim kısaca 20 snde bir diger siteye geçecek ve webbrowserda o siteyi açacak .

program dili : vb.net olacak arkadaşlar

WebBrowser1.Navigate(ListBox1.Items(0))  bu sadece ilk siteyi açıyor

Public Class Form1
    Dim a As Integer

    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        If a = ListBox1.Items.Count - 1 Then
            Timer1.Stop()
        End If
        WebBrowser1.Navigate(ListBox1.Items(a))
        a += 1
        Timer1.Interval = 20000

    End Sub
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Timer1.Start()
        Timer1.Interval = 1
    End Sub
End Class

hiç ole boşuna uzatmaya gerek yok :D
şole yapablrsin listbox'a adresleri girersin bn senn için yaptm ilk adresim googledı ikincisi mynetti ikisinede girsim.
Selected index de seçilen satıra gre iş yapar vb.netdeki mantık hatasından dolayo ilk satırı 0 di  alırsın ve 1,2,3 .. die devam eder.
    If ListBox1.SelectedIndex = (0) Then
            WebBrowser1.Navigate(ListBox1.Text)

        Else : ListBox1.SelectedIndex = (1)
            WebBrowser1.Navigate(ListBox1.Text)
        End If

Burak Kızıltaş.....