Unicode文字をバイナリでファイル入出力するには？ (ID:85544)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 Windows2000、VB6.0 上の環境で、中国語で入力された文字をファイルにバイナリで 落とそうとしています。 例えば（中国語簡体字の）「謝」はUnicode「22 8C」で入力されるのですが ファイルに落とすと「3F 00」で保存されてしまいます。 ソースは下のように書いています。 fno = FreeFile fPath = "D:\Work\Data.dat" Open fPath For Binary Access Write As fno Put fno, , rData Close fno FileSystemObjectを使えばテキストでUnicodeで保存できることは 確認しているのですが、なんとかバイナリで落とす方法はないか 調べています。 上の方法では、保存するときにShiftJISになってしまうのでしょうか？