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

  1. #1
    Membre à l'essai
    Profil pro
    Inscrit en
    Septembre 2002
    Messages
    14
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Septembre 2002
    Messages : 14
    Points : 12
    Points
    12
    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
    Modérateur
    Avatar de ProgElecT
    Homme Profil pro
    Retraité
    Inscrit en
    Décembre 2004
    Messages
    6 077
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 68
    Localisation : France, Haute Savoie (Rhône Alpes)

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

    Informations forums :
    Inscription : Décembre 2004
    Messages : 6 077
    Points : 17 180
    Points
    17 180
    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
    Soyez sympa, pensez -y
    Balises[CODE]...[/CODE]
    Balises[CODE=NomDuLangage]...[/CODE] quand vous mettez du code d'un autre langage que celui du forum ou vous postez.
    Balises[C]...[/C] code intégré dans une phrase.
    Balises[C=NomDuLangage]...[/C] code intégré dans une phrase quand vous mettez du code d'un autre langage que celui du forum ou vous postez.
    Le bouton en fin de discussion, quand vous avez obtenu l'aide attendue.
    ......... et pourquoi pas, pour remercier, un pour celui/ceux qui vous ont dépannés.
    👉 → → Ma page perso sur DVP ← ← 👈

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

    Informations forums :
    Inscription : Septembre 2002
    Messages : 14
    Points : 12
    Points
    12
    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, 13h49
  2. Defilement automatique dans un jlabel
    Par fr.johan dans le forum Interfaces Graphiques en Java
    Réponses: 3
    Dernier message: 12/10/2007, 15h55
  3. Defilement automatique d'une liste
    Par TheReturnOfMuton dans le forum Général JavaScript
    Réponses: 5
    Dernier message: 07/09/2007, 11h59
  4. Defilement automatique images
    Par masseur dans le forum Général JavaScript
    Réponses: 3
    Dernier message: 15/03/2007, 11h49
  5. Defilement automatique pour un diaporama
    Par Paniez dans le forum Général JavaScript
    Réponses: 8
    Dernier message: 11/12/2005, 10h26

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