Wie VBA Abfrageergebnisse Zugang

Mitglieder-Login

InformationenVisual Basics Programmierung

Wie Sie das SQL Query String in VB6… Wenn Sie Computerprogramme erstellen in Visual Basic 6 ( VB6 ) Programmiersprache , können Sie Daten
. Wie die Windows- Logon in XP mit … Obwohl die Microsoft NET Framework bietet keine Low-Level- Zugriff auf den Systemspeicher oder das B
ActiveX Control Tutorial Microsoft ActiveX-Steuerelemente sind Komponenten, die die Funktionalität von Anwendungen und Websit
Wie die Anzahl der ausgewählten Da… Visual Basic ermöglicht Entwicklern eine standardisierte Datei-Auswahl und Öffnen-Dialog für die Nut

Programming

HOME

* Computer Wissen >> Programming >> Visual Basics Programmierung >> .

Wie VBA Abfrageergebnisse Zugang

Wissen, wie man die Ergebnisse aus einer Microsoft Access-Abfrage lesen kann Ihnen helfen, Ihre Access-Anwendung dynamischer. Access ist Teil der Microsoft Office Suite und es wird benutzt, um relationale Datenbanken zu erstellen. Visual Basic für Applikationen ( VBA) können in Access verwendet werden, um Windows-Anwendungen zu erstellen und abzurufen Daten in der Datenbank . Eine Abfrage wird unter Verwendung von Structured Query Language (SQL )-Anweisungen , um Informationen aus einer Datenbank anfordern. Things You
Microsoft Office Access 2007
brauchen anzeigen Weitere Anweisungen
1

Starten Sie Microsoft Office Access 2007 und wählen Sie " Blank -Datenbank", klicken Sie dann auf " Erstellen". Klicken Sie auf " Database Tools " und wählen Sie " Visual Basic. " Klicken Sie auf " Insert "-Feld und wählen Sie " Module" .

Typ "Private Sub readQueryResults " und drücken Sie "Enter" , um eine neue Subroutine erstellen.
2

Geben Sie den folgenden zu erklären Variablen, die Sie verwenden, um die Ergebnisse der Abfrage lesen :

Dim RecordSt Als Recordset

Dim dBase As Database Dim

stringSQL As String Dim

RCNT As Integer
3

Geben Sie den folgenden , um die " CityTbl " Tabelle zu erstellen :

stringSQL = " CREATE TABLE CityTbl (Stadt TEXT ( 25) , Bundesland TEXT ( 25) ); "

DoCmd.RunSQL ( stringSQL )
4

Geben Sie den folgenden zwei neue Einträge auf den Zusatz" CityTbl " Tabelle :

stringSQL =" INSERT INTO CityTbl ( [City ], [ State] ) "

stringSQL = stringSQL & " VALUES (' Fort Worth ', ' Texas '); "

DoCmd.SetWarnings Falsch

DoCmd.RunSQL ( stringSQL )

stringSQL = " INSERT INTO CityTbl ( [City ], [ State] ) "

stringSQL = stringSQL & " VALUES (' Dallas ', ' Texas '); "

DoCmd.SetWarnings Falsch

DoCmd.RunSQL ( stringSQL )
5

Geben Sie den folgenden zu definieren Ihrer Abfrage, und öffnen Sie Ihre Recordset:
< p > stringSQL = "SELECT * FROM CityTbl CityTbl ; . "

Set RecordSt = dBase.OpenRecordset ( stringSQL )
6

Geben Sie den folgenden ein " For-Schleife " zu schaffen und zeigen Sie Ihre Abfrage-Ergebnisse durch eine Message-Box :

RecordSt.MoveFirst

RCNT = 0 To RecordSt.RecordCount

MsgBox ( RecordSt.Fields ( "City" ) Value & " . , " & RecordSt.Fields ( " State " ) . Value)

RecordSt.MoveNext

Weiter RCNT

Presse " F5 ", um die Subroutine auszuführen.