Microsoft Access è il programma di database in Microsoft Office suite. Gli sviluppatori di personalizzare questa suite di programmi di scrittura nel suo linguaggio di programmazione Visual Basic for Applications (VBA). Accesso di programmazione prevede l'utilizzo di VBA per creare e manipolare oggetti di database, inclusi report, tabelle, query e maschere di immissione dati. Ad esempio, VBA può compilare automaticamente il campo di "gender" in un modulo per l'immissione di informazioni sugli abbonati rivista, quando la persona utilizzando il modulo nomi comuni che entra nel campo "nome". Accesso di programmazione vi dà la possibilità di semplificare le attività di immissione dati e recupero per gli utenti della tua squadra.

Istruzioni

1

Aprire Access e premere "Alt-F11" per entrare nell'ambiente di codifica (chiamato "IDE" per "ambiente di sviluppo integrato") per l'accesso.

2

Fare clic sulla voce "Modulo" del menu "Inserisci" per creare una nuova finestra per l'immissione di codice.

3

Incollare nella finestra del codice il seguente codice di programma, che crea una tabella con VBA:

Sub makeATable()

Dim db As Database, td come oggetto TableDef, f come campo

Set db = CurrentDb

Impostare tbl = dbs. CreateTableDef("Userinfo")

Impostare fld = tbl. CreateField ("firstName", dbText)

TBL. Fields. Append f

DBS. TableDefs tb

' dbs. TableDefs

End Sub

4

Eseguire il programma cliccando su qualsiasi istruzione in esso e premere "F5".

5

Premere "Alt-F11" per tornare all'interfaccia di accesso principale, quindi fare clic su riquadro di spostamento "<<" pulsante, allora la sua ">>" pulsante. Vedrete una nuova tabella creata dal programma. Leggi ulteriori informazioni sulla creazione di tabelle con VBA nella pagina MSDN pagina "creare ed eliminare tabelle".

6

Digitare alcuni nomi di primo esempio nella nuova tabella per fornire dati per la query VBA che si creerà successivamente.

7

Premere "Alt-F11" per tornare all'ambiente di codifica e incollare questa nuova Sub-routine sotto il primo che hai scritto:

Public Sub makeQuery()

Dim db As DAO. Database

Dim qd As DAO. QueryDef

Dim str As String

Set db = CurrentDb

Su errore GoTo DontDelete

DB. QueryDefs.Delete "qUser"

DontDelete:

Str = "selezionare * da Userinfo;"

Impostare qd = db. CreateQueryDef ("qUser", str)

End Sub

8

Eseguire la nuova Sub-routine come hai fatto quella prima, quindi tornare ad Access e cercare la nuova query il codice creato. Si chiama "qUser."

9

Fare doppio clic "qUser" per eseguire la query. Verranno visualizzati tutti i nomi che hai inserito nella tabella "Userinfo".

10

Creare un report facendo clic l'elemento "Userinfo" nel riquadro di spostamento, quindi su "Report" sulla barra. Che scriverete un programma VBA che filtra il rapporto per un determinato valore che immesso nel passaggio 6.

11

Pulsante destro del mouse sulla scheda del report e selezionare "Visualizzazione struttura". Fare clic sulla freccia rivolta verso il basso nell'evento "Il carico" della della scheda "Eventi" del report a destra dello schermo. Questa azione si ritorna all'IDE di VBA.

12

Incollare il codice seguente nell'IDE. Sostituire il testo "< immettere il valore di una particolare riga >" con un particolare valore che immesso nel passaggio 6.

Private Sub Report_Load()

Me.Filter = "firstName =""< Immettere valore di una particolare riga >" ""

Me.FilterOn = True

End Sub

13

Eseguire il report premendo "Alt-F11" per tornare all'accesso, cliccando col tasto destro sulla scheda del report e selezionando "Visualizzazione rapporto." Verrà visualizzato il report, che vi mostrerà solo il record che immesso per il filtro nel passaggio 12. Per saperne di più sull'utilizzo di VBA con report nella pagina report di Access.