Gewusst wie: schreiben eine Datei in Visual Basic 6

May 24

Visual Basic 6 (VB6) enthält zwei Methoden, um eine Datei zu schreiben. Die "Write #" Anweisung fügt Kommas zwischen den einzelnen Datenelement und Zeichenfolgen in Anführungszeichen, wie sie in die Datei geschrieben werden. Dies erspart den Programmierer Trennzeichen in der Liste der Objekte für die spätere Verwendung während einer Eingabe zu erstellen. Die "Print #" ein Abbild der Daten in eine Datei geschrieben. In diesem Fall müssen Sie die Daten Trennzeichen hinzufügen, damit es korrekt gedruckt wird.

Anweisungen

1 Verwenden Sie VB6 erstellen Sie ein neues Projekt durch Auswahl von "Standard-EXE" aus der Liste der Vorlagen beim VB6 öffnen. Um den Schreibvorgang zu veranschaulichen, erstellen Sie ein Formular um Adressetiketten Informationen zu sammeln, die dann eine Adressbuchdatei schreiben. Verwenden Sie die "Toolbox" in der linken Spalte hinzufügen von Beschriftungen, Textfelder und CommandButton steuert in die Formular-Anzeige erforderlichen Informationen zu sammeln und die Datei schreiben.

2 Dem Formular durch Doppelklicken auf die Hauptstadt "A" in der Toolbox fünfmal fügen Sie fünf Etiketten hinzu. Jedes Etikett deckt das vorhergehende man so klicken Sie und ziehen Sie sie einzeln nacheinander, platzieren das obere Etikett an der Unterseite des Formulars und jeder nachfolgenden Label über dem vorhergehenden verließ. Wiederholen Sie diesen Vorgang, um fünf Textfelder aus der Toolbox hinzufügen, doppelklicken Sie fünfmal auf das kleine Quadrat-Symbol mit dem Kleinbuchstaben "Ab." Auf die Form, klicken und ziehen Sie sie einzeln nacheinander auf der rechten Seite der Etiketten, jeweils mit den passenden Schlange zu beschriften. Hinweis: Sie müssen wahrscheinlich das Form leicht mit Ziehgriffe, kleine Quadrate an den Ecken und Mitte oben und unten im Formular zu vergrößern.

3 Fügen Sie drei Befehlsschaltflächen zum Formular, durch Doppelklicken auf das kleine Rechteck in der Toolbox direkt unter dem Label Symbol drei Mal gefunden. Ziehen Sie das erste man über dem ersten Label und Textbox. Ziehen Sie zwei horizontal unterhalb der Etiketten und Textfelder. Klicken Sie auf jedes Steuerelement, dessen Eigenschaften auf der rechten Seite anzeigen und ändern Sie die Eigenschaften des "Caption" beginnend mit Label1 als unten, aber stecken Sie nicht die Anführungszeichen:

Label1-Beschriftung auf "Name" ändern

Ändern Sie Label2 Beschriftung in "Street"

Label3-Beschriftung ändern auf "City"

Ändern Sie Label4 Beschriftung in "Staat"

Label5-Beschriftung ändern auf "ZIP"

Löschen Sie die "Texteigenschaften" alle fünf Textfelder auf die gleiche Weise.

4 Ändern Sie die Standardeinstellung "Caption" von den drei CommandBoxes auf "Create File", "Datensatz speichern" und "Exit". Klicken Sie auf "Ansicht", "Code" im oberen Menü VB6 um das Codefenster zu öffnen. Geben Sie die folgenden Zeilen genau wie dargestellt:

Öffentliche WriteFile als String

Private Sub Command1_Click()

WriteFile = InputBox ("geben Sie einen Dateinamen in das Drive:\Folder\FileName.txt-Format zu schreiben")

Offenen WriteFile für die Ausgabe als #1

#1 zu schließen

EndSub

5 Fügen Sie den folgenden Code unter dem Code in Schritt 4:

Private Sub Command2_Click()

Offenen WriteFile für Anfügen als #2

Schreiben Sie #2, Text1.Text; Text2.Text; Text3.Text; Text4.Text; Text5.Text

#2 zu schließen

Text1.Text = ""

Text2.Text = ""

Text3.Text = ""

Text4.Text = ""

Text5.Text = ""

Text1.SetFocus

EndSub

6 Mit "F5" um das Programm auszuführen. Klicken Sie auf die Schaltfläche "Datei erstellen" und geben Sie einen Speicherort und Dateinamen. Füllen Sie das Formular und klicken Sie auf "Speichern"Record." Wiederholen Sie, um ein paar weitere Datensätze hinzuzufügen. Beenden Sie das Programm und suchen Sie die Datei auf Ihrem PC, in dem es erstellt wurde. Öffnen Sie es mit dem Windows-Editor, um die Ergebnisse zu sehen. Ändern Sie den Befehl "Write" im Code auf "Print" und führen Sie das Programm erneut aus. Öffnen Sie erneut mit WordPad zu sehen, den Unterschied zwischen den beiden Datei-Write-Methoden.