BASICマクロでGETとPUTがエラーを起こす

[ens]

BASICマクロでバイナリファイルを開き、バイナリデーターをGETしようとすると、
「BASIC ランタイムエラー.デバイス I/O エラー。」のエラーを起こします。

バイナリではなくなりますが、Inputでは問題なく読み込みます。

ご教授お願い致します。

・
・
・
Open aFile For Binary Access Read Shared As #iNumber Len=1
While not eof(iNumber)
  Seek #iNumber,1
  Get #iNumber, ,sText '（sTextはVariant宣言です。）
・
・
・

[himajin100000]

• methods1.cxx (revision 9e0b3423) - OpenGrok cross reference for /core/basic/source/runtime/methods1.cxx
• methods1.cxx (revision 9e0b3423) - OpenGrok cross reference for /core/basic/source/runtime/methods1.cxx
• methods1.cxx (revision 9e0b3423) - OpenGrok cross reference for /core/basic/source/runtime/methods1.cxx
• methods1.cxx (revision 9e0b3423) - OpenGrok cross reference for /core/basic/source/runtime/methods1.cxx

sTextはVariant

それが原因です。

[himajin100000]

なお、エンディアンがどっちかは調べてない