Concaténation

Concaténation - VB/VBA/VBS - Programmation

Marsh Posté le 01-04-2003 à 19:32:46    

Je voudrais concaténer un nom de champ de texte.
ex : Texte1, Texte2, Texte3, ... Texte60
Ceci dans une boucle FOR i=1 to 60
C pour alimenter automatiquement les 60 champs.
 
Comment concaténer Texte et i ?
 
par avance merci


---------------
Joy is not in what we own...it's in what we are
Reply

Marsh Posté le 01-04-2003 à 19:32:46   

Reply

Marsh Posté le 01-04-2003 à 19:43:00    


Pour résumer, ce que je voudrais obtenir :
 
[Texte&i] -> champ
i étant une variable incrémentée de 1, pour désigner
Texte1, Texte2,... Texte60.
 


---------------
Joy is not in what we own...it's in what we are
Reply

Marsh Posté le 01-04-2003 à 20:54:53    

Texte & Str(i)


---------------
J'ai un string dans l'array (Paris Hilton)
Reply

Marsh Posté le 01-04-2003 à 21:18:37    

Apparemment je n'arrive pas l'inclure :
ni dans l'expression Forms![Mon_Formulaire]!Texte&str(i)=tableau(1,1)
ni en faisant le schéma ci-dessous
 
 
'champ = zone de texte
dim champ as textbox
 
i = 1
champ = Texte & Str(i)
Forms![Mon_formulaire]!champ = tableau(1,1)


---------------
Joy is not in what we own...it's in what we are
Reply

Marsh Posté le 01-04-2003 à 21:23:17    

darkvinz2002 a écrit :

Apparemment je n'arrive pas l'inclure :
ni dans l'expression Forms![Mon_Formulaire]!Texte&str(i)=tableau(1,1)
ni en faisant le schéma ci-dessous
 
 
'champ = zone de texte
dim champ as textbox
 
i = 1
champ = Texte & Str(i)
Forms![Mon_formulaire]!champ = tableau(1,1)


Faut regarder la doc un peu :sarcastic:
"champ" fait référence à une classe de controle, qui possède des méthodes et propriétés, dont la propriété Text, qui contient le texte de ce champ, accessible en lecture et écriture.
Ce qui donne :
 
champ.Text = Texte & Str(i)
 
Si tu commences par faire ce genre d'erreur, c'est pas gagné...


---------------
J'ai un string dans l'array (Paris Hilton)
Reply

Marsh Posté le 01-04-2003 à 21:36:43    

Toujours le même message d'erreur :
"Variable objet ou variable de bloc With non définie"
 
Dsl de t'embêter mais t'as l'air de maîtriser  :D  alors je demande...


---------------
Joy is not in what we own...it's in what we are
Reply

Marsh Posté le 01-04-2003 à 21:39:32    

Quelle version de VB utilises tu ?


---------------
J'ai un string dans l'array (Paris Hilton)
Reply

Marsh Posté le 01-04-2003 à 21:41:30    

VB 6.0


---------------
Joy is not in what we own...it's in what we are
Reply

Marsh Posté le 02-04-2003 à 07:33:22    

essaye: champ.value= texte & i

Reply

Marsh Posté le 02-04-2003 à 07:45:29    

zavez rien compris :heink:
 
bon, d'abord, tu as une propriété Index pour chacun de tes champs, ben tu commences par y glisser un numéro de 1 à 60.  Ensuite, tu leur donnes tous le même nom, exactement le même.  Te voici alors avec un tableau de Textboxes.  Il ne te reste plus qu'à faire ta boucle:

Code :
  1. For i = 1 To 60
  2.   TonTextBox(i).Text = TaValeur
  3. Next i


---------------
Whichever format the fan may want to listen is fine with us – vinyl, wax cylinders, shellac, 8-track, iPod, cloud storage, cranial implants – just as long as it’s loud and rockin' (Billy Gibbons, ZZ Top)
Reply

Marsh Posté le 02-04-2003 à 07:45:29   

Reply

Marsh Posté le 04-04-2003 à 21:55:03    

je vois ce que tu veux dire mais le problème est qu'on ne peut pas nommer deux textbox de la même manière !


---------------
Joy is not in what we own...it's in what we are
Reply

Marsh Posté le 04-04-2003 à 22:12:58    

darkvinz2002 a écrit :

je vois ce que tu veux dire mais le problème est qu'on ne peut pas nommer deux textbox de la même manière !


Si, mais il faut en premier lieu que tu donnes des valeurs incrémentales à la propriété Index de chacune de tes textboxes (cfr mon précédent post), et ensuite seulement, tu peux leur donner le même nom à chacune.


---------------
Whichever format the fan may want to listen is fine with us – vinyl, wax cylinders, shellac, 8-track, iPod, cloud storage, cranial implants – just as long as it’s loud and rockin' (Billy Gibbons, ZZ Top)
Reply

Marsh Posté le 04-04-2003 à 22:20:50    

Salut Drasche c sympa de me répondre :)
 
J'ai juste une propriété Index Tabulation pour mes textbox, ils commencent par 1 et sont incrémetés de 1.


---------------
Joy is not in what we own...it's in what we are
Reply

Marsh Posté le 04-04-2003 à 22:27:34    

beuh? :heink:
 
on doit pas parler le même VB :D  Pourtant t'as bien dit VB6 plus haut, je comprends pas :??:
 
Je vois bien la propriété dont tu viens de parler et qui se nomme TabIndex sur mon VB6, et a priori il doit en être ainsi sur tous les VB6 (et même VB5).  J'ai du mal à comprendre comment elle pourrait s'appeler autrement chez toi.


---------------
Whichever format the fan may want to listen is fine with us – vinyl, wax cylinders, shellac, 8-track, iPod, cloud storage, cranial implants – just as long as it’s loud and rockin' (Billy Gibbons, ZZ Top)
Reply

Marsh Posté le 04-04-2003 à 23:20:00    

TabIndex = index tabulation c pareil je suppose  
 
J'ai la version FR VBA 6.0 Retail 8435 (version fournie par Access 2000 Pro)


---------------
Joy is not in what we own...it's in what we are
Reply

Marsh Posté le 06-04-2003 à 20:45:08    

drasche a écrit :

beuh? :heink:
 
on doit pas parler le même VB :D  Pourtant t'as bien dit VB6 plus haut, je comprends pas :??:


à ton avis, pourquoi je lui ai demandé sa version de VB ? c'est louche son truc !


---------------
J'ai un string dans l'array (Paris Hilton)
Reply

Marsh Posté le 06-04-2003 à 20:54:13    

text & trim(str(i))
 
si tu met pas trim, str te fout un espace ...

Reply

Marsh Posté le 07-04-2003 à 11:51:11    

darkvinz2002 a écrit :

Salut Drasche c sympa de me répondre :)
 
J'ai juste une propriété Index Tabulation pour mes textbox, ils commencent par 1 et sont incrémetés de 1.


 
 
Direct sur ton form,
tu fais ctrl+C sur ton champs text et tu le colles ailleurs, il va te proposer de créer un groupe de controle, tu dis oui, et voila tes champs text indexés totomatiquement


---------------
I drive at 88mph ! Just in case...
Reply

Marsh Posté le 07-04-2003 à 13:14:20    

darkvinz2002 a écrit :

J'ai la version FR VBA 6.0 Retail 8435 (version fournie par Access 2000 Pro)


c'est pas VB6 ton truc, c'est Access 2000, voilà pourquoi on n'a rien compris [:tapai]
 
je m'en doutais un peu d'ailleurs [:ddr555]


Message édité par drasche le 07-04-2003 à 13:14:48

---------------
Whichever format the fan may want to listen is fine with us – vinyl, wax cylinders, shellac, 8-track, iPod, cloud storage, cranial implants – just as long as it’s loud and rockin' (Billy Gibbons, ZZ Top)
Reply

Marsh Posté le 07-04-2003 à 14:07:19    

drasche a écrit :

je m'en doutais un peu d'ailleurs [:ddr555]


 :sarcastic:


---------------
J'ai un string dans l'array (Paris Hilton)
Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed