はじめまして。Openステートメントで
Dim FileFree As Integer
Dim AppPath As String 'ファイルパス
Open AppPath + "BinFile1.dat" For Binary As FileFree
としてオープンし
Putステートメントでデータを書き込むと、以前に書き込まれた内容が
のこってしまいます。以前のデータをクリアにしてバイナリ保存するには
どのようにしたらよいのでしょうか
ご教授よろしくお願いします。
Killステートメントを使って、事前にファイルを削除しておいて下さい。
もしくは、事前に「OutputモードでOpenして、すぐにCloseしておき、
その後で、BinaryモードでOpenしなおすという手もあります。
魔界の仮面弁士さん。ご教授ありがとうございました。
ツイート | ![]() |