|
Microsoft Office Access est un système de gestion de base de données relationnelle inclus dans la suite Microsoft Office . Visual Basic pour Applications ( VBA) est utilisé pour automatiser des tâches de routine dans les applications Microsoft Office . Les programmeurs vont parfois dans la nécessité de mettre à jour la valeur d'un enregistrement spécifique dans une table de programmation. En quelques étapes, vous pouvez écrire du code VBA de mettre à jour un enregistrement dans une table. Instructions
1 Sélectionnez " Database Tools ». Cliquez sur " Visual Basic " pour ouvrir la fenêtre " Microsoft Visual Basic " .
Créer un nouveau sous en tapant " editRecordSet Private Sub ()" et appuyez sur "Entrée".
2 tapez la commande suivante pour créer vos variables et définir la base de données actuelle :
sqlstr Dim As String
rst As Recordset
Dim dbs As Database
Set dbs = CurrentDb
3 Tapez la commande suivante pour créer une nouvelle table :
SQLString = " CREATE tABLE editRecord ( f_name TEXTE, L_Name ) "
DoCmd.SetWarnings Faux
DoCmd.RunSQL ( SQLString )
4 tapez la commande suivante pour ajouter trois enregistrements de données à la table :
strsql = " INSERT EN VALEURS editRecord ( 'Sebastian ', ' PUGA ') "
DoCmd.RunSQL ( strsql )
strsql = " INSERT INTO VALUES editRecord ( «Maria» , « GONZALEZ ')" < br > DoCmd.RunSQL ( strsql )
strsql = "INSERT INTO VALUES editRecord ( 'John ', ' LOPEZ ')"
DoCmd.RunSQL ( strsql )
< br > 5 Tapez la commande suivante pour interroger la table et renvoyer tous les records :
Set rst = dbs.OpenRecordset ("SELECT * FROM editRecord editRecord . " )
6 tapez la commande suivante pour passer à enregistrer le numéro trois et mettre à jour le champ " f_name " à " JUAN ":
Set rst = dbs.OpenRecordset ("SELECT * FROM editRecord editRecord . " )
rst . Move ( 2) Photos rst.Edit
rst.Fields ( " f_name " ) . Value = " JUAN "
rst.Update
7 Tapez la commande suivante pour fermer le jeu d'enregistrement et libérer la variable " DBS " de la mémoire : DBS
rst.Close
Set = Nothing
Appuyez sur " F5" pour exécuter votre nouveau sous-programme.
|
