閉じる

FreeFile　使用可能なファイル番号を返す。




Dim FileNumber as Integer



FileNumber = FreeFile