在VB中读写二进制文件主要通过以下步骤和语句实现，结合了基础方法和高级类库操作：
一、基础方法（适用于VB6/7/8）
打开文件
使用`Open`语句以二进制模式打开文件，需在模式参数中添加`For Binary`（VB6/7）或`For Binary Access`（VB8）。
```vb
Dim fileNumber As Integer
fileNumber = FreeFile()
Open "C:example.bin" For Binary As fileNumber
```
读取文件
使用`Get`语句按位置读取数据，或使用`LOF`函数获取文件长度后一次性读取全部内容。
```vb
' 按位置读取
Get fileNumber, 100, 50 ' 读取第100个字节开始的50个字节
' 一次性读取全部内容
Dim bytes(LBound(arr) To UBound(arr)) As Byte
LBound(arr) = Get fileNumber, , bytes
UBound(arr) = Get fileNumber, , bytes
```
写入文件
使用`Put`语句将数据写入指定位置，或覆盖原有内容。
```vb
' 覆盖写入
Put fileNumber, 100, 50, "Hello, World!"
' 追加写入
Put fileNumber, 100, 50, 137, 101, 108, 108, 111 ' ASCII码表示的"Hello"
```
关闭文件
操作完成后使用`Close`语句释放资源。
```vb
Close fileNumber
```
二、高级类库方法（推荐使用）
VB.NET引入了`System.IO`命名空间，提供更简洁的`FileStream`类和`BinaryReader`/`BinaryWriter`类，适用于复杂场景。
示例：使用FileStream读写二进制文件
```vb
' 读取二进制文件
Dim fs As New FileStream("C:test.bin", FileMode.Open, FileAccess.Read)
Dim buffer(1024) As Byte
fs.Read(buffer, 0, buffer.Length)
fs.Close()
' 写入二进制文件
Dim fsWrite As New FileStream("C:output.bin", FileMode.Create, FileAccess.Write)
fsWrite.Write(buffer, 0, buffer.Length)
fsWrite.Close()
```
三、注意事项
错误处理
建议使用`On Error Resume Next`或`Try...Catch`块处理文件操作异常，避免程序崩溃。
文件关闭
每次文件操作后必须关闭文件，或使用`With`语句自动管理资源。
数据类型匹配
读写时需确保数据类型一致，例如读取4个整数需预留4个整数的存储空间。
通过以上方法，可灵活实现二进制文件的读写操作，满足图像、音频等非文本数据的处理需求。