Access et Visual Basic

Fermé

gilles - 11 juil. 2007 à 15:20
freto Messages postés 1543 Date d'inscription vendredi 6 juillet 2007 Statut Membre Dernière intervention 8 avril 2016 - 12 juil. 2007 à 09:26

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

A voir également:

Access et Visual Basic
Visual basic - Télécharger - Langages
Microsoft 365 basic - Accueil - Microsoft Office
Visual petanque - Télécharger - Sport
Microsoft visual c++ runtime - Guide
Visual paradigm - Télécharger - Gestion de données

5 réponses

Réponse 1 / 5

freto Messages postés 1543 Date d'inscription vendredi 6 juillet 2007 Statut Membre Dernière intervention 8 avril 2016 162
11 juil. 2007 à 15:36

Bonjour
Change le AfterUpdate par un LostFocus

Réponse 2 / 5

freto Messages postés 1543 Date d'inscription vendredi 6 juillet 2007 Statut Membre Dernière intervention 8 avril 2016 162
11 juil. 2007 à 15:43

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??

gilles
11 juil. 2007 à 16:00

je veux afficher son résultat ...

Réponse 3 / 5

freto Messages postés 1543 Date d'inscription vendredi 6 juillet 2007 Statut Membre Dernière intervention 8 avril 2016 162
11 juil. 2007 à 16:10

Alors dans ce cas, il faudrait pluto mettre ceci

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)

gilles
11 juil. 2007 à 16:31

Merci beaucoup, ca marche :)
seulement maintenant comment faire pour qu'au lieu du id=90, la condition id doit etre egal à la valeur de texte0 ?

Réponse 4 / 5

freto Messages postés 1543 Date d'inscription vendredi 6 juillet 2007 Statut Membre Dernière intervention 8 avril 2016 162
11 juil. 2007 à 16:34

Private Sub Texte0_LostFocus() 
Me.texte1.Value = DLookUp("[jour]","[saisie1]", "[id]='" & Texte0.Value &"'")
End Sub

Voili voilou

gilles
11 juil. 2007 à 17:51

merci beaucoup

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question

Réponse 5 / 5

freto Messages postés 1543 Date d'inscription vendredi 6 juillet 2007 Statut Membre Dernière intervention 8 avril 2016 162
12 juil. 2007 à 09:26

Pb résolu???

Discussions similaires

Site de confiance ou non ?

Microsoft Visual C++ ? C'est quoi ?

C'est quoi le runtime Access ?

Acer quick access