Ciao, una cosa del genere:
codice:Private Sub CaricaVettoreDaFile() Dim riga As String Open "c:\numeri.txt" For Input As #1 Do Until EOF(1) Line Input #1, riga ....tue elaborazioni con la variabile riga .... Loop Close #1 End Sub
Ciao, una cosa del genere:
codice:Private Sub CaricaVettoreDaFile() Dim riga As String Open "c:\numeri.txt" For Input As #1 Do Until EOF(1) Line Input #1, riga ....tue elaborazioni con la variabile riga .... Loop Close #1 End Sub
Jupy