20-09-14, 06:16 PM
.....
.....
كود :
'
' Form2
Private Sub ListView1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ListView1.SelectedIndexChanged
If Me.ListView1.SelectedItems.Count > 0 Then
Dim imageIndex As Integer = Me.ListView1.SelectedItems(0).ImageIndex
For Each itm As ListViewItem In Form1.ListView1.Items
If itm.ImageIndex = imageIndex Then itm.Selected = True
Next
End If
End Sub.....



