Dans ta barre de défilement (appelée aussi HScroll1 ou VScroll pour une barre Horizontale ou Verticale), remplis les 3 champs suivants (propriétés) : Min, Max, Value.
Dans l'évènement Scroll_change(), met :
Text1.Text=Scroll.Value
Voila. Maintenant soit ton utilisateur entrera un nombre soit il le sélectionnera avec la barre.