Discussion :

[maniolo]

Bonjour à tous, j'ai regardé un peu partout sur le net mais je n'ai rien trouvé concernant l'utilisation de scrollbar dans un form.
Est-il possible d'en utiliser dans un label, lorsque j'essaye de faire défiler mon texte, il disparait et à la place j'ai un nombre qui apparait, j'imagine que cela est peut etre dû au fait que j'attribue la valeur du scrollbar au contenu textuel du label?

Code :

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

1
2
3
4
5
6
7
8
 
Private Sub VScroll1_Change()
Me.lblInfo.Caption = VScroll1.Value
End Sub
 
Private Sub VScroll2_Change()
Me.lstInfo.Text = VScroll2.Value
End Sub

[jmfmarques]

Voilà qui devrait t'aider à comprendre et à adapter à ta guise :

Une Form et un cadre Frame1
Dans le cadre : un label Label1
Hors du cadre : une scrollbar vscroll1

Donne à ton label une hauteur plus grande que celle du cadre

code :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Private Sub Form_Load()
  Frame1.BorderStyle = 0
  Label1.Top = 0
  With VScroll1
    .Min = 0
    .Max = Label1.Height
    .SmallChange = 10
  End With
End Sub
 
Private Sub VScroll1_Change()
  Label1.Move Label1.Left, -VScroll1.Value
End Sub
 
Private Sub VScroll1_Scroll()
 VScroll1_Change
End Sub

Lance... vois... et comprends

[maniolo]

J'essayerais ce soir n'ayant pas vb au boulot, je me permets de ne pas mettre le post en résolu pour l'instant mais ton exemple est très clair, Merci beaucoup !