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!