Moverser por el DataCombo

[jack06]

wenas necesito desplazarme por el DataCombo al presionar los botones que remarque abajo y a la vez se deslize lo que hay en el combo osea que me seleccione los item que hay en el DataCombo....



Para los botones utilize este codigo.

Código (vb) [Seleccionar] Expandir

Private Sub CmdMov_Click(Index As Integer)
    Select Case Index
        Case 0
            RSTIdentifi.MoveFirst
            MsgBox "Principio de la Lista", vbCritical, "Reparaciones"
        Case 1
            RSTIdentifi.MovePrevious
            If RSTIdentifi.BOF Then
                RSTIdentifi.MoveFirst
            End If
        Case 2
            RSTIdentifi.MoveNext
            If RSTIdentifi.EOF Then
                RSTIdentifi.MoveLast
            End If
        Case 3
            RSTIdentifi.MoveLast
            MsgBox "Final de la Lista", vbCritical, "Reparaciones"
    End Select
End Sub

Espero su ayuda Salu2..

[ssccaann43 ©]

Comentanos como conectas el datacombo,

Fijate... El data combo tiene 2 propiedades importantes que deberías tomar en cuenta...

.BoundText : Que es para identificar el ID de la tabla que le asignes.
.Text : Que muestra el resultado de la consulta que cargues en la tabla.

Ahora bien, conociendo estas propiedades puedes utilizar el .boundtext para mover el datacombo o seleccionar uno de sus registros asignados.

Saludos