Mitglieder des Datenbank-Anwendung , Microsoft Access , manchmal Makros verwenden, um ihre Daten, einschließlich Löschen von Daten zu verwalten. Makros sind Programme in Visual Basic für Applikationen (VBA) geschrieben und können jede Aufgabe über Access ' Standard-Benutzeroberfläche getan automatisieren. Löschen von Daten mit VBA kann verschiedene Formen annehmen , je nachdem, ob die Daten gelöscht werden, eine ganze Spalte oder anderen Datenbank- Objekt ist. Löschen von Daten mit Makros - im Gegensatz zu manuellen Methoden gegenüber - spart Zeit und ist weniger fehleranfällig als die manuelle Löschung. Things You
Microsoft Access
brauchen anzeigen Weitere Anweisungen
1
Öffnen Sie Microsoft Access und erstellen Sie eine neue Datenbank , indem Sie " Strg- N ", gefolgt von einem Klick auf " Blank Datenbank. " Sie erstellen einen kleinen Tisch für diese Datenbank dann Makros verwenden, um Daten von ihm löschen.
2
Klicken Sie auf " Tabelle " unter dem Menü "Erstellen" , dann " ProductName " in der obersten Zeile der Tabelle Rasters zweiten Spalte . Typ " Preis " in der Zelle direkt auf der rechten Seite " ProductName . "
3
Geben Sie ein oder zwei Reihen von Sample-Daten in den Zellen unter den Spaltennamen Sie gerade eingegeben . Zum Beispiel, um Typ " Compressed Kohle " und " 1.98 " für eine Kunst-Versorgung- Tisch.
4
Presse "Control -S " und drücken Sie " OK" die Tabelle mit dem Standard- Namen speichern " Tabelle1 . "
5
Presse " Alt -F11 ", um VBA integrierte Entwicklungsumgebung ( IDE) eingeben und dann auf " Module " unter dem Menü" Einfügen " , um ein neues Fenster für die Eingabe Ihres Programms make makro Code.
6
Fügen Sie das folgende Programm in das Fenster . Dieses Programm funktioniert , indem Sie ein Recordset-Objekt von der aktuellen Datenbank. Die RecordSet auf der "Tabelle1 " Tabelle, die Sie in Schritt 4 abgeschlossen basiert. Die MoveFirst Verfahren (dh Funktion) der RecordSet bewegt den aktuellen Datensatz Zeiger auf die Tabelle der erste Datensatz ; . Die Delete-Methode löscht die ersten Datensatz
Public Sub DeleteRecord () Dim db
Wie DAO . Database
Dim rcset Wie DAO.Recordset
Dim str As String
db = CurrentDb
Set rcset Set = Sub
7
Führen Sie das Makro löschen , indem Sie auf jede ihrer Aussagen , dann die Taste "F5 ". Drücken Sie die " Alt- F11 ", um die Standard- Access-Benutzeroberfläche zurückzukehren, doppelklicken Sie dann auf die Schaltfläche " Tabelle 1 "-Symbol in Access im Navigationsbereich , die auf Bildschirm links ist . Access "Tabelle1 " zu zeigen, dass der erste Eintrag, den Sie in Schritt 3 eingegeben gelöscht öffnen.
8
Presse "Alt -F11 ", um das Makro -Code in der IDE zurückzukehren, dann fügen Sie die folgende neues Programm unter dem Vorjahreswert , die Sie geschrieben haben. Dieses Programm löscht die " Preis "-Feld aus der Tabelle , indem Sie die "Delete "-Methode von "Tabelle1 ".
Public Sub DeleteField () Dim db
Wie DAO.Database
< p> Dim rcset Wie DAO.Recordset
Dim myTab Wie TableDef
Set db = CurrentDb
myTab = db.TableDefs ( "Tabelle1 " )
< p Stellen > myTab.Fields.Delete ( " Preis " )
db.Close
End Sub
9
Führen Sie das Programm , wie Sie den vorherigen tat , und doppelklicken Sie "Tabelle1 " in der Navigationsleiste , um zu überprüfen , dass der "Preis" Feld gegangen ist .
