Come programmare Microsoft Access con Visual Basic

Microsoft Access è il programma di database della suite Microsoft Office . Gli sviluppatori di personalizzare questa suite da scrivere programmi nel linguaggio di programmazione Visual Basic, Applications Edition (VBA ) . Accesso alla programmazione comporta l'uso di VBA per creare e manipolare oggetti di database , comprese le relazioni , tabelle, query e maschere di immissione dati . Ad esempio , VBA può popolare automaticamente il campo " di genere" in una forma per l'inserimento di informazioni abbonati rivista , quando la persona che utilizza il modulo entra nomi comuni nel campo " Nome". Accesso alla programmazione ti dà la possibilità di rendere l'immissione di dati e attività di recupero più facile per gli utenti della tua squadra. Cose che ti serviranno
Microsoft Access
Mostra più istruzioni
1

Open Access e premere il tasto "Alt - F11 " per entrare nell'ambiente di codifica (chiamata " IDE " per " ambiente di sviluppo integrato " ) per l'accesso .
2

Clicca voce del menu "Inserisci" "Modulo" per creare una nuova finestra per l'immissione del codice .
3

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

Sub makeATable ( ) per

Dim db As Database , td Come TableDef , f Come Campo

Set db = CurrentDb

Set tbl = dbs.CreateTableDef ( " userinfo " ) per

Set fld = tbl.CreateField ( "Nome " , dbText ) per

tbl . Fields.Append
f

dbs.TableDefs.Append tb

' dbs.TableDefs.Refresh

End Sub
4

Eseguire il programma da cliccando su qualsiasi dichiarazione in esso e premendo il tasto " F5 ".
5

Premete "Alt - F11 " per tornare all'interfaccia principale di accesso , quindi fare clic su pulsante "<<" del pannello di navigazione , quindi il suo pulsante ">>" . Vedrete una nuova tabella creata dal programma. Leggi ulteriori informazioni sulla creazione di tabelle con VBA sulla pagina MSDN pagina " Creare ed eliminare tabelle " .
6

digitare un campione alcuni primi nomi della nuova tabella di fornire i dati per la query VBA viene creare prossima
7

Premi " Alt- F11 " per tornare all'ambiente di codifica e incolla questo nuovo sub-routine sotto il primo che hai scritto : .

pubblico makeQuery sub ( )

Dim db As DAO.Database

Dim qd Come DAO.QueryDef

Dim str As String

Set db = CurrentDb

on Error GoTo DontDelete

db.QueryDefs.Delete " QUSER "

DontDelete :

str = "SELECT * FROM userinfo ; "

qd = db.CreateQueryDef ( " QUSER " , str ) per

End sub
8

eseguire il nuovo sub-routine come avete fatto il primo, per poi tornare ad Access e cercare il nuovo interrogare il codice creato. Si chiama " . QUSER "
9

doppio clic su " QUSER " per eseguire la query . L'accesso consente di visualizzare tutti i nomi inseriti nella tabella " userinfo " .
10

Creare un report facendo clic sulla voce " userinfo " nel pannello di navigazione , quindi facendo clic su "Report" sulla barra degli strumenti . Potrai scrivere un programma VBA che filtra il rapporto per un valore specifico immesso nel passaggio 6 .
11

destro fare clic sulla scheda del nuovo rapporto e selezionare " visualizzazione struttura ". Fare clic sulla freccia rivolta verso il basso nel caso in "On Load " della della scheda " Evento" del rapporto a destra dello schermo . Questa azione consente di tornare al VBA .
12

Incollare il seguente codice nell'IDE . Sostituire il testo " PARTICOLARE " con un particolare valore immesso nel passaggio 6 .

Report_Load Private Sub ( ) per

Me.Filter = " Nome = " " PARTICOLARE " " "

Me.FilterOn = True

End Sub
13

eseguire il report con il tasto" Alt- F11 "per tornare alla Access, clic destro sulla scheda del report e selezionare " Report View " . L'accesso verrà visualizzato il report , che mostra solo il record immesso per il filtro nel passaggio 12 . Per saperne di più sull'utilizzo di VBA con le relazioni sulla pagina Report Access.