Come scrivere un file in Visual Basic 6

Visual Basic 6 ( VB6 ) comprende due metodi per scrivere un file . Il "Write # " dichiarazione inserisce virgole tra ogni dato ed virgolette le stringhe come sono scritti nel file . Questo risparmia al programmatore dover creare delimitatori nell'elenco di oggetti per uso successivo durante un'operazione di input . Il "Print #" scrive un'immagine dei dati in un file . In questo caso , è necessario aggiungere delimitatori per i dati in modo che venga stampato correttamente . Istruzioni
1

Usa VB6 per creare un nuovo progetto selezionando " EXE standard " dall'elenco dei modelli quando si apre VB6 . Per dimostrare il processo di scrittura del file , creare un modulo per raccogliere informazioni di mailing , che poi scriverà un file della rubrica . Utilizzare la "Casella degli strumenti " nella colonna di sinistra per aggiungere etichette , caselle di testo e controlli CommandButton al display modulo per raccogliere le informazioni necessarie e scrivere il file .
2

Aggiungi cinque etichette di forma con un doppio clic sul capitale "A" nella casella degli strumenti per cinque volte . Ogni etichetta copre la precedente in modo da fare clic e trascinare uno alla volta , posizionando l'etichetta in alto in basso a sinistra della forma e ogni etichetta successivo sopra la precedente . Ripetere questa procedura per aggiungere cinque caselle di testo dal pannello degli strumenti facendo doppio clic cinque volte sulla piccola icona quadrata che contiene le lettere minuscole "ab ". Nel modulo , fare clic e trascinare uno alla volta a destra delle etichette , in fila ognuno con la sua etichetta corrispondente . Nota : Probabilmente è necessario allargare la forma leggermente utilizzando il trascinamento maniglie , quadratini agli angoli e la metà superiore e inferiore del modulo
3

Aggiungi tre CommandButtons al form . doppio clic sul piccolo rettangolo nella casella degli strumenti trovato direttamente sotto l'icona Etichetta tre volte . Trascinare il primo sopra il primo Label e TextBox . Trascinare gli altri due in orizzontale sotto le etichette e caselle di testo . Fare clic su ogni controllo per visualizzarne le proprietà sulla destra , e modificare le proprietà "Caption" che iniziano con Label1 come sotto, ma non inserire le virgolette :
Cambia

Label1 Caption a "Nome"

Cambia Label2 didascalia di "Street "

Change Label3 didascalia di " Città "

Change Label4 didascalia di " Stato "

Change Label5 didascalia " ZIP "

Elimina il "testo " proprietà di tutti e cinque caselle di testo nello stesso modo .
4

modificare il valore predefinito "Caption" delle tre CommandBoxes a "Crea File ", " Salva record " e " Exit ". Fare clic su "Visualizza ", "Codice " nel menu VB6 superiore per aprire la finestra del codice . Digitare le seguenti righe esattamente come appaiono :

WriteFile Pubblica As String

Private Sub Command1_Click ( ) per

WriteFile = InputBox ( " Immettere un nome di file da scrivere in formato dell'unità : \\ Folder \\ NomeFile.txt " ) per

aperto WriteFile per uscita come # 1

Chiudere # 1

End Sub
5

Aggiungi il codice riportato di seguito il codice nella Fase 4 :

private Sub Command2_Click ( ) per

aperto WriteFile For Append As # 2

Write # 2 , Text1.Text ; testo2 . testo; Text3.Text ; Text4.Text ; Text5.Text

Chiudere # 2

Text1.Text = " "

Text2.Text = " "

Text3.Text = " "

Text4.Text = " "

Text5.Text = ""

Text1.SetFocus

End Sub
Pagina 6

Premere " F5 " per eseguire il programma . Fare clic sul pulsante " Crea file " e immettere un percorso e un nome file . Compila il modulo e fai clic su " Salva record . " Ripetere per aggiungere qualche altro record. Uscire dal programma e individuare il file sul vostro PC dove è stato creato. Aprilo con Blocco Note di Windows per vedere i risultati . Modificare il comando " Write " nel codice di "stampare" ed eseguire nuovamente il programma . Ri - aperto con WordPad per vedere la differenza tra i due metodi di scrittura dei file.

• Modalità di accesso a VBA query di eliminazione 
• Come impostare il Recordset DAO in Visual Basic