codice:
Private Sub cmdNext_Click()
  On Error GoTo GoNextError

  If Not adoPrimaryRS.EOF Then adoPrimaryRS.MoveNext
  If adoPrimaryRS.EOF And adoPrimaryRS.RecordCount > 0 Then
    Beep
     'è stata superata la fine e quindi torna indietro
    adoPrimaryRS.MoveLast
  End If
  'visualizza il record corrente
  mbDataChanged = False

  Exit Sub
GoNextError:
  MsgBox Err.Description
End Sub

ciao raggazzi con questa sub scorro i vari recordset uno alla volta

domanda:
se volessi scorrere i record set no a passo uno come sopra ma passo 10

come dovrei fare ?