TextBox et defilement automatique

Bonjour à tous,

J'utilise Visual Basic 6.
Voilà, je developpe une petite application où se trouve une fenêtre de log. Pour cela, j'utilise une TextBox, où je rajoute à la queue la nouvelle donnée.
Mon problème, c'est qu'une fois que le texte à dépassé "le bas du contrôle" TextBox, il s'affiche "en dessous", c'est à dire qu'il faut utiliser l'ascenseur vertical pour le voir.
Existe-il un moyen simple de forcer l'ascenseur à pointer vers le bas, c'est à dire à faire en sorte que le texte affiché soit celui contenu à la fin de la string du TextBox.
Merci d'avance à tous et bonne fin d'après midi,
Jeff.

Code:

---

1 2 3 4 5 6 7 8 9 10

Option Explicit   Private Sub Command1_Click() Text1.Text = Text1.Text & vbCrLf & "ajoute une ligne" Text1.SelStart = Len(Text1.Text)' <= c'est ça qui t'intéresses End Sub   Private Sub Form_Load() Text1.Text = "essais ascenseur et truc machin pour voir" End Sub

---

Merci ProgElecT,

ça marche ! Merci beaucoup pour l'astuce !
A bientôt,

Jeff.