Home Hardware Networking Programmazione Software Domanda Sistemi
Conoscenza Informatica >> Programmazione >> Nozioni di base di Visual Programming >> .

Come leggere e scrivere file di testo con Visual Basic 6.0

Visual Basic 6.0 fornisce un modo semplice per aprire i file di testo e leggere il loro contenuto in una casella di testo sullo schermo , così come scrivere un nuovo testo in un file. Solo undici righe di codice sono necessari per la prima fase , e dieci sarà sufficiente per la seconda operazione . Il processo utilizza le funzioni di ingresso e di uscita in Visual Basic , oltre a una piccola finestra per raccogliere informazioni dall'utente . Cose che ti serviranno
Visual Basic 6.0
Mostra più istruzioni
1

Aprire Visual Basic 6.0 , fare clic su File e selezionare Nuovo progetto. Selezionare EXE standard dalla lista di modelli . Fare doppio clic sul controllo TextBox nella Casella degli strumenti a sinistra per aggiungere questo al form. Modificare l' altezza del modulo nel riquadro Proprietà sulla destra per 5000
2

apportare le seguenti modifiche alle proprietà TextBox : . Altezza = 3000Multiline = TrueScrollbars = BothWidth = 3000

3 Fare doppio clic sul controllo Button nella Casella degli strumenti . Modificare la proprietà Caption per leggere il file. Ripetere questa operazione per aggiungere un secondo controllo Button , modificando la proprietà Caption qui per scrivere file .
4

Fare doppio clic sul pulsante File Read per aprire la finestra del codice . Inserisci questo codice nella pagina di visualizzazione codice : Function ReadFile ( ) Dim ReadFileName Come StringReadFile = InputBox ( " Inserire il nome del file da leggere : " ) Apri ReadFile Per Input As # 1ReadFile = Input $ ( LOF ( 1 ) , 1) Text1 . text = ReadFileClose # 1End FunctionPrivate Sub Command1_Click ( ) ReadFileEnd Sub

5 Fare doppio clic sul pulsante Write File per aprire la finestra del codice . Inserisci questo codice : WriteFile function () Dim WriteFileName Come StringWriteFileName = InputBox ( " Inserire il nome del file " ) Apri WriteFileName per uscita come # 2Print # 2 , # Text1.TextClose 1End FunctionPrivate Sub Command2_Click ( ) WriteFileEnd Sub
6

Eseguire il programma premendo F5 e fare clic sul comando di leggere il file prima . Inserisci il nome di un file di testo noto , tra l' . Txt suffisso . Il file dovrebbe trovarsi nella TextBox . Se ora si fa clic su Scrivi file e fornire un nome diverso , si creerà una nuova , ma duplicato del file . In alternativa , se si elimina il testo o basta cliccare su Leggi file prima di caricare un file e quindi digitare qualcosa di nuovo , è possibile creare un file completamente nuovo .

 

Programmazione © www.354353.com