Discussion :

[PrincessKC]

Bonsoir à tous,

je veux permettre aux utilisateurs de mon logiciel d'avoir les données des années precedentes;

pour ce faire, j'ai crée un fichier ini avec des entêtes: exemple:l'entete[Chemins];
ce fichier liste tous les chemins de mes bases de données;cf fichier joint;

ensuite, je crée une combo qui est remplie à partir dudit fichier ini.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
'Mes variables
Dim Montableau(10) As String ' Tableau
Dim i As Integer
 
 
Private Sub Form_Load()
 
   Open "C:\configs.ini" For Input As #1
 
   ' Lecture tant qu'on n'arrive pas à la fin du fichier
   While Not EOF(1)
     Line Input #1, Montableau(i)
     Combo.AddItem Left(Montableau(i), 9)
     i = i + 1
  Wend
 
 
   ' Fermeture du fichier
   Close #1
 
   'Selection du premier enregistrement
   Combo.ListIndex = 1
 
End Sub

mon problème est que:
la combo se remplit avec comme première ligne, l'entête du fichier ini:[chemins];

je voudrais remplir la combo sans les entêtes (il peut en avoir d'autres!);

Une idée ??

merci d'avance.

une copie d'ecran...

[ProgElecT]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
   While Not EOF(1)
     Line Input #1, Montableau(i)
     If Left(Montableau(i), 1) <> "[" Then
        Combo.AddItem Left(Montableau(i), 9)
     End If
     i = i + 1
  Wend

Pourquoi utiliser une variable tableau?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Dim Msg As String
   While Not EOF(1)
     Line Input #1, Msg
     If Left(Msg, 1) <> "[" Then
        Combo.AddItem Left(Msg, 9)
     End If
  Wend

A moins que tu n'utilises ce tableau dans la suite de ton programme.
Voir aussi Comment lire / écrire dans un fichier .ini

[PrincessKC]

Merci beaucoup; ça marche!
pour le fichier ini, je me suis referée à ce meme lien .