Hola!
A ver si entendí... prueba esto:
Código vb:
Ver original'DESPUES DE CARGAR EL COMBO
Private Sub cmdANTERIOR_Click()
Dim I As Integer
I = cbo.ListIndex - 1
If I >= 0 Then cbo.ListIndex = I
'AQUI VA TU CODIGO DE CARGA DE DATOS CON EL TEXT QUE TIENE EL COMBO, O SEA,
'EL "SELECT * FROM Personas WHERE Nombre = '" & Combo.text & "'"
End Sub
Private Sub cmdSIGUIENTE_Click()
Dim I As Integer
If cbo.ListIndex = -1 Then
I = 1
Else
I = cbo.ListIndex + 1
End If
If I < cbo.ListCount Then cbo.ListIndex = I
'AQUI VA TU CODIGO DE CARGA DE DATOS CON EL TEXT QUE TIENE EL COMBO, O SEA,
'EL "SELECT * FROM Personas WHERE Nombre = '" & Combo.text & "'"
End Sub