Mi intrometto solo per proporre un codice piu' efficiente ...
codice:ff = FreeFile Open "c:\file.txt" For Binary As #ff f = Space$(LOF(ff)) Get #ff, , f Close #ff Prova = Split(f, vbCrLf)![]()
Mi intrometto solo per proporre un codice piu' efficiente ...
codice:ff = FreeFile Open "c:\file.txt" For Binary As #ff f = Space$(LOF(ff)) Get #ff, , f Close #ff Prova = Split(f, vbCrLf)![]()
Ok, grazie...
cmq avevo dimenticato come si faceva in vb6 sta roba perchè usando vb.net uso un ciclo for o while e X.Readline ...
Byez.
Ok..allora è un errore di "deformazione professionale"..
ciao