OVH Cloud OVH Cloud

aide sur visual basic

3 réponses
Avatar
Valou
Bonjour,
Quelqu'un pourrait-il m'aider sur visual basic.
Me question est :
Je souhaite afficher automatiquement un montant dans un champ de formulaire
lorsque je clique sur une case à cocher.
Ex. je coche espèces qui doit me donner la valeur "55 €" dans le champ "prix"

3 réponses

Avatar
Gafish
Bonjour

Je souhaite afficher automatiquement un montant dans un champ de
formulaire lorsque je clique sur une case à cocher.
Ex. je coche espèces qui doit me donner la valeur "55 ?" dans le
champ "prix"


Sur l'évenement "sur clic" de ta case, avec taCase le nom de ta case et prix
le nom de ton champ prix

If Me.taCase = -1 then
Me.Prix = "55 ?"
Else
'si on décoche la case que fais tu ? tu remets à 0 ?

End If


--
Charte du forum : http://users.skynet.be/mpfa/
Recherche dans les archives :
http://groups.google.fr/group/microsoft.public.fr.access?hl=fr

Avatar
Valou
Merci pour ta réponse rapide mai hou là là suis toute nouvelle dans
l'utilisation de visual basic et j'ai pas bien compris, je t'envoie des
copies d'écran de mon forumaire :
http://img281.echo.cx/img281/5272/image17dk.jpg
http://img269.echo.cx/img269/4327/image28lt.jpg
http://img281.echo.cx/img281/7686/image33bl.jpg
C'est dans la 3ème image que je ne sais pas quoi mettre.
Si tu as msn voudrais-tu m'ajouter dans tes contacts pour que l'on puisse en
parler en direct ?
Merci



Bonjour

Je souhaite afficher automatiquement un montant dans un champ de
formulaire lorsque je clique sur une case à cocher.
Ex. je coche espèces qui doit me donner la valeur "55 ?" dans le
champ "prix"


Sur l'évenement "sur clic" de ta case, avec taCase le nom de ta case et prix
le nom de ton champ prix

If Me.taCase = -1 then
Me.Prix = "55 ?"
Else
'si on décoche la case que fais tu ? tu remets à 0 ?

End If


--
Charte du forum : http://users.skynet.be/mpfa/
Recherche dans les archives :
http://groups.google.fr/group/microsoft.public.fr.access?hl=fr






Avatar
Gafish
:
http://img281.echo.cx/img281/5272/image17dk.jpg
http://img269.echo.cx/img269/4327/image28lt.jpg
http://img281.echo.cx/img281/7686/image33bl.jpg
C'est dans la 3ème image que je ne sais pas quoi mettre.


Dans la troisième image, tu es pile au bon endroit, c'est déja une bonne
nouvelle.
Il ne te reste plus qu'à copier-coller à cet endroit le code que je t'ai
donné, pour mémoire :

If Me.taCase = -1 then
Me.Prix = "55 ?"
Else
'si on décoche la case que fais tu ? tu remets à 0 ?

End If

La dedans la seule chose que je ne sais pas c'est le traitement à faire
quand on décoche la case ? Dis le moi et je te mettrai le code adéquat.
Pour t'expliquer briévement et ne pas simplement te donner le code.
L'evenement sur clic sera déclenché dès que l'on cliquera sur ta case. Le If
permet de faire un test (si en anglais). Me correspond à l'objet en cours,
ici le formulaire, Me.taCase (dans ton cas ce sera donc Me.Espèces)
correspond à ta case, et on teste si elle est égale à -1 (-1 veut dire
cochée).
En ce cas on met 55? dans la zone prix, et sinon (else) à toi de me dire :)

--
Charte du forum : http://users.skynet.be/mpfa/
Recherche dans les archives :
http://groups.google.fr/group/microsoft.public.fr.access?hl=fr