[kslawy]

جرب هذا الكود في الحدث ItemSelectionChanged الخاص بالأداة :

كود :

Private Sub ListView1_ItemSelectionChanged(ByVal sender As Object, ByVal e As System.Windows.Forms.ListViewItemSelectionChangedEventArgs) Handles ListView1.ItemSelectionChanged
        If Not e.Item Is Nothing Then
            If e.IsSelected = True Then
                With e.Item
                    Me.TextBox1.Text = IIf(.Text IsNot Nothing, .Text, "")
                    Me.TextBox2.Text = IIf(.SubItems(1).Text IsNot Nothing, .SubItems(1).Text, "")
                    Me.TextBox3.Text = IIf(.SubItems(2).Text IsNot Nothing, .SubItems(2).Text, "")
                End With
            End If
        End If
    End Sub