CÓDIGO PARA LOS BOTONES PRIMERO-SIGUIENTE-ANTEROR -ÚLTIMO Y SALIR

Para que los siguientes códigos te funcionen, debes primero cambiar el nombre a los botones así:

El botón   se llamará cmdprimero

El botón   se llamará cmdsiguiente

El botón  se llamará cmdanterior
El botón   se llamará cmdultimo

El botón   se llamará cmdnuevo

El botón  se llamará cmdeditar

El botón se llamará cmdeliminar

El botón     se llamará cmdguardar

El botón se llamará cmdsalir

El botón    se llamará   cmdbuscar

Ahora  copia los siguientes códigos en la ventana de codigo:

Private Sub cmdanterior_Click()
Adodc1.Recordset.MovePrevious
If Adodc1.Recordset.BOF Then
   Adodc1.Recordset.MoveFirst
End If
End Sub


Private Sub cmdprimero_Click()
Adodc1.Recordset.MoveFirst
End Sub


Private Sub cmdsalir_Click()
End
End Sub

Private Sub cmdsiguiente_Click()
Adodc1.Recordset.MoveNext
If Adodc1.Recordset.EOF Then
   Adodc1.Recordset.MoveLast
End If
End Sub

Private Sub cmdultimo_Click()
Adodc1.Recordset.MoveLast
End Sub