Ciao a tutti. Devo scrivere in un file di testo righe della lunghezza di 1800 caratteri con il metodo Write
Public Sub export_txt()
Dim txtfile As Stream
txtfile = Open mydir & "/" & "S001" & Label62.Text & trimestre & progres & ".TXT" For Create
Write #txtfile, "0" & "MIS00" & "26" & label27.Text & Space(16 - Len(label27.Text)) & label28.Text & xlab & label32.Text & Space(30 - Len(label32.Text)) & label8.Text & Space(60 - Len(label8.Text)) & label29.Text & Space(40 - Len(label29.Text)) etc, etc
Close #txtfile
End
e qui tutto bene. La mia esigenza e di poter scrivere il codice visualizzato su più righe per esempio:
Public Sub export_txt()
Dim txtfile As Stream
txtfile = Open mydir & "/" & "S001" & Label62.Text & trimestre & progres & ".TXT" For Create
Write #txtfile, "0" & "MIS00" & "26" & label27.Text & Space(16 - Len(label27.Text)) &
& label28.Text &
& xlab &
& label32.Text & Space(30 - Len(label32.Text)) &
& label8.Text & Space(60 - Len(label8.Text)) &
& label29.Text & Space(40 - Len(label29.Text)) etc. etc.
Close #txtfile
End
in modo da poter essere più leggibile che su un'unica riga.
ho provato le parentesi, gli apici, le virgolette, ma non ho trovato soluzione, qualcuno mi può aiutare?
Grazie.