■ 0Byteファイルの作成

単純なコードで0Byteファイルを作成できます
要は出力モードでファイルをオープンし、そのまま閉じるだけです
ファイル番号には 1 〜 511 の任意の値を指定します
既に使用しているファイル番号を重複して使うのを防ぐため、FreeFile関数でファイル番号を取得するとよいでしょう

Dim w_fnum            As Integer    ' ファイル番号

    ' 空いているファイル番号を取得する
    w_fnum = FreeFile

    ' 出力モードでファイルをオープンする
    Open "C:\TMP\ZEROBYTE.DAT" For Output As w_fnum

    ' ファイルを閉じる
    Close w_fnum