freefile 関数

構文    freefile()

機能
　利用可能なファイル番号(1〜5)を返します。
　利用可能なファイル番号が無いときは 0 を返します。

例
dim fnum

fnum = freefile()
open "test.txt" for input as #fnum

最新情報　　TOP　　マクロTOP