String dans boucle sur élément d'une combobox.

Bonjour à tous,

J'ai un petit soucis, j'essaye de sauvegarder tous mes éléments d'une combobox (appelée CBB_DESIGN, dans FRM_DEPENSE) dans un fichier texte, afin de les retrouver plus tard à l'ouverture du formulaire.

Voici donc la boucle que j'ai faite :

Code:

---

1 2 3 4

For Each element In FRM_DEPENSE.CBB_DESIGN.Items Log.Ecrire_CBB(FRM_DEPENSE.CBB_DESIGN.Items.Item(element)) Next

---

Lors de la phase d'exécution, il y a un problème quant à la conversion du type, VisualStudio essaye de la convertir en integer, mais cela ne fonctionne pas.
Je comprends pourquoi, j'envoie un string, donc j'ai fait ceci :

Code:

---

1 2 3 4

For Each element As String In FRM_DEPENSE.CBB_DESIGN.Items Log.Ecrire_CBB(FRM_DEPENSE.CBB_DESIGN.Items.Item(element)) Next

---

Malheureusement cela ne fonctionne pas non plus.

Je me suis tourné vers une autre solution :

Code:

---

1 2 3 4 5 6 7 8 9 10 11

Dim Var_nostring Dim Var_string   For Each element In FRM_DEPENSE.CBB_DESIGN.Items   Var_nostring = element Var_string = Ctype (element, String)   Log.Ecrire_CBB(FRM_DEPENSE.CBB_DESIGN.Items.Item(Var_string)) Next

---

Cela ne fonctionne pas non plus.

Merci de votre aide ;)