Informations dans une textbox séparées par ","

z980x Messages postés 897 Date d'inscription jeudi 6 juin 2002 Statut Membre Dernière intervention 26 juillet 2007 - 16 juin 2003 à 12:04
z980x Messages postés 897 Date d'inscription jeudi 6 juin 2002 Statut Membre Dernière intervention 26 juillet 2007 - 16 juin 2003 à 18:14
Salut à tous !

Je voudrais savoir comment faire pour stocker plusieures informations sur une même ligne pour ensuite les relire dans differentes textbox.

Exemple :

"Hello","World"
(ca dans un fichier texte)

Je voudrais, quand je clique sur un bouton par exemple, que hello aille dans une textebox et world dans une autre textebox...

Comment faire SVP?

Merci bcp à celui qui saura me répondre...

8 réponses

Delbeke Messages postés 200 Date d'inscription jeudi 19 décembre 2002 Statut Membre Dernière intervention 18 novembre 2005
16 juin 2003 à 12:10
Personellement j'utilise le caractère | (le chr$(124) ce qui donne

strtemp="Premier element|Deuxeieme element |trois..."

ensuite pour accéder aux éléements, je fait

dim Tble as variant
tble=split(strtemp,"y")

on obtient alors un tabeau (qui commence à l'indice zéro) on peut alors accèder à chacun des élements

ex :

for iPnt = 0 ti uBound(Tble)-1
debug.print Tble(ipnt)
next

Jean-Luc
0
z980x Messages postés 897 Date d'inscription jeudi 6 juin 2002 Statut Membre Dernière intervention 26 juillet 2007 2
16 juin 2003 à 12:33
je suis désolé mais je n'ai absolument rien compris du tout !

Mais je crois pourtant que c'ets hyper simple.

Tu voies en fait la premier element comme tu l'as appelé est une chaine d'une listbox et le deuxieme element est dans une textebox. (qui change quand on clique sur la listbox...)

AIDEZ MOI SVP !
0
pcpunch Messages postés 1243 Date d'inscription mardi 7 mai 2002 Statut Membre Dernière intervention 18 février 2019 5
16 juin 2003 à 12:33
pour ecrire ds un fichier txt
dim a,b as string
a="Hello"
b="toto"
open "c:\fichier.txt" for append as #1
write #1,a,b
close #1

ensuite pour le lire

dim a,b,tmp as string
open "c:\fichier.txt" for input as #1
do while not eof(1) 'boucle jusqu a la derniere ligne
input#1,a,b
tmp=tmp & a & vbcrlf & b & vbcrlf
close #1
loop

msgbox tmp
0
z980x Messages postés 897 Date d'inscription jeudi 6 juin 2002 Statut Membre Dernière intervention 26 juillet 2007 2
16 juin 2003 à 14:28
pcpunch, ta méthode ne marche pas comme je le voudrais.
Et delbeke, je ne comprends pas du tout ce que tu m'as dis !

Merci quand meme pour votre aide... Mais je croyais que ca allait etre plus simple...
Voila !
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
Delbeke Messages postés 200 Date d'inscription jeudi 19 décembre 2002 Statut Membre Dernière intervention 18 novembre 2005
16 juin 2003 à 15:18
Apparement on est dans un quiprocco. essaye de préciser !d'ou viennentt les info "Hello" et "Word" par exemple
Jean-Luc
0
z980x Messages postés 897 Date d'inscription jeudi 6 juin 2002 Statut Membre Dernière intervention 26 juillet 2007 2
16 juin 2003 à 15:35
Va voir la pour comprendre :
http://www.vbfrance.com/forum.aspx?Article=69886
Voila !
0
Delbeke Messages postés 200 Date d'inscription jeudi 19 décembre 2002 Statut Membre Dernière intervention 18 novembre 2005
16 juin 2003 à 16:39
si tu ne cmoprends pas c'est que pcpunch est moi n'avons probablement pas bien compris ton problème.
essaye d'expliquer davantage.

Jean-Luc
0
z980x Messages postés 897 Date d'inscription jeudi 6 juin 2002 Statut Membre Dernière intervention 26 juillet 2007 2
16 juin 2003 à 18:14
merci les gras, mais on m'a répondu...
Allez voir l'adresse que je vous ai donnée.
C'ets mieux expliquée et il y a la réponse...
Voila !
0
Rejoignez-nous