sto facendo un programmino e non riesco a capire il funzionamento dell input e dell lof
Private Sub apri_Click()
Dim NomeFile As String
Dim Testo As String
NomeFile = InputBox("Inserisci il nome del file !!!!!!:", "Salvataggio")
Open NomeFile For Input As #1
Testo = Input(LOF(1), #1) cosi funziona ma non ho capito come
End Sub
grazie a tutti in anticipo
input legge n carateri dal file aperto in lettura
lof legge la lunghezza in byte del file
se non sbaglio utilizzate così ti consentono di leggere l'intero contenuto del file
io sono festosamente cicciottello :: e. cartman
t'amo senza sapere come, nè quando nè da dove,
t'amo direttamente senza problemi nè orgoglio:
così ti amo perchè non so amare altrimenti
Testo = Input(LOF(1), #1)
ok penso sia cosi legge l'intero contenuto partendo dal primo carattere del file #1 dico bene ????????
grazie ancora ciao
esatto ... almeno credo
io sono festosamente cicciottello :: e. cartman
t'amo senza sapere come, nè quando nè da dove,
t'amo direttamente senza problemi nè orgoglio:
così ti amo perchè non so amare altrimenti
Permessi di invio
Rispondi quotando