数値 バイナリ 保存で保存する方法

質問

お世話になります。先日からUNICODE と バイナリ形式の保存にはまっています。

10進数 30を16進にすると1E ですが、手元に 1E 00 00 00 とバイナリエディタで
読めるファイルがあります。
このようなファイルを VB で作成するにはどうすれば良いでしょうか。

よろしくお願いいたします。

回答No.2

siro7aka7 · ベストアンサー

MSDNのファイル関連です。

VB6なら以下でどうでしょう。
---------------------------------------------
Open "ファイル名" For Binary Access Write As #ファイル番号
Print #ファイル番号, "書き込む内容"
Close #ファイル番号
---------------------------------------------

参考URL：

http://msdn2.microsoft.com/ja-jp/library/c520bdhb(VS.80).aspx

お礼

何とか解決できました。
結論は何も考えずそのままPutすることでイメージしていたBinary を作成することができました。

Private Sub Command1_Click()
Dim A As Long
Dim B As Integer

Close #1: Open "C:\DATA.IJP" For Binary As #1
A = 30
Put #1, 90, A

' 90 バイト目に 30 を書込む バイナリ・エディタで確認すると E1 00 00 00
' A は Long 型で宣言しているので 90バイト から 4 バイト　使用

B = 128
Put #1, 94, B

' 94 バイト目に 128 を書込む バイナリ・エディタで確認すると 80 00
' B は Integer 型で宣言しているので 94バイト から 2 バイト　使用
Close #1
End Sub

回答No.1

ape5

BinaryWriter
を利用すればできるかと思います。

お礼

何とか解決できました。

補足

説明不足ですみません。ＶＢ６でもBinaryWriterは使えますか　？