Visual Basic 6 ( VB6 ) zwei Methoden, um eine Datei zu schreiben. Die "# Write" -Anweisung fügt Komma zwischen jedem Datenelement und Anführungszeichen Strings , wie sie in die Datei geschrieben werden. Das spart der Programmierer mit den Trennzeichen in der Liste der Objekte für die spätere Verwendung während einer Eingabe Betrieb erstellen. Die " Print # ", schreibt ein Abbild der Daten in einer Datei . In diesem Fall müssen Sie Trennzeichen zu den Daten hinzufügen, damit es richtig druckt . Anleitung
1

Nutzungsbedingungen VB6 um ein neues Projekt , indem Sie " Standard EXE " aus der Liste der Vorlagen beim VB6 öffnet erstellen. In die Datei schreiben zu demonstrieren , erstellen Sie ein Formular, um Mailing- Informationen , die dann ein Adressbuch -Datei zu schreiben sammeln . Verwenden Sie die " Toolbox " in der linken Spalte , um Labels , Textfelder und CommandButton-Steuerelemente zu dem Formular Anzeige hinzufügen notwendigen Informationen zu sammeln und die Datei schreiben .
2

In fünf Labels auf die Form durch einen Doppelklick auf auf dem Kapitalmarkt "A" in der Toolbox fünfmal. Jedes Etikett deckt den vorhergehenden so klicken und ziehen sie ein zu einer Zeit , indem Sie das obere Etikett an der Unterseite der Form belassen und jede nachfolgende Etikett über dem vorhergehenden. Wiederholen Sie diesen Vorgang bis fünf Textfelder aus der Toolbox durch einen Doppelklick auf das Fünffache auf das kleine quadratische Ikone mit den Kleinbuchstaben hinzufügen "ab . " Auf dem Formular , klicken und ziehen sie ein zu einer Zeit, um das Recht der Labels , Futter jeden mit seiner passenden Etikett versehen . Hinweis: Sie müssen wahrscheinlich die Form vergrößern leicht per Drag Griffe , winzige Quadrate an den Ecken und Mitte oben und unten auf dem Formular
3

Fügen Sie drei Befehlsschaltflächen auf dem Formular . Doppelklick auf das kleine Rechteck in der Toolbox finden sich direkt unter dem Label- Symbol dreimal. Ziehen Sie das erste über dem ersten Label- und Textbox . Ziehen Sie die anderen zwei horizontal unterhalb der Labels und Textfelder . Klicken Sie auf jedes Steuerelement , um seine Eigenschaften auf der rechten Seite angezeigt werden , und ändern Sie die "Caption " Eigenschaften beginnend mit Label1 als unten , aber nicht die Anführungszeichen einfügen :

ändern Label1 Beschriftung "Name"
< p > Change Label2 Beschriftung zu " Street"

ändern Label3 Beschriftung zu " City"

ändern Label4 Beschriftung zu " State"

ändern Label5 Beschriftung "ZIP "

löschen Sie die "Text" Eigenschaften von allen fünf Textfelder in der gleichen Weise.
4

ändern Sie die Standardeinstellung "Caption " der drei CommandBoxes auf " Create File ", " Save Record" und " Exit". Klicken Sie auf " View", "Code " in der oberen VB6 Menü, um das Codefenster zu öffnen . Geben Sie die folgenden Zeilen genau so, wie sie erscheinen :

Öffentliche WriteFile As String

Private Sub Command1_Click ()

WriteFile = InputBox (" Geben Sie einen Dateinamen im Format -Laufwerk schreiben : \\ Folder \\ Dateiname.txt " )

öffnen WriteFile For Output As # 1 of

Close # 1 End Sub

5

hinzufügen Mit dem folgenden Code unter dem Code in Schritt 4:

private Sub Command2_Click ()

öffnen WriteFile For Append As # 2

Write # 2, Text1.Text ; Text2 . Text ; Text3.Text ; Text4.Text ; Text5.Text

Close # 2

Text1.Text = ""

Text2.Text = ""
< p> Text3.Text = ""

Text4.Text = ""

Text5.Text = ""

Text1.SetFocus

End Sub
6

Presse "F5 ", um das Programm auszuführen. Klicken Sie auf " Datei erstellen " und geben Sie einen Speicherort und Dateinamen. Füllen Sie das Formular aus und klicken Sie auf " Datensatz speichern. " Wiederholen, um ein paar weitere Datensätze hinzuzufügen . Beenden Sie das Programm , und suchen Sie die Datei auf Ihrem PC , wo sie erstellt wurde. Öffnen Sie diese mit Windows Notepad , um die Ergebnisse zu sehen. Ändern Sie den "Write "-Befehl im Code auf "Drucken " , und führen Sie das Programm erneut. Re -open mit WordPad , um den Unterschied zwischen den beiden Methoden Write -Datei zu sehen.