VB 二进制数据读写实例

代码如下:

Dim arrBinary() As Byte

Open "C:\123.exe" For Binary As #1
ReDim arrBinary(LOF(1) - 1) '重定义数组
Get #1, , arrBinary() '将文件的数据赋给arrBinary二进制数组变量
Close #1

Open "C:\456.exe" For Binary As #1
Put #1, , arrBinary() '将刚才的数据写到C:\456.exe文件中
Close #1

 

相关参考


VB 二进制文件的操作

进制转化进10进制数 

VB 二进制文件的操作 

VB 二进制数组与十六进制字符串相互转换

VB 进制转换大全(十进制、十六进制、八进制、二进制、二进制流)互转


 

VB相关

VB 读写TXT文本文件函数

VB 提取TextBox 文本框中指定一行字符串

VB 获取汉字拼音的首字母

VB

你可能感兴趣的:(VB 二进制数据读写实例)