[AC-2007] Debug.print dans une zone de texte [Résolu]

[Triton972]

Bonjour à tous,

Je voudrais faire défiler des informations sur le déroulement de mon programme dans une zone de texte comme le ferait "Debug.print". Savez-vous faire ?
Cordialement,

[Philippe JOCHMANS]

Bonjour

D'abord il faudrait que tu expliques le code que tu utilises actuellement pour la visualisation par le Debug.Print dans la fenêtre exécution VB.

Il suffira à ce moment de mettre l'information dans la zone de texte et de cumuler celles-ci avec un code de ce type à chaque itération de ton programme :

Code :

1
2
Me.LaZoneDeTexte.Value = Me.LaZoneDeTexte.value & vbcrlf & LeTrucEnPlus
DoEvents

Philippe

[Triton972]

Bonjour Philippe,
Merci pour ta réponse.
Je pense que j'ai mal formulé ma demande ...
Mon objectif est d'alimenter un TextBox par des informations parcourues dans une boucle comme tu le proposes :

Code :

1
2
Me.LaZoneDeTexte.Value = Me.LaZoneDeTexte.value & vbcrlf & LeTrucEnPlus
DoEvents

Mais je voudrais, également, que lorsque le TexBoox est rempli (nb maxi de lignes affichées) le texte se décale vers le haut (suppression de la 1° ligne et affichage de la ligne n+1) afin que les dernières informations concaténées soient toujours lisibles. J'ai pris l'exemple du Debug.Print car c'est comme cela que les informations "défilent" dans la fenêtre de contrôle de l'exécution

[Philippe JOCHMANS]

Et en inversant :

Code :

1
2
Me.LaZoneDeTexte.Value = LeTrucEnPlus & vbcrlf & Me.LaZoneDeTexte.value 
DoEvents

Philippe

[Triton972]

Bonjour Philippe,


Simple, efficace, astucieux, spectaculaire. Génial tout simplement !
Ca défile vers le bas mais en fait ce n'est pas plus mal
Merci
@+