在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个整数的存储空间。

通过以上方法，可灵活实现二进制文件的读写操作，满足图像、音频等非文本数据的处理需求。