Ciao
questo codice mi legge un file txt ,io ho bisogno di escludere le prime 2 righe e ultima riga.codice:Open apply & "menu\pics\fx.001" For Input As 1 Dim cnt4, iRows Cnt = 0 Do While Not EOF(1) Line Input #1, stringa Textmain.Text = Textmain.Text & stringa & vbCrLf cnt4 = cnt4 + 1 If cnt4 = 19 Then Exit Do Loop Close #1
come se fa?![]()

Rispondi quotando