Combobox et une partie de fichier txt

Résolu
gramwil Messages postés 15 Date d'inscription samedi 11 janvier 2003 Statut Membre Dernière intervention 24 avril 2005 - 24 juil. 2004 à 21:21
cs_bobo91 Messages postés 107 Date d'inscription dimanche 27 juin 2004 Statut Membre Dernière intervention 12 novembre 2006 - 25 juil. 2004 à 00:09
Je vais essayer d'etre plus claire, j'ai un fichier du style suivant :

[Option1]
Val1
Val2
Val3

[Option2]
ValA
ValB
ValC

et je voudrais pouvoir recuperer les valeurs pour avoir dans un combo les Valeurs Val1 a 3 et dans un autre combo les valeur ValA a C mais je voudrais egalement si par la suite j'ajoute une valeur, Val4 par exemple, qu'elle s'ajoute dans le combo sans avoir a modifier le code.

Merci de votre aide

3 réponses

cs_bobo91 Messages postés 107 Date d'inscription dimanche 27 juin 2004 Statut Membre Dernière intervention 12 novembre 2006
24 juil. 2004 à 23:50
bonsoir a toi je crois avoir une solution pour toi:
celle ci ne s'applique que si tu ne saute pas de ligne entre
val3 et [option2] etc...
donc ca ferai:
[option1]
val1
val2
val3
[option2]
valA
valB
valC
etc...

voici la source et dit moi si c'est bien ca que tu veux merci a bientot.

'Varaiables
option1 = 0
option2 = 0

Open "g:\BOBO91.txt" For Binary As #1
Do While Not EOF(1)
Line Input #1, lignefichier
If lignefichier = "[option1]" Then
option1 = 1
GoTo BOUCLE
End If
If lignefichier = "[option2]" Then
option2 = 1
option1 = 0
GoTo BOUCLE
End If

If option1 = 1 Then
Combo1.AddItem (lignefichier)
End If
If option2 = 1 Then
Combo2.AddItem (lignefichier)
End If

BOUCLE:
Loop
Close #1
End Sub
3
gramwil Messages postés 15 Date d'inscription samedi 11 janvier 2003 Statut Membre Dernière intervention 24 avril 2005
25 juil. 2004 à 00:07
Merci,

C'est exatement ce que je voulais et en plus ca marche du premier coup, t'es le meilleur !!!!

Encore merci
0
cs_bobo91 Messages postés 107 Date d'inscription dimanche 27 juin 2004 Statut Membre Dernière intervention 12 novembre 2006
25 juil. 2004 à 00:09
mais de rien si tu pense a quelqu'un qui peut m'aider a raisoudre mon prob de cube 3d en rotation pense a moi merci. bonne continuation a toi.bye
0
Rejoignez-nous