Discussion :

[fredtes35]

Bonjour


Je voudrais placer des LEDS rouges/vertes dans mon Userform. Ce n'est pas possible avec la boîte à outils par défaut. Quel est le contrôle à ajouter pour les obtenir?

Merci

[EvaristeGaloisBis]

a brule pour point, je ferais ceci mettre une image et jouer sur l'évenement onclick pour passer de l'une a l'autre...
mais après coté code je ne sarais te dire comment procéder.
Bon courage

[EvaristeGaloisBis]

En essayant de faire le bout de code qui modifie l'image par l'evenement click, je bute sur le fait de modifier l'image dans l'objet image.
Je tritouille avec la propriété picture et la méthode render mais je n'arrive pas a modifier les images qu'il contient avec un chemin.
Est ce quelqu'un aurait une idée?

[Gorfael]

En essayant de faire le bout de code qui modifie l'image par l'evenement click, je bute sur le fait de modifier l'image dans l'objet image.
Je tritouille avec la propriété picture et la méthode render mais je n'arrive pas a modifier les images qu'il contient avec un chemin.
Est ce quelqu'un aurait une idée?

Salut
Modifier une image par code n'est jamais facile.
Il est nettement plus simple de supperposer 2 images (Led_V, Led_R
et sur la macro qui doit les faire évoluer, de mettre un code du style

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
if "réultat vert" then
 me.Led_V.visible = true
 me.Led_R.visible = false
else
 me.Led_V.visible = false
 me.Led_R.visible = true
end if

A+

[EvaristeGaloisBis]

oui mais ça alourdit un peu en espace mémoire, et en ressource...

j'ai essayé un truc bourrin mais ça marche pas

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

image1.picture=loadpicture(chemin & fichier)

je ne comprends pas pourquoi...
ça peut paraitre bete de ne pas appliquer ta méthode mais en fait savoir faire ce que je désire me permettra de réutiliser ce petit point pour d'autres choses derrieres.