Microsoft Office Access ist ein relationales Datenbank -Management-System in der Microsoft Office-Suite enthalten. Visual Basic für Applikationen ( VBA) wird verwendet, um Routineaufgaben in Microsoft Office-Anwendungen automatisieren. Programmierer manchmal in die Notwendigkeit, den Wert eines bestimmten Datensatz in einer Tabelle programmgesteuert aktualisieren laufen . In wenigen Schritten können Sie VBA-Code schreiben , um einen Datensatz in einer Tabelle zu aktualisieren. Anleitung
1

Wählen Sie " Database Tools. " Klicken Sie auf " Visual Basic " , die "Microsoft Visual Basic "-Fenster zu öffnen.

Erstellen Sie eine neue Sub durch Eingabe von " Private Sub editRecordSet ()" und drücken Sie "Enter".
2

Geben Sie den folgenden Ihre Variablen zu erstellen und die aktuelle Datenbank :

Dim sqlstr As String Dim rst

Als Recordset Dim dbs

As Database

Set dbs = CurrentDb
3

Geben Sie den folgenden , um eine neue Tabelle zu erstellen :

SqlString = " CREATE TABLE editRecord ( F_NAME TEXT , TEXT L_Name ) "
< p > DoCmd.SetWarnings Falsch

DoCmd.RunSQL ( SqlString )
4

Geben Sie den folgenden drei Sätze von Daten in die Tabelle einzufügen :

strsql = " INSERT INTO editRecord VALUES (' SEBASTIAN ', ' PUGA ') "

DoCmd.RunSQL ( strsql )

strsql =" INSERT INTO editRecord VALUES ( 'Maria ', ' GONZALEZ ') "

DoCmd.RunSQL ( strsql )

strsql = " INSERT INTO editRecord VALUES (' JOHN ', ' LOPEZ ') "

DoCmd.RunSQL ( strsql )
< br > 5

Geben Sie den folgenden , um die Tabelle abfragen und alle Rekorde :

Set rst = dbs.OpenRecordset ( "SELECT * FROM editRecord editRecord . " )
6

Geben Sie den folgenden zu bewegen, um die Nummer drei erfassen und aktualisieren Sie die " F_NAME " Feld " JUAN ":

Set rst = dbs.OpenRecordset ( "SELECT * FROM editRecord editRecord . " )

rst . Move ( 2)

rst.Edit

rst.Fields ( " F_NAME " ) . Value = " JUAN "

rst.Update
7

Geben Sie den folgenden auf die Record- Set zu schließen und die " DBS " Variable aus dem Speicher :

rst.Close

Set dbs = Nothing

Presse "F5" Ihr neues Unterprogramm auszuführen.