バイナリーで保存

お世話になります。
ＶＢ６を使いプログラムを作成しているのですがデーター「 A,B,C,愛 」
をUNICODE でバイナリ形式で保存したいのですが手順がわかりません。
どなたか教えていただけないでしょうか。
よろしくお願いします。

No.1 ベストアンサー 回答者： dsuekichi 回答日時： 2007/10/17 18:06

文字列を、Byte型に代入して、Binaryモードで開いたファイルにPutするだけでは駄目なんでしょうか？

例えば、
------------------------------------------
Dim F As Integer
Dim s As String
Dim b() As Byte
s = "A,B,C,愛"
b = s
F = FreeFile()
Open "C:\uni.txt" For Binary As #F
Put #F, , b
Close #F
------------------------------------------

この回答へのお礼

ありがとうございます。
助かりました。

お礼日時：2007/10/18 09:48