ok.
codice:
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Timer1.Start

    End Sub

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

    Private Sub ListBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ListBox1.SelectedIndexChanged
        Shell(ListBox1.Text, AppWinStyle.NormalFocus)
    End Sub
P.S. Non posto tutto xkè è lungo un Km, ho messo le cose essenzial, tanto il codice che non ho messo non ha niente a che fare con il temer o la listbox, ma gestisce altri comandi...
Grazie ancora!