Come impostare il Recordset DAO in Visual Basic

Microsoft Office Access 2007 è un'applicazione di database relazionale incluso nella suite Microsoft Office . Microsoft Data Access Objects ( DAO ) è un interfaccia utilizzata per accedere ai dati da database di Access . Visual Basic, Applications Edition (VBA ) è un linguaggio di programmazione per computer utilizzato per automatizzare i processi di routine effettuati nelle applicazioni Microsoft Office . Utilizzare la Northwind database predefinito 2007 incluso in tutte le versioni di Access , per visualizzare l'ultimo Codice di prodotto dalla tabella Prodotti tramite un Recordset . Istruzioni
1

Aprire il database " Northwind 2007 " , selezionare " Strumenti di database ", quindi su " Visual Basic ". Fare clic sul menu "Inserisci" , quindi selezionare "Modulo ".
2

Copia e incolla il seguente codice nel tuo modulo :

Private Sub DAOSub ( ) per

dim db As DAO.Database

dim rst Come DAO.Recordset

Set db = CurrentDb

Set rst = db.OpenRecordset ( "Prodotti" , dbOpenDynaset ) per

Se rst.RecordCount > 0 Then

rst.MoveLast

MsgBox ( rst! [ Codice di prodotto] ) per

End If

rst . Chiudi

db.Close

End Sub
3

Premere " F5 " per eseguire la subroutine .

• Come scrivere un file in Visual Basic 6 
• Programmazione in MS Access 2007