Discussion :

[pqboot]

Bonjour à tous

j'ai crée une nouvelle Form dans laquelle j'ai ajouté une Scroolbar verticale (VScrollBar1) et un Label (Label1).

J'ai initialisé la Scrollbar avec ce code :

Code :

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

1
2
3
4
5
6
Me.VScrollBar1.Height = 300
 
        Me.VScrollBar1.Minimum = 0
        Me.VScrollBar1.Maximum = 100
        Me.VScrollBar1.SmallChange = 1
        Me.VScrollBar1.LargeChange = 1

J'ai ajouté ce code dans l'evenement "_Scroll" de la Scrollbar :

Code :

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

Me.Label1.Text = Me.VScrollBar1.Value

Quand je "scroll" la Scroolbar avec la souris, le Label m'affiche sa valeur.
Mais je ne peux aller que de 1 à 99. Ce n'est que lorsque je lache le bouton
de la souris qu'il se positionne soit à 0 soit à 100.
En fait il fait ça pour toutes les valeurs intermediaires.
Si je lache le bouton à 52 alors que j'allai vers le maximum, il incremente la valeur
et ça devient 53.
Si je lache le bouton à 38 alors que j'allai vers le minimum, il décremente la valeur
et ça devient 37.
Du coup je dois anticiper la valeur que j'obtiendrai quand je lacherais le bouton,
selon si je baisse ou j'augmente la valeur lol

[chrismonoye]

Bonjour
l'événement "ValueChanged" à la place de l'événement "Scroll" devrait répondre à votre attente.

[pqboot]

Bonjour
l'événement "ValueChanged" à la place de l'événement "Scroll" devrait répondre à votre attente.

@chrismonoye Effectivement ça fonctionne beaucoup mieux.
Merci pour l'info.
J'avais pas essayé car je pensais que l'évènement "_ValueChanged" était déclenché seulement lorsqu'on
affectait une valeur à la propriété ".Value". Je ne pensais pas que l'évènement était déclenché
en continu.