Access et Visual Basic
gilles
-
freto Messages postés 1543 Date d'inscription Statut Membre Dernière intervention -
freto Messages postés 1543 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
Sur access, j'ai un formulaire qui possede deux champs textes "Texte0" et "Texte1".
Quand je change quelque chose dans le champ "Texte0", je veux qu'il m'affiche un résultat dans "Texte1" .
Mais mon code sous Visual basic ne marche pas :
Private Sub Texte0_AfterUpdate()
Me.texte1 = select jour from saisie1 where id = 90
End Sub
Comment résoudre mon problème ?
Merci d'avance
Sur access, j'ai un formulaire qui possede deux champs textes "Texte0" et "Texte1".
Quand je change quelque chose dans le champ "Texte0", je veux qu'il m'affiche un résultat dans "Texte1" .
Mais mon code sous Visual basic ne marche pas :
Private Sub Texte0_AfterUpdate()
Me.texte1 = select jour from saisie1 where id = 90
End Sub
Comment résoudre mon problème ?
Merci d'avance
A voir également:
- Access et Visual Basic
- Visual basic - Télécharger - Langages
- Visual basic editor - Télécharger - Langages
- Visual petanque - Télécharger - Sport
- Microsoft 365 basic - Accueil - Microsoft Office
- Visual c++ 2019 - Guide
5 réponses
tu veux exécuter une requete et afficher le résultat dans la zone de texte, ou juste afficher la requete dans la zone de texte??
Alors dans ce cas, il faudrait pluto mettre ceci
Je ne vois pas l'utilité du id=90 mais bon...c'est toi qui vois après
Sinon, il se peut que tu aie a changer le nom des champs entre [] pour qu'il correspondent à ceux de ta table, sinon il va te sortir une jolie erreur
Le champs texte1 ne sera modifié que lorsque tu cliquera dessus, ou sur un autre controle (autre que texte0)
Private Sub Texte0_LostFocus()
Me.texte1.Value = DLookUp("[jour]","[saisie1]", "[id]=90")
End Sub
Je ne vois pas l'utilité du id=90 mais bon...c'est toi qui vois après
Sinon, il se peut que tu aie a changer le nom des champs entre [] pour qu'il correspondent à ceux de ta table, sinon il va te sortir une jolie erreur
Le champs texte1 ne sera modifié que lorsque tu cliquera dessus, ou sur un autre controle (autre que texte0)
Private Sub Texte0_LostFocus()
Me.texte1.Value = DLookUp("[jour]","[saisie1]", "[id]='" & Texte0.Value &"'")
End Sub
Voili voilou
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
