Microsoft Access ist die Datenbank-Programm in der Microsoft Office-Suite . Entwickler gestalten diese Suite durch das Schreiben von Programmen in seine Programmiersprache Visual Basic für Applikationen ( VBA) . Programmierung Zugriff beinhaltet die Verwendung von VBA zu erstellen und zu manipulieren Datenbank-Objekte , einschließlich der Berichte , Tabellen, Abfragen und Eingabemasken . Zum Beispiel kann VBA automatisch das "Gender" -Feld in einem Formular zur Eingabe Magazin Teilnehmer Informationen , wenn die Person mit dem Formular gemeinsamen Namen in der "Vornamen" eingibt . Programmierung Zugang gibt Ihnen die Möglichkeit, Daten - Eingabe und Abruf Aufgaben einfacher machen für Ihr Team der Nutzer . Things You
Microsoft Access
brauchen anzeigen Weitere Anweisungen
1

Open Access und drücken Sie " Alt- F11 ", um die Codierung Umwelt (die so genannte "IDE " für Kraft " integrierte Entwicklungsumgebung " ) für Access.
2

Klicken Sie auf das Menü "Einfügen" die "Module" Artikel um ein neues Fenster für die Eingabe von Code zu erstellen.
3 < p

Sub makeATable () Dim db

As Database , td Wie TableDef , f Als Field Of <: > in das Code-Fenster das folgende Programm -Code, der eine Tabelle erstellt mit VBA einfügen p> Set db = CurrentDb

Set tbl = dbs.CreateTableDef ( " Userinfo " )

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

tbl. Fields.Append f

dbs.TableDefs.Append tb

' dbs.TableDefs.Refresh

End Sub
4

Führen Sie das Programm durch Maustaste auf eine Aussage in ihr und die Taste " F5 ".
5

Presse "Alt -F11 ", um zum wichtigsten Access-Schnittstelle zurückzukehren, klicken Sie dann auf den Navigationsbereich die Schaltfläche "<<" , dann seine Schaltfläche ">>" . Du wirst sehen, eine neue Tabelle von Ihrem Programm erstellt . Lesen Sie weitere Informationen über das Erstellen von Tabellen mit VBA auf der MSDN- Seite " Erstellen und Löschen von Tabellen "-Seite .
6

Typ ein paar Probe Vornamen in der neuen Tabelle , um Daten für die VBA Abfrage Sie bereitstellen möchten erstellen nächsten
7

Presse "Alt -F11 ", um die Codierung Umgebung zurückzukehren und fügen Sie diese neue Sub- Routine unter dem ersten Sie schrieb : .

Public Sub makeQuery ()

Dim db Wie DAO.Database

Dim qd Wie DAO.QueryDef

Dim str As String

Set db = CurrentDb

On Error GoTo DontDelete

db.QueryDefs.Delete " quser "

DontDelete :

str = " SELECT * FROM Userinfo ; "

Set qd = db.CreateQueryDef ( " quser " , str )

End Sub
8

Führen Sie die neue Sub- Routine , wie Sie das erste tat , dann wieder zu gehen und sich für den neuen abzufragen Code erstellt . Es ist " quser . "
9

Doppelklicken Sie auf " quser " aufgerufen, um die Abfrage auszuführen. Access zeigt alle Namen, die Sie in der " Userinfo " eingetragen.
10

Erstellen Sie einen Bericht , indem Sie auf " Userinfo " Artikel im Navigationsbereich , klicken Sie auf " Report" auf der Symbolleiste. Sie schreiben ein VBA- Programm, das den Bericht filtert für einen bestimmten Wert, den Sie in Schritt 6 eingegeben .
11

rechten Maustaste auf den neuen Bericht auf die Registerkarte , und wählen Sie "Design- Ansicht . " Klicken Sie auf den nach unten zeigenden Pfeil in der " On Load "-Ereignis des des Berichts "Event "-Reiter am rechten Bildschirm . Diese Aktion führt Sie zu den VBA -IDE.
12

Fügen Sie folgenden Code in die IDE zurückzukehren. Ersetzen Sie den Text " " mit einem bestimmten Wert, den Sie in Schritt 6 eingegeben .

Private Sub Report_Load ()

Me.Filter = " firstName =" " "" "

Me.FilterOn = True End Sub

13

Führen Sie den Bericht mit der Taste" Alt- F11 ", um Zugang zurückkehren, mit der rechten Maustaste auf die Registerkarte des Berichts und der Auswahl " Report anzeigen . " Access wird den Bericht an , die nur den Datensatz Sie für den Filter in Schritt 12 eingegeben zeigen. Lesen Sie mehr über die Verwendung von VBA mit Berichten auf dem Access Reports Seite .