|
Microsoft Access possède un langage de script Visual Basic pour Applications ( VBA) , que vous pouvez utiliser pour effectuer des opérations de base de données comme sélectionner et mettre à jour les requêtes. Les programmes VBA qui effectuent ces opérations font avec des objets virtuels , y compris ceux qui représentent la base de données actuelle , enregistrements , définitions de requêtes et d'autres éléments de base de données . Faire mises à jour ou tout autre type d' opération de base de données dans VBA consiste à comprendre comment gérer ces objets , qui sont collectées dans une hiérarchie arborescente appelée le «modèle de l'objet. " Effectuer des requêtes de mise à jour avec Visual Basic permet aux développeurs de modifier le contenu de base de données rapidement et avec moins de risques d'erreur de l'utilisateur. Choses que vous devez
Microsoft Access
Voir Plus Instructions
1 Open Access et créer l'exemple de tableau qui suit, votre programme Visual Basic va faire une opération de mise à jour sur : créer un champ " Champ1 " dans un tableau appelé "Table1 ", puis tapez un enregistrement dans ce domaine : " . xyz"
2 Appuyez sur " Alt- F11 " pour entrer dans l'environnement de développement intégré Visual Basic (IDE) , puis cliquez sur la commande "Module" du menu "Insertion " . Cette action permettra de créer un nouvel espace pour la saisie d'un programme VB
3 collez ou tapez le programme suivant dans le module de code : .
Public Sub doUpdate () Photos Const tabName = " Table1"
Dim DBS DAO.Database
rst As DAO.Recordset
Set dbs = CurrentDb
< p> Set rst = dbs.OpenRecordset ( tabName )
rst.MoveFirst
Do Until rst.EOF
Si rst ! Champ1 = " zxy " Alors
< p> rst.Edit
rst ! Champ1 = "abc"
rst.Update
rst.Close
dbs.Close
Exit Sub End If
rst.MoveNext
boucle
End Sub
la déclaration " OpenRecordset " ouvre la "Table1 " table de modification, et définit une référence à cette table avec la« variable rst " . Le bloc d'instructions qui commence par " Do Until » et se termine par «boucle» se déplace à travers les données «RST» , recherche d'un enregistrement dont la valeur est « xyz ». Le programme utilise la fonction "Editer " et les méthodes " à jour " de "rst " pour changer la valeur de ce dossier , une fois qu'il trouve le dossier "xyz" .
4 Lancez le programme en cliquant sur l'une de ses déclarations, puis en appuyant sur la touche "F5 ". Appuyez sur " Alt-F8 " pour retourner à l'accès . Vous verrez la valeur «xyz» que vous avez entré précédemment changé au mode «abc ».
5 Presse "Alt- F8 " pour revenir à l'IDE. Tapez les nouvelles déclarations suivantes après la dernière instruction "Dim " dans la liste de programme :
f = InputBox ( "Quelle valeur voulez-vous chercher " )
v = InputBox (" Quel valeur voudriez-vous changer pour ? " )
Ces déclarations interroger l'utilisateur pour une valeur à rechercher, et une nouvelle valeur pour changer .
6 type sur la déclaration «Si rst Champ1 = " zxy "puis" avec cette nouvelle déclaration :
si la TVD Champ1 = f Puis
cette déclaration et celle de la prochaine étape sera d'utiliser la nouvelle « f ! "et" V "variables pour trouver et mettre à jour l'enregistrement correct dans le tableau
7 type sur la déclaration . " rst Champ1 = " abc " " avec cette déclaration :
rst ! Champ1 = v
8 exécuter le programme comme vous l'avez fait à l'étape 4 . Répondez aux invites quand apparaissent alors , en tapant "abc" pour la valeur à rechercher, et "xyz" pour la valeur à changer pour . Le programme révisé va changer le "abc " à " xyz ".
|
