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.
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.