[sooriaty03]

السلام عليكم ورحمة الله وبركاته

تفضل أخي الكريم جرب هذا الكود - من بعد إذن أخي الحبيب kslawy

كود :

Public Class Form1
    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        If ListView1.Items.Count > 0 AndAlso ListView1.SelectedItems.Item(0).Equals(ListView1.Items.Item(ListView1.Items.Count - 1)) = False Then
            ListView1.Items.Item(ListView1.SelectedIndices.Item(0) + 1).Selected = True
            ListView1.Items.Item(ListView1.SelectedIndices.Item(0) + 1).Focused = True
            ListView1.Items.Item(ListView1.SelectedIndices.Item(0)).Selected = False
        Else
            Timer1.Enabled = False
        End If
    End Sub
    Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        ListView1.HideSelection = False
        ListView1.Items.Item(0).Selected = True
        Timer1.Interval = 1000
        Timer1.Enabled = True
    End Sub
End Class

بالتوفيق