Abfragen von Daten aus einer Datenbank-Tabelle mit Platzhalterzeichen in Microsoft Access ist nicht so schwer wie Sie vielleicht denken. In Access können Sie Visual Basic für Applikationen (VBA) , um Prozesse wie Abfragen von Daten automatisieren. In VBA können Sie bauen SQL-Anweisungen , um eine Tabelle abfragen, um Werte , die ein Muster von Ihnen angegebenen Übereinstimmung zu finden . Der "Like "-Operator kann in SQL-Anweisungen verwendet werden, um ein Kriterium wie "Like" D * " ", die alle Feldwerte mit dem Anfangsbuchstaben D. Things You
Nordwind
brauchen zurückkehren angeben
anzeigen Weitere Anweisungen
1
Klicken Sie auf " Database Tools ", klicken Sie " Visual Basic ", und klicken Sie auf das Menü "Einfügen" . Klicken Sie auf " Module" , um einen neuen Code-Modul einfügen
2
Erstellen Sie eine neue Sub-Prozedur , indem Sie die folgenden Schritte aus: .
Private Sub useLikeCommand ()
3
Deklarieren Sie die Variablen Sie verwenden, um eine Datenbank-Tabelle abgefragt werden indem Sie den folgenden VBA-Code : Dim
DataString As String Dim dbs
As Database Dim
rst als Recordset
Dim X As Integer
Set dbs = CurrentDb
4
Definieren Sie die Zeichenfolge der SQL-Anweisung übergeben wird :
DataString = " A * "
5
Geben Sie den folgenden Code, um ein Recordset mit einer SQL-Anweisung , die den Like-Operator verwendet öffnen:
Set rst = dbs.OpenRecordset ( "SELECT Mitarbeiter . [ Nachname ] , Mitarbeiter . [ Vorname ] "_
& " FROM Employees "_
& " WHERE ((( Employees. [ Vorname ] ) Like ' " & ( DataString ) & " ')) ;")
6
erstellen Sie eine " For ... Loop" , um die Ergebnisse der Abfrage mit dem Direkt-Fenster wieder anzuzeigen :
rst . MoveFirst
Für X = 0 To
Debug.Print rst.Fields rst.RecordCount ( " [ Vorname ]"). Wert
Debug.Print rst.Fields ( " [ Nachname ] " ) Wert
rst.MoveNext
Weiter X
7
Beenden Sie Ihre Vorgehensweise , indem Sie den folgenden Code : .
< p > rst.Close
dbs.Close
End Sub
8
Drücken Sie "Strg " und " G" , um das Direkt-Fenster . Drücken Sie "F5" um die Prozedur auszuführen .
