注: Microsoft Jet Expression Service がサンドボックス モードで実行されている場合 (安全でない可能性がある式の評価は行われません)、このトピックで説明する関数、メソッド、オブジェクト、またはプロパティは無効です。 サンドボックス モードの詳細については、ヘルプで "サンドボックス モード" を検索してください。
Open ステートメントを使用して開いたファイルの大きさをバイト単位で示す Long データ型の値を返します。
構文
LOF( filenumber )
filenumber 引数 は必須の引数です。有効な ファイル番号 を整数データ型で指定します。
注: 開いていないファイルの長さを取得するには、FileLen 関数を使用します。
例
注: 次の例は、Visual Basic for Applications (VBA) モジュールでのこの関数の使用方法を示しています。 VBA の使用方法の詳細については、[検索] の横にあるドロップダウン リストで [開発者用リファレンス] を選び、検索ボックスに検索する用語を入力します。
この例では、LOF 関数を使用して開いているファイルのサイズを調べます。 この例では、TESTFILE がサンプル データを含むテキスト ファイルであると想定しています。
Dim FileLength
Open "TESTFILE" For Input As #1 ' Open file. FileLength = LOF(1) ' Get length of file. Close #1 ' Close file.