Close-AnweisungClose statement

Beendet die Eingabe/Ausgabe (e/a) in eine Datei, die mithilfe der Open -Anweisung geöffnet wurde.Concludes input/output (I/O) to a file opened by using the Open statement.

SyntaxSyntax

Schließen Sie [ __ filenumberlist]Close [ filenumberlist ]

Das optionale filenumberlist- __ Argument kann eine oder mehrere Dateinummern sein, die die folgende Syntax verwenden, wobei FileNumber eine beliebige gültige Dateinummer ist: [[ __ # ] FileNumber] # [ , [] __ FileNumber _ _ ] . . .The optional filenumberlist argument can be one or more file numbers that use the following syntax, where filenumber is any valid file number: [[ # ] filenumber ] [ , [ # ] filenumber ] . . .

HinweiseRemarks

Wenn Sie filenumberlist weglassen, werden alle aktiven Dateien, die mit der Open-Anweisung geöffnet wurden, geschlossen.If you omit filenumberlist, all active files opened by the Open statement are closed.

Wenn Sie Dateien schließen, die für die Ausgabe oder Anhänge geöffnet wurden, wird der letzte Ausgabepuffer in den Betriebssystempuffer für diese Datei geschrieben.When you close files that were opened for Output or Append, the final buffer of output is written to the operating system buffer for that file. Der gesamte Pufferspeicherplatz, der der geschlossenen Datei zugeordnet war, wird freigegeben.All buffer space associated with the closed file is released.

Wenn die Close-Anweisung ausgeführt wird, wird die Zuordnung einer Datei mit ihrer Dateinummer beendet.When the Close statement is executed, the association of a file with its file number ends.

BeispielExample

In diesem Beispiel wird die Close-Anweisung verwendet, um alle drei Dateien zu schließen, die für die Ausgabe geöffnet wurden.This example uses the Close statement to close all three files opened for Output.

Dim I, FileName 
For I = 1 To 3 ' Loop 3 times. 
 FileName = "TEST" & I ' Create file name. 
 Open FileName For Output As #I ' Open file. 
 Print #I, "This is a test." ' Write string to file. 
Next I 
Close ' Close all 3 open files. 

Siehe auchSee also

Support und FeedbackSupport and feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation?Have questions or feedback about Office VBA or this documentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.