Visual Basic für Applikationen ( VBA) ist ein Computer- Programmiersprache, die von Microsoft entwickelt und verwendet werden, um Routineaufgaben in Access automatisieren. Access ist ein relationales Datenbank- Management-System in der Microsoft Office-Suite enthalten. A Structured Query Language (SQL) Abfrage wird verwendet, um Daten aus einer Datenbank -Tabelle abzurufen. Die Ausgabe der Ergebnisse einer SQL-Abfrage durch eine Recordset-Objekt abgerufen. In wenigen Schritten können Sie VBA-Code schreiben , um eine SQL-Abfrage erstellen und die Datensätze abgerufen werden. Anleitung
1
Öffnen Sie die Nordwind Microsoft Office Access-Datenbank. Die Nordwind-Datenbank wird der Microsoft Office-Suite enthalten.
2
Klicken Sie auf " Database Tools ", dann wählen Sie " Visual Basic ", um den Microsoft Visual Basic -Fenster zu öffnen . Klicken Sie auf " Insert "-Feld und wählen Sie " Module".
3
Kopieren Sie den folgenden Code in das neue Modul an den Vornamen und geschäftliche Telefonnummer in der "Kunde" Tabelle anzeigen :
private Sub customerquery () Dim
strSQL As String Dim
custRst Als Recordset Dim dbs
As Database Dim
rstCntr As Integer Dim
custStr As String Set dbs
= CurrentDb
strSQL = "SELECT Kunden . [ Vorname ] , "
strSQL = strSQL & "Die Kunden [ Business Phone ] . "
strSQL = strSQL & " FROM Customers ; "
Set custRst = dbs.OpenRecordset ( strSQL )
custRst.MoveLast
custRst.MoveFirst
rstCntr = 0 To custRst.RecordCount - 1 of
custStr = custStr & custRst.Fields (0) Value & _
" ist . Kunde und ihre Business-Handy ist "& custRst.Fields (1). Value & vbCr
custRst.MoveNext
Weiter rstCntr
MsgBox custStr
custRst.Close
dbs.Close
End Sub
4
Führen Sie Ihre Subroutine mit der Taste " F5 ".