Fare clic sulla scheda "Sviluppatore " , fai clic su " Visual Basic " e fare clic sul menu "Inserisci" . Selezionare "Modulo" per inserire un nuovo modulo di codice
2
Inizia con la creazione di un sub- procedimento utilizzando il seguente codice : .
Private Sub readTextFile ( ) economici
3
creare tre variabili che si intende utilizzare per leggere il file di testo :
Dim FILETEXT As String Dim
myTextFile As String Dim
memFile As Integer
4
Definire il percorso e il nome del file di testo che si desidera leggere :
myTextFile = " C : \\ temp.txt "
memFile = FreeFile
5
Aprire il file , leggere il suo contenuto e chiudere il file :
Aperto myTextFile For Input As # memFile
FILETEXT = Input $ ( LOF ( 1 ) , 1 ) per
Chiudi
6
Visualizzare i risultati di file di testo attraverso la finestra immediata.
Debug.Print ( FILETEXT ) economici 7
Terminare la sub- procedura digitando "End Sub " (senza virgolette ) . Premere F5 per eseguire la procedura e leggere il file .
software © www.354353.com