[hassan]

بخصوص الكود الاول هذا الكود

PHP كود :

Dim rand As Integer = (Rnd() * ListBox1.Items.Count)
        ListBox1.SelectedIndex = rand 


الكود الثاني تضعه في التايمر 

PHP كود :

On Error Resume Next
        For i = 0 To ListBox1.Items.Count
            ListBox1.SelectedIndex = i
            System.Threading.Thread.Sleep(500)
        Next 


وشكرا