Msflexgrid & fichier txtRésolu

Question

Bojour a tous,
j ai un fichier texte (txt); qui contient des enregistrement de format :

a1
b1
c1

a2
b2
c2

a3
b3
c3
 
...
 comment je peux afficher son contenu dans msflexgrid avec 3 colonnes comme ca :

a1         b1          c1
a2         b2          c2
a3         b3          c3

voila mon code qui n a  pas marché:

While Not EOF(1)
    Input #1, a$
    'Combo1.AddItem a$
    
    MSFlex.Rows = i + 1
    For j = 0 To 4
        MSFlex.TextMatrix(i, j) = a$
        MSFlex.Cols = j + 1
        Input #1, a$
        
        Next j
    i = i + 1
Wend

Merci pour vos aides
Close #1

cs_casy · Accepted Answer

Voila une version de ton code qui marche Dim ff As Integer Dim i As Integer Dim j As Integer i = MSFlex.Rows MSFlex.Cols = 4 ff = FreeFile Open TonFichier For Input As #ff Do While Not EOF (ff) MSFlex.Rows = i + 1 For j = 0 To 3 If Not EOF (ff) Then Input #ff, a$ MSFlex.TextMatrix(i, j) = a$ Else Exit Do End If Next j i = i + 1 Loop Close #ff Coloration syntaxique automatique ---- Sevyc64 (alias Casy) ----

# LE PARTAGE EST NOTRE FORCE #

ahmani24 · Answer

ya t il une fonction pour modifier et supprimer un enregistrement .

Msflexgrid & fichier txt

2 réponses

Votre réponse

Discussions similaires