Private Sub ListView1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles ListView1.Click
With ListView1.SelectedItems(0)
TextBox1.Text = .SubItems(0).Text
TextBox2.Text = .SubItems(1).Text
TextBox3.Text = .SubItems(2).Text
'ComboBox1.Text = .SubItems(3).Text
If ListView1.SelectedItems.Count > 0 Then
ComboBox1.Text = ListView1.SelectedItems(0).SubItems(3).Text
End If
btedit.Enabled = True
btdelete.Enabled = True
btsave.Enabled = False
btcancel.Enabled = True
TextBox1.Enabled = False
End With
End Sub