Come impostare il valore di un record specifico in Access Visual Basic

November 10

Microsoft Office Access è un sistema di gestione di database relazionali incluso nella suite Microsoft Office. Visual Basic, Applications Edition (VBA) viene utilizzato per automatizzare le attività di routine in applicazioni di Microsoft Office. I programmatori a volte incontrano la necessità di aggiornare il valore di uno specifico record di una tabella di programmazione. In pochi passi è possibile scrivere codice VBA per aggiornare un record di una tabella.

istruzione

1 Selezionare "Strumenti di database." Fai clic su "Visual Basic" per aprire la finestra "Microsoft Visual Basic".

Creare un nuovo sub digitando "Private Sub editRecordSet ()" e premendo "Invio".

2 Digitare quanto segue per creare le variabili e impostare il database corrente:

Dim SQLStr As String

Dim rst come Recordset

DBS fiochi come database

Set dbs = CurrentDb

3 Digitare la seguente per creare una nuova tabella:

SqlString = "CREATE TABLE editRecord (F_Name TESTO, L_Name TESTO)"

DoCmd.SetWarnings False

DoCmd.RunSQL (SqlString)

4 Digitare la seguente per aggiungere tre record di dati alla tabella:

strSQL = "INSERT INTO editRecord VALORI ( 'SEBASTIAN', 'Puga')"

DoCmd.RunSQL (strSQL)

strSQL = "INSERT INTO VALORI editRecord ( 'Maria', 'GONZALEZ')"

DoCmd.RunSQL (strSQL)

strSQL = "INSERT INTO VALORI editRecord ( 'John', 'LOPEZ')"

DoCmd.RunSQL (strSQL)

5 Digitare quanto segue per interrogare la tabella e restituire tutti i record:

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

6 Digitare il seguente per passare al record di numero tre e aggiornare il campo "F_Name" a "JUAN":

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

rst.Move (2)

rst.Edit

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

rst.Update

7 Digitare quanto segue per chiudere il set di record e rilasciare la variabile "DBS" dalla memoria:

rst.Close

Set dbs = Nothing

Premere il tasto "F5" per eseguire la nuova subroutine.