[VB6] ordinamento dati

[md76]

Leggo il contenuto di un file di testo riga x riga e lo inserisco in un flexgrid e così tutto OK!, quando la routine parte a leggere tutte le righe del file parte dalla prima in alto a me servirebbe che partisse dalla prima dal basso. In questo modo l'ultima riga del file di testo è la prima inserita nel flexgrid. E possibile secondo Voi ?

[JamesD]

Il file lo leggi in maniera sequenziale dalla prima all'ultima perchè non penso che sia permesso leggere un file di testo dal fondo!
Il problema è però di semplice soluzione. Potresti ad esempio mettere le righe del file all'interno di un vettore e poi riempire la griglia al contrario!

[md76]

Mi potresti spiegare come risolvere il problema perfavore ?

[JamesD]

ok ci provo:

Dim tuoArray() As String

tuoFile = "percorso assoluto del tuo file"
Open tuoFile For Input As #1
While Not (EOF(1))
    i = i + 1
    ReDim Preserve tuoArray(i)
    
    Input #1, tuoArray(i - 1)
Wend
Close #1
tuaFlex.Rows = UBound(tuoArray)

For i = 1 To tuaFlex.Rows
    tuaFlex.TextMatrix(i - 1, 1) = tuoArray(UBound(tuoArray) - i)
Next i

Questo codice deovrebbe funzionare provalo e sappimi dire!!
Ciauz ciauz