Comment faire descendre l'ascenseur ou scrollbar pour une textbox

Soyez le premier à donner votre avis sur cette source.

Vue 11 670 fois - Téléchargée 713 fois

Description

Un petit exemple sur comment faire descendre l'Ascenseur d'une TextBox :
  • etre en MULTILINE
  • SCROLLBAR en Vertical
  • Utiliser SELSTART


J'arrivais pas à touver alors je medis que quelqu'un en aura peut-être besoin...

Source / Exemple :


Option Explicit
'
'
'************************************************
'
' Ce petit Prog montre coment
' faire descendre l'ascenseur sur
' la fin d'un texte en utilisant "SelStart"
'
'************************************************
'
'
Private Sub Check1_Click()
    Montre_Fin_Texte
End Sub

Private Sub Command1_Click()
    AjouteTexte "Du texte en plus..."
End Sub

Sub Montre_Fin_Texte()
    If Check1.Value = 1 Then Text1.SelStart = Len(Text1.Text) Else Text1.SelStart = 1
End Sub

Sub AjouteTexte(Texte As String)
    Text1.Text = Text1.Text + Texte + vbCrLf + vbCrLf
    Montre_Fin_Texte
End Sub

Codes Sources

A voir également

Ajouter un commentaire Commentaires
Messages postés
36
Date d'inscription
mardi 25 janvier 2005
Statut
Membre
Dernière intervention
28 juin 2008

Meme 4 ans apres ca marche toujours !

C'est assez fiable l'informatique finalement :-)

Merci pour la soucre.
Messages postés
9
Date d'inscription
jeudi 12 septembre 2002
Statut
Membre
Dernière intervention
28 mars 2011

Merci encore,
J'utilisais Text1.SelStart = Text1.SelLenght qui ne fonctionnait pas.
Messages postés
13
Date d'inscription
lundi 12 avril 2004
Statut
Membre
Dernière intervention
24 février 2005

et un an après cela, ca sert encore....

merci a toi louisvbfrance, je viens d'economiser, 1 boite de doliprane
@+
Messages postés
19
Date d'inscription
jeudi 27 mars 2003
Statut
Membre
Dernière intervention
17 juin 2004

Bien joué et pratique dans le cadre de la creation d'un client irc
Messages postés
321
Date d'inscription
dimanche 22 octobre 2000
Statut
Membre
Dernière intervention
14 mai 2005
2
Extrèmement simple mais efficasse...
Bien joué...

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.