Bonjour à tous
==============
Afin de donner à l'utisateur un choix d'options
je charge un comboBox avec des enregistrements d'un fichier texte
mais les lignes de ces enregistrements ne sont pas mise à la suite de l'une l'autre mais comme ceci dans Combo1
ex:Première ligneŽŽDeuxième ligneŽŽTroisième ligneŽŽ ect..
Voici les lignes de code
'lecture du fichier afin de remvoyer le texte dans combo2
'ce texte sert pour imprimer un texte fixe au bas du document de commande
Dim Texte_Fixe As Integer
Dim sContenu_Texte, MotClé As String
Texte_Fixe = FreeFile
'lis fichier séquentiel
Open "c:\Travail\Wingold\Texte Fixe.Ini" For Input As Texte_Fixe
Do Until EOF(Texte_Fixe)
Line Input #Texte_Fixe, sContenu_Texte
MotClé = MotClé + sContenu_Texte + Chr(13) + Chr(10)
Combo2.Clear
Combo2.AddItem MotClé
Loop
Close #Texte_Fixe 'ferme le fichier
Comment faire?
Merci
Simon
Suivant
Répondre
Voir le fil de ce thread
Voir le fil de ce thread à partir de ce message seulement
Voir tous les messages de ce thread
Voir tous les messages de ce thread à partir de ce message seulement