IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

VB 6 et antérieur Discussion :

TextBox et defilement automatique


Sujet :

VB 6 et antérieur

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre averti
    Profil pro
    Inscrit en
    Septembre 2002
    Messages
    14
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Septembre 2002
    Messages : 14
    Par défaut 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.

  2. #2
    Expert confirmé
    Avatar de ProgElecT
    Homme Profil pro
    Retraité
    Inscrit en
    Décembre 2004
    Messages
    6 132
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 69
    Localisation : France, Haute Savoie (Rhône Alpes)

    Informations professionnelles :
    Activité : Retraité
    Secteur : Communication - Médias

    Informations forums :
    Inscription : Décembre 2004
    Messages : 6 132
    Par défaut
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    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
    :whistle:pourquoi pas, pour remercier, un :plusser: pour celui/ceux qui vous ont dépannés.
    saut de ligne
    OOOOOOOOO👉 → → Ma page perso sur DVP ← ← 👈

  3. #3
    Membre averti
    Profil pro
    Inscrit en
    Septembre 2002
    Messages
    14
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Septembre 2002
    Messages : 14
    Par défaut
    Merci ProgElecT,

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

    Jeff.

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. defilement automatique des items d'une listbox
    Par vinowan dans le forum Windows Forms
    Réponses: 5
    Dernier message: 31/03/2009, 14h49
  2. Defilement automatique dans un jlabel
    Par fr.johan dans le forum Interfaces Graphiques en Java
    Réponses: 3
    Dernier message: 12/10/2007, 16h55
  3. Defilement automatique d'une liste
    Par TheReturnOfMuton dans le forum Général JavaScript
    Réponses: 5
    Dernier message: 07/09/2007, 12h59
  4. Defilement automatique images
    Par masseur dans le forum Général JavaScript
    Réponses: 3
    Dernier message: 15/03/2007, 12h49
  5. Defilement automatique pour un diaporama
    Par Paniez dans le forum Général JavaScript
    Réponses: 8
    Dernier message: 11/12/2005, 11h26

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo