バイナリーで保存

質問

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

回答No.1

dsuekichi · ベストアンサー

文字列を、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
------------------------------------------

お礼

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