FileClose-Funktion
Aktualisiert: November 2007
Beendet die Eingabe/Ausgabe (E/A) in eine Datei, die mit der FileOpen-Funktion geöffnet wurde.
Das My-Feature ermöglicht bei Datei-E/A-Vorgängen höhere Produktivität und Leistung. Weitere Informationen finden Sie unter My.Computer.FileSystem-Objekt.
Public Sub FileClose(ParamArray FileNumbers() As Integer)
Parameter
- FileNumbers
Optional. Parameterarray von 0 oder mehr zu schließenden Kanälen.
Ausnahmen
Ausnahmetyp |
Fehlernummer |
Bedingung |
|---|---|---|
FileNumber ist nicht vorhanden. |
Beachten Sie die Spalte "Fehlernummer", wenn Sie Visual Basic 6.0-Anwendungen aktualisieren, die eine unstrukturierte Fehlerbehandlung verwenden. (Sie können die Fehlernummer mit der Number-Eigenschaft (Err-Objekt) vergleichen.) Wenn möglich, sollten Sie jedoch erwägen, eine solche Fehlersteuerung durch eine Übersicht über die strukturierte Ausnahmebehandlung für Visual Basic zu ersetzen.
Hinweise
Die FileClose-Funktion wird zwecks Abwärtskompatibilität bereitgestellt und kann unter Umständen die Leistung beeinträchtigen. Wenn es sich nicht um Legacyanwendungen handelt, bietet das My.Computer.FileSystem-Objekt eine bessere Leistung. Weitere Informationen finden Sie unter Dateizugriff mit Visual Basic.
Wenn Sie FileNumbers nicht angeben, werden alle aktiven und mit der FileOpen-Funktion geöffneten Dateien geschlossen.
Wenn Sie Dateien schließen, die im Output-Modus oder im Append-Modus geöffnet wurden, wird der letzte Ausgabepuffer in den Betriebssystempuffer für diese Datei geschrieben. Der gesamte der geschlossenen Datei zugeordnete Pufferspeicher wird freigegeben.
Durch Ausführen der FileClose-Funktion wird die Zuordnung einer Datei zu ihrer Dateinummer beendet.
Beispiel
Im folgenden Beispiel wird die FileClose-Funktion verwendet, um eine für Input geöffnete Datei zu schließen.
Dim TextLine As String
FileOpen(1, "TESTFILE", OpenMode.Input) ' Open file.
Do While Not EOF(1) ' Loop until end of file.
TextLine = LineInput(1) ' Read line into variable.
MsgBox(TextLine) ' Display the line
Loop
FileClose(1) ' Close file.
Hinweise für Entwickler intelligenter Geräte
Diese Funktion wird nicht unterstützt.
Anforderungen
Namespace:Microsoft.VisualBasic
**Modul:**FileSystem
**Assembly:**Visual Basic Runtime Library (in Microsoft.VisualBasic.dll)