Bonjour, j'ais un souci d'adaptation avec vb. je fais tourner un for each et je voudrais recupérer tous les "ele.contenu" ensuite les affecté à des variables en fonction du nombre d'element retourner,mais je vois pas du tout comment faire ,un tableau? ou une list? et comment recupérer le contenu de la liste ou du tableau. strvar ="" For Each elem In ELEMENT1 strvar = elem.Contenu Next message1= strvar(1) message2= strvar(2) ... Merci de votre aide

Bonjour,

For each .... Next
sert à répéter des instructions pour chaque élément présent dans un groupe d'éléments (collection, array...)
et s'utilise ainsi :

For each element in groupe_d_elements
   '----------instructions de ton choix
  ' si tu veux "alimenter" une variable ou un tableau, c'est ici que tu le dis....
  'exemple : list1.additem .... element.machin_chouette
next

oups... comment fait on pour formater le code? desolé pour cette logne continu,je vais essayer avec les balises

strvar =""

For Each elem In ELEMENT1

strvar = elem.Contenu

Next

message1= strvar(1)

message2= strvar(2)

....

Merci de votre aide

Je ne te comprends pas !
Apparemment strvar est un tableau ?
si oui : tu ne peux écrire strvar = elem.Contenu
si non : tu ne peux écrire : message1= strvar(1)

tu sais ce qu'est un tableau dynamique et comment on l'utilise, déjà ?

Va voir le 2ème message de la page 2 de cette discussion :
http://www.vbfrance.com/infomsg_AIDE-BUG-DANS-MON-SCRIPT_911046.aspx

merci pour votre rapidité,désolé je ne suis pas très fort en vb mais je suis motivé pour le devenir.;-) à koi correspond list1.additem, le but serait de recupérer tous les elements renvoyer par le for each, et de les affiché dans un Msgbox, ps: pourriez vous me dire comment formater mon code pour qu'il soit plus lisible,il y t'il une balise specifique, Merci

Pour le formatage de ton code, je pense que c'est ta version de FireFox qui ne va pas ...
Moi, je me contente de copier-coller de mon code VB et tout va bien...

- List1.additem ?
Ce serait pour ajouter des items à une listbox nommée List1

Mais ne te disperse pas pour l'instant !
Reste avec ton idée de tableau
pour ce qui est de la déclaration et de l'utilisation d'un tableau dynamique, je t'ai renvoyé vers un exemple "parlant", non ?
Ceci ne doit pas te dispenser, bien au contraire, d'ouvrir et bûcher MSDN !

Merci , en effet ton exemple est bien parlant, j'aurais donc besoin d'un tableau à 2 colonnes (nom, prenom)
et en fonction du nombre d'utilisateur je determinerais automatiquement le nombre de ligne.


Private Sub Command1_Click()
  Dim toto(?, 1) As String 

End Sub


Private Sub Message1_Click()
For Each elem In ELEMENT1
      toto(?,?) = elem.Contenu
Next

toto(?,?)= elem.Contenu (1)
toto(?,?)= elem.Contenu (2)

Msgbox (toto(?,1))
end sub

Voila où j'en suis , excusez moi pour ce brouillon ,suis-je tres loin? où dois-je Bucher encors??

Abandonné , je suis ?

Oui, tu dois manifestement bûcher.

Déjà : comment peux-tu mettre dans un tableau à 2 colonne une seule valeur :
Je lis ce que tu as é&crit :
toto(?,?) = elem.Contenu

Qu'est vet que contient contenu et sous quelle forme ?
Car si contenu n'est pas lui même un tableau ou une énumération structurée,
- ton toto(x,y) se résumerait à un toto(x)
- ce qui est encore plus surprenant, c'est :
elem.Contenu  comparé (plus loin)à  elem.Contenu (1)
en d'autres termes : j'ai beaucoup de mal à deviner ce que tu as en fait, tant dans une collection  ELEMENT1 que dans chaque contenu des éléments de ELEMENT1...
Et comme ce que je lis de ce que tu as écrit jusqu'à présent me donne à penser que tu n'en n'es pas à un niveau avancé, je ne crois pas que tu aies une collection de structures (ou alors : définis-les nous clairement, qu'on puisse y voir suffisamment clair, ce qui est pour l'instant très loin d'être le cas  !...).