raga io ho avuto questo codice che serve a caricare nel text1 una lista txt però nn so chè una lista nn la mette a capo ad uno ad uno e poi il text1 nn deve essere un input si potrà solamente evidenziare mi agiustate questo codice???
Dim nomefile As String
CommonDialog1.Filter = "File di testo (*.txt)|*.txt"
CommonDialog1.ShowOpen
nomefile = CommonDialog1.FileName
dim fn as integer,contenutofile as string
fn=freefile
open nomefile for binary as #fn
contenutofile=space(LOF(fn))
get #fn,1,contenutofile
text1.text=contenutofile
close #fn
grazie
