バイナリファイルの上書き、追加、保存をするには？？【.NET】 (ID:116505)

名前

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

本文 π＋さんはじめまして。 ファイルの上書きの流れは上記の通りで問題ありません。 >上のようにBuffer(i) = 42とすると保存できないのでしょうか。 保存できないというのはファイルに書き込めないということなのでしょうか？ 上記のコードをほぼ流用しましたが、正常に変換・上書きできました。 以下にそのコードを記します。 Dim Buffer() As Byte Dim DataFile As New System.IO.FileStream("c:\read.txt", IO.FileMode.Open) Dim Size As Integer = CInt(DataFile.Length) ReDim Buffer(Size - 1) DataFile.Read(Buffer, 0, Size) 'DataFile.Read(Buffer, 0, Size - 1) ' これでは最後の１バイトが読み込まれません For i As Integer = 0 To UBound(Buffer) Select Case Buffer(i) Case &H57, &H49, &H4E, &H44, &H4F, &H57, &H53 Buffer(i) = &H2A End Select Next ' 書き込み位置を先頭に戻す(これが無いとファイルに追記されてしまう) DataFile.Seek(0, IO.SeekOrigin.Begin) ' 書き込み DataFile.Write(Buffer, 0, Size) ' ファイルを閉じる DataFile.Close()