Afficher plusieurs éléments dans un textbox [Résolu]

Signaler
Messages postés
19
Date d'inscription
mardi 21 juin 2011
Statut
Membre
Dernière intervention
22 juillet 2011
-
p62p
Messages postés
19
Date d'inscription
mardi 21 juin 2011
Statut
Membre
Dernière intervention
22 juillet 2011
-
Bonjour

j'ai une petite question. Voila je développe une petite appli en VB6 pour mon entreprise. Je souhaite mettre dans un textbox toute les valeur que j'ai dans ma liste
sachant que aujourd'hui je peux avoir 3 élements dans la liste et demain 5 et aprés demain 2.
Car la liste est alimenté par une base de données.
j'ai essayer
while rs.eof=false
me.text1=rs.fields("mon champs")
rs.movenext
wend
mais il m'affiche dans mon textbox que le dernier éléments de la liste (alors que moi je veux afficher tout les éléments de ma liste dans un seul textbox)
je sais pas comment faire, est ce que quelqu'un a une piste ? une idée ? un début d'idée ...?? parce que moi la je sais plus

3 réponses


Salut,
Ce serait plutôt :
me.text1 = me.text1 & rs.fields("mon champs") & vbcrlf

A bientôt
Messages postés
18038
Date d'inscription
lundi 7 décembre 2009
Statut
Modérateur
Dernière intervention
11 avril 2018
219
Bonjour,

ou encore, utiliser de cette manière, qui évite de reprendre à chaque insertion ce qui est déjà inséré par les insertions précédentes et permet d'accroître la vitesse de traitement :
Text1.Text = ""
Text1.SelText = "donnée1"
Text1.SelText = vbCrLf & "donnée2"
Text1.SelText = vbCrLf & "donnée3"

Ne pas oublier, dans un cas comme dans l'autre, de mettre à True la propriété multiline de la textbox d'accueil.


____________________
Utiliser le bouton "REPONSE ACCEPTEE" sur une réponse exacte facilite les recherches ultérieures d'autres forumeurs. PENSEZ-Y SVP
Messages postés
19
Date d'inscription
mardi 21 juin 2011
Statut
Membre
Dernière intervention
22 juillet 2011

ok merci de votre aide ^^ c'est sympa
probleme résolu ^^