Wissen, wie man Visual Basic in Access 2007 verwenden kann Ihnen große Flexibilität bei der Entwicklung von Datenbank-Anwendungen. Access 2007 bietet Ihnen die Möglichkeit zur Verbesserung Ihrer Entwicklung geben Ihnen die Möglichkeit, Visual Basic -Code für die Formulare und Steuerelemente Sie erstellt schreiben. Visual Basic ist eine Programmiersprache, die von Microsoft erstellt und es ist einfach zu bedienen. Sie können ganz einfach in Visual Basic Erstellen von Berichten in einer Access-Datenbank oder sich wiederholende manuelle Aufgaben zu programmieren. Anleitung
1

Klicken Sie auf " Erstellen" Registerkarte in Access und wählen Sie " Form Design . " Das Programm erstellt ein neues Formular. Wählen Sie die "Button" -Steuerung im Rahmen der " Controls" klicken und mit der Maus über das neue Formular. Linke Maustaste und erstellen Sie die neue Schaltfläche . Fügen Sie eine "List Box" -Steuerelement dem Formular auf die gleiche Weise hinzugefügt die Taste.
2

rechten Maustaste auf das Listenfeld und wählen Sie "Eigenschaften". Auf der "Property Blatt , " auf der Registerkarte "Daten" und wählen Sie im Dropdown- Feld auf " Row Source Type " und wählen Sie " Value List ".
3

der rechten Maustaste auf auf die neue Schaltfläche , und wählen Sie "Eigenschaften". Auf der Registerkarte " Eigenschaften" auf der Registerkarte "Ereignis" und wählen Sie im Dropdown-Feld auf "On Click" und wählen Sie " [Event Procedure] . " . Klicken Sie auf den Schalter (... ) und ein neues Microsoft Visual Basic öffnet
4

Geben Sie den folgenden :

Dim dbs As Database Dim

rst als Recordset

Dim X As Integer Dim

strSQL As String Dim

lastFirst As String

Variablen zu erklären, die Sie verwenden .

5

Typ:

Set dbs = CurrentDb

um die aktuelle Datenbank festgelegt

Typ: .

strSQL = " CREATE TABLE Tabelle1 ( Vorname TEXT ( 25) , Nachname TEXT ( 25) ); . "

DoCmd.RunSQL ( strSQL )

um eine neue Tabelle in der Datenbank mit dem Namen erstellen " Tabelle1 "

6

Typ:

strSQL = " INSERT INTO Tabelle1 ( [Vorname ], [ Nachname] ) "

strSQL = strSQL & " VALUES (' John ', ' Smith ' ); . "

DoCmd.SetWarnings Falsch

DoCmd.RunSQL ( strSQL )

um die erste Zeile der Daten einfügen
7

Typ :

strSQL = " INSERT INTO Tabelle1 ( [Vorname ], [ Nachname] ) "

strSQL = strSQL & " VALUES (' Jaime ', ' Avelar '); "
< . p> DoCmd.SetWarnings Falsch

DoCmd.RunSQL ( strSQL )

um eine zweite Reihe von Daten einfügen
8

Typ:

Set rst = dbs.OpenRecordset ( "Tabelle1 " )

den Datensatz gesetzt

Typ: .

rst.MoveFirst

Für X = 0 Um rst.RecordCount - 1 of

lastFirst = Trim ( . rst.Fields ( "Nachname " ) Value) & "" & Trim ( rst.Fields ( " . Vorname " ) Value)

List1.AddItem lastFirst

rst.MoveNext

Weiter X

eine Schleife durch die Datensätze, die Sie gerade erstellt haben, und zeigt sie in der Liste Feld auf das Formular.

9

Typ:

MsgBox "Sie haben alle Datensätze in Tabelle 1 angezeigt, um erfolgreich box Liste " , vbInformation

eine Meldung angezeigt . Schalten Fenster zurück zu Access 2007 , und klicken Sie auf "Ansicht" , um das Formular auszuführen . Klicken Sie auf " Command0 "-Button und Sie werden das Listenfeld Anzeige der Namen zu sehen.