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 Microsoft Office. I programmatori a volte incontrano la necessità di aggiornare il valore di un record specifico in una tabella di programmazione. In pochi passi è possibile scrivere codice VBA per aggiornare un record in una tabella . Istruzioni
1
Seleziona " Strumenti database . " Fare clic su " Visual Basic " per aprire la finestra "Microsoft Visual Basic " .
Creare una nuova sotto digitando " editRecordSet Private Sub ( ) " e premere " Invio".
2
digitare quanto segue per creare le variabili e impostare il database corrente :
Dim sqlstr As String
Dim rst come Recordset
Dim dbs As Database
dbs = CurrentDb
3
digitare quanto segue per creare una nuova tabella :
sqlstring = " CREATE tABLE editRecord ( F_Name TESTO , L_Name TESTO ) "
< p > DoCmd.SetWarnings False
DoCmd.RunSQL ( SqlString ) economici 4
digitare quanto segue per aggiungere tre record di dati alla tabella :
strSQL = "INSERT INTO editRecord VALUES ( 'Sebastian ', ' PUGA ') "
DoCmd.RunSQL ( strSQL ) per
strSQL =" INSERT INTO editRecord VALUES ( 'Maria ', ' GONZALEZ ') " < br >
DoCmd.RunSQL ( strSQL ) per
strSQL = " INSERT INTO editRecord VALUES ( 'John ', ' LOPEZ ') "
DoCmd.RunSQL ( strSQL ) per < br > 5
digitare quanto segue per interrogare la tabella e restituire tutti i record :
Set rst = dbs.OpenRecordset ( "SELECT * FROM editRecord editRecord . " ) economici 6
digitare il comando seguente per passare a registrare il numero tre e aggiornare il campo " F_Name " a " JUAN " :
Set rst = dbs.OpenRecordset ( "SELECT * FROM editRecord editRecord . " ) per
RST . Move ( 2)
rst.Edit
rst.Fields ( " F_Name " ) . Value = " JUAN "
rst.Update
7
digitare quanto segue per chiudere il record stabilito e rilasciare la variabile " dbs " a memoria :
rst.Close
Set dbs = Nothing
Premere " F5 " per eseguire il tuo nuovo sottoprogramma.
