注意
如果 Microsoft Jet 運算式服務以沙箱模式執行，則會停用本主題中所述的函數、方法、物件或屬性，這會防止評估可能不安全的運算式。 如需沙箱模式的詳細資訊，請在說明中搜尋「沙箱模式」。
傳回 Long，代表使用 Open 陳述式開啟之檔案的檔案模式。
語法
FileAttr (filenumber，returntype)
FileAttr 函數語法具有下列引數：
| 引數 | 描述 |
|---|---|
| 檔案編號 | 必要。 整數。 任何有效的檔案編號。 |
| ReturnType | 必要。 整數。 指出要傳回的資訊類型的數字。 指定 1 以傳回指出檔案模式的值。 僅在 16 位元系統中，指定 2 以擷取作業系統檔案控制代碼。 32 位元系統不支援 ReturnType 2，並且會造成錯誤。 |
傳回值
當 returntype引數為 1 時，下列傳回值會指出檔案存取模式：
| 眾數 | 值 |
|---|---|
| 輸入 | 1 |
| 輸出 | 2 |
| 隨機 | 4 |
| 附加 | 8 |
| 二進位 | 32 |
範例
注意
下列範例示範如何在 Visual Basic for Applications (VBA) 模組中使用此函數。 如需使用 VBA 的詳細資訊，請在 [搜尋] 旁的下拉式清單中選取 [開發人員參考]，並在 [搜尋] 方塊中輸入一個或多個字詞。
此範例使用 FileAttr 函數傳回開啟檔案的檔案模式和檔案控制碼。 只有在 16 位元系統上才會傳回檔案控制碼;在 32 位元系統中，傳遞 2 作為第二個引數會產生錯誤。
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.