Tengo esta interfaz:
Ingreso datos:
Se cargan en el ListView
:
Lo que quiero es que al hacerle doble click a un item cargado de la lista, este se vuelva hacia arriba con los valores con los que fue cargado. Es decir, doy doble click al item de la lista, este debe cargar los valores del ComboBox
, TextBox
, CheckBox
con los que fue añadido al Listview
. Esto sería para que en caso de que el usuario haya cargado mal un dato, este pueda editarlo dando doble click.
Pensé en esto pero no ha funcionado:
Private Sub List_Contactos_DblClick()
Dim i As Integer
For i = 1 To List_Contactos.ListItems.Count
List_Contactos.ListItems(i).SubItems(1) = CmbTipoTel.Text
List_Contactos.ListItems(i).SubItems(2) = MebPreFijo.Text
List_Contactos.ListItems(i).SubItems(3) = txttel.Text
List_Contactos.ListItems(i).SubItems(4) = ChPrincipal.value
List_Contactos.ListItems(i).SubItems(5) = ChVinculo.value
Next i
End Sub
¿Sugerencias?