Microsoft Access 2007 è il programma di database di Windows con l'interfaccia grafica di query. Esecuzione di query su database di Access 2007 offre agli utenti la possibilità di recuperare e filtrare i dati, calcolare i totali di dati numerici e automatizzare aggiornare i record del database o la cancellazione. Le funzioni di query di Access si basano sul linguaggio di query SQL. Il Visual Basic, Applications Edition (VBA) supporta le istruzioni SQL nelle funzioni VBA. Esso consente agli utenti di eseguire una query sul database Access 2007 utilizzando il controllo VBA.

istruzione

1 Fare clic sul pulsante "Start" di Windows e selezionare il "Microsoft Office", "Visual Basic for Applications (VBA)".

2 Fare clic su "Apri" e selezionare il controllo VBA del rapporto su cui si desidera modificare l'ordinamento.

3 Aggiungere il seguente codice dopo la riga "CurrentDb.Execute strSQL" nella query VBA:

On Error GoTo err_handler

Dim strSQL As String

strSQL = "SELECT

Nome sbqryAdmitDeals.lt" &

"SbqryAdmitDeals.FullName, sbqryAdmitDeals.RoleLeadFK" & CDate (Format (Now (), "data breve")) - [RepRecd] come giorni, 2 AS IDOrdine

"In" [tuo nome variabile]

"DA sbqryAdmitDeals"

"DOVE sbqryAdmitDeals.RoleLeadFK) ="

DoCmd.SetWarnings False

DoCmd.RunSQL strSQL

DoCmd.SetWarnings vero

ExitMySubName:

Exit Sub

err_handler:

DoCmd.SetWarnings True

MsgBox Err.Description, vbExclamation, "Numero di errore:" & Err.Number

Riprendi ExitMySubName

End Sub

4 Fare clic sul comando "Creazione guidata Query" sul nastro di accesso.

5 Inserire la seguente query nel campo di testo:

SELEZIONE sbqryAdmitDeals.lt_name CDate (Format (Now (), "Short Date") - [RepRecd] come giorni, 2 AS IDOrdine IN mtblFSRcvd

DA sbqryAdmitDeals

WHERE ((sbqryAdmitDeals.RoleLeadFK) = [Forms] [frmReports] [cboPrimaryContact]!!);

6 Fare clic sul pulsante "Esegui" per eseguire la query sul database di Access 2007 utilizzando il controllo VBA.