คลิกเลือกข้อมูลที่ Listview แล้วแสดงข้อมูลใน Textbox

Private Sub ListView1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ListView1.SelectedIndexChanged
    ' Get the selected item
    Dim item As ListViewItem = ListView1.SelectedItem

    ' Show the information in the textbox
    TextBox1.Text = item.Text
End Sub

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
    ' Set the text of the textbox to the value of the first item in the list view
    TextBox1.Text = ListView1.Items(0).Text
End Sub