FileAttr-FunktionFileAttr function

Gibt einen Long -Wert zurück, der den Dateimodus für mit der Open -Anweisung geöffnete Dateien darstellt.Returns a Long representing the file mode for files opened by using the Open statement.

SyntaxSyntax

FileAttr (FileNumber, returnType)FileAttr(filenumber, returntype)


Die Syntax der FileAttr-Funktion enthält die folgenden benannten Argumente:The FileAttr function syntax has these named arguments:

TeilPart BeschreibungDescription
filenumberfilenumber Erforderlich; Integer.Required; Integer. Eine gültigeDateinummer.Any valid file number.
ReturnTypereturntype Erforderlich; Ganze Zahl.Required; Integer. Zahl, die den Typ der zurückzugebenden Informationen angibt.Number indicating the type of information to return. Geben Sie 1 an, um einen Wert zurückzugeben, der den Dateimodus angibt.Specify 1 to return a value indicating the file mode. Geben Sie auf 16-Bit-Systemen nur 2 an, um ein Dateihandle für das Betriebssystem abzurufen.On 16-bit systems only, specify 2 to retrieve an operating system file handle. ReturnType 2 wird in 32-Bit-Systemen nicht unterstützt und verursacht einen Fehler.Returntype 2 is not supported in 32-bit systems and causes an error.

RückgabewerteReturn values

Wenn das returnType - Argument 1 ist, geben die folgenden Rückgabewerte den Dateizugriffsmodus an:When the returntype argument is 1, the following return values indicate the file access mode:

ModeMode WertValue
EingabeInput 11
AusgabeOutput 22
ZufälligRandom 44
AppendAppend 88
BinärBinary 3232

BeispielExample

In diesem Beispiel wird **** die FileAttr-Funktion verwendet, um den Dateimodus und das Dateihandle einer geöffneten Datei zurückzugeben.This example uses the FileAttr function to return the file mode and file handle of an open file. Das Dateihandle wird nur auf 16-Bit-Systemen zurückgegeben; bei 32-Bit-Systemen wird durch Übergeben von 2 als zweites Argument ein Fehler generiert.The file handle is returned only on 16-bit systems; on 32-bit systems, passing 2 as a second argument generates an error.

Dim FileNum, Mode, Handle
FileNum = 1    ' Assign file number.
Open "TESTFILE" For Append As FileNum    ' Open file.
Mode = FileAttr(FileNum, 1)    ' Returns 8 (Append file mode).
Handle = FileAttr(FileNum, 2)    ' Returns file handle.
Close FileNum    ' Close file.

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.