OVH Cloud OVH Cloud

realisation bargraph en remplissant rectancgle via VBA

1 réponse
Avatar
nicolas
bonjour,


j'ai une textbox dans laquel j'ai une valeur num=E9rique=20
comprise entre 0 et 100 inclu.

Comment faire pour avoir un rectangle (qui me servirai de=20
bargraph) qui se colore proportionellement =E0 ma=20
textbox.value

donc rectanggle vide si 0 =E0 moiti=E9 si 50 et ainsi de suite.


merci

1 réponse

Avatar
Hervé
Bonjour Nicolas,
Une idée parmi beaucoup d'autres.
Sur ta form mets 2 Labels.
Propriété Label1 :
BorderStyle à 1
BackColor à &H00FF0000& (bleu) à toi de voir
Caption à ""
Height à 18
Width à 102
Top et Left, à la place que tu souhaite
Propriété Label2 :
BorderStyle à 0
BackColor comme tu veux
Caption à ""
Height à 16
Width à 0
Top et Left, 1 de plus que pour le Label1
Tu peux aussi n'utiliser qu'un seul Label mais avec le 2ème qui sert de
cadre, ton utilisateur sait mieux où il en est.
Pour tester, mets un bouton toupie avec valeur mini à 0 et valeur maxi à 100
puis ce code dans le module de ta form :

Private Sub SpinButton1_Change()
Label2.Width = SpinButton1.Value
End Sub

Hervé.

"nicolas" a écrit dans le message
news: 187e801c44a8b$01c5b420$
bonjour,


j'ai une textbox dans laquel j'ai une valeur numérique
comprise entre 0 et 100 inclu.

Comment faire pour avoir un rectangle (qui me servirai de
bargraph) qui se colore proportionellement à ma
textbox.value

donc rectanggle vide si 0 à moitié si 50 et ainsi de suite.


merci