October 5
Saper aggiornare i dati in una query in Microsoft Office Access utilizzando Visual Basic, Applications Edition (VBA) consente di risparmiare tempo quando si ha bisogno di aggiornare continuamente i dati in tabelle. Access è un sistema di gestione di database relazionali comunemente usato per i database locali più piccoli. Una query viene utilizzato per visualizzare i dati in una tabella di database. VBA è un linguaggio di programmazione utilizzato per automatizzare le attività di routine in Access.
1 Avviare Microsoft Office Access, selezionare "Database Tools" e cliccare su "Visual Basic". Selezionare il menu "Inserisci", quindi su "Modulo".
2 Copia e incolla il seguente codice nel modulo:
Private Sub updateQuery ()
db fioco come base di dati
Dim rst come Recordset
Dim SqlString As String
Dim rstCnt As Integer
Set db = CurrentDb
SqlString = "CREATE TABLE tableToUpdate (primo testo, ultimo testo)"
DoCmd.SetWarnings False
DoCmd.RunSQL (SqlString)
strSQL = "INSERT INTO VALORI tableToUpdate ( 'Oscar', 'Gonzalez')"
DoCmd.RunSQL (strSQL)
strSQL = "INSERT INTO VALORI tableToUpdate ( 'Kitzia', 'Ramos')"
DoCmd.RunSQL (strSQL)
strSQL = "INSERT INTO VALORI tableToUpdate ( 'John', 'Smith')"
DoCmd.RunSQL (strSQL)
strSQL = "INSERT INTO VALORI tableToUpdate ( 'Anna', 'Williams')"
DoCmd.RunSQL (strSQL)
Set rst = db.OpenRecordset ( "SELECT * FROM tableToUpdate tableToUpdate;").
rst.MoveLast
rst.MoveFirst
Per rstCnt = 0 Per rst.RecordCount - 1
If rst.Fields(0).Value = "Oscar" Then
rst.Edit
rst.Fields (0) .Value = "Emilio"
rst.Update
Finisci se
rst.MoveNext
Successivo rstCnt
End Sub
3 Premere il tasto "F5" per eseguire la subroutine "updateQuery". La subroutine crea una nuova tabella, inserisce nuove righe di dati, interroga la tabella creata e aggiorna il primo campo.