> モード指定もなにもActiveBasicはバイナリモードでしか開くことができません。
とありますが、バイナリで書き込む方法はどうするのでしょうか?
ヘルプを見ながら作ったのですが読み込み方は次の方法でよろしいのでしょうか?
コード:
’書き込み
Dim buffer As String
Dim byt As Byte
buffer="12"
Open "write.txt" as #1 ’当然のことながらファイルはバイナリにはならない
Field #1,2
Put #1,1,buffer
Close #1
’読み込み
buffer=""
Open "write.txt" as #2
Field #2,2
Get #2,1,buffer
Close #2
byt=Asc(buffer)
MessageBox(0,Str$(byt),"ファイルの中身",MB_OK)