28/02/2009, 21:04
|
 | | | Fecha de Ingreso: noviembre-2003
Mensajes: 959
Antigüedad: 21 años, 5 meses Puntos: 19 | |
| Respuesta: Moverse sobre un listbox
La solucion
Código:
Private Sub Command1_Click()
'verifico si esta seleccionado el ultimo elemento... si lo esta no hago nada sino tira error
If List1.ListIndex < List1.ListCount - 1 Then
'muevo el index al siguiente elemento
List1.ListIndex = List1.ListIndex + 1
End If
End Sub
|