VB - 如何读写二进制文件？

Question

如何从任何文件中读取原始字节数组...

 Dim bytes() as Byte

..然后将该字节数组写回新文件？

我需要它作为字节数组来进行一些处理。

---

我目前正在使用：

阅读

 Dim fInfo As New FileInfo(dataPath)
 Dim numBytes As Long = fInfo.Length
 Dim fsAs New FileStream(dataPath, FileMode.Open, FileAccess.Read)
 Dim br As New BinaryReader(fs)
 Dim bytes As Byte() = br.ReadBytes(CInt(numBytes))
 br.Close()
 fs.Close()

写

Dim fs As System.IO.FileStream
fs = New System.IO.FileStream(outpath, System.IO.FileMode.Create)
fs.Write(bytes, 0, bytes.Length)
fs.Close()

Answer 1

Dim data() as Byte = File.ReadAllBytes(path1)
File.WriteAllBytes(path2, data)

Answer 2

System.IO.File.ReadAllBytes("myfile.txt")

Answer 3

试试这个： -

Dim bytes() as Byte
bytes = File.ReadAllBytes(fileName)
'' # Do stuff to the array
File.WriteAllBytes(otherFileName, bytes)