VB中关于二进制文件的问题

发布网友发布时间：2023-09-25 10:32

共2个回答

热心网友时间：2024-09-01 23:22

你应一个字节一个字节的复制

e = LOF(1) e是文件1的长度
a$ = Space(e) 是e个空格
2中全是[空格当然不能执行

热心网友时间：2024-09-01 23:23

Private Sub Command1_Click()
Dim a() As Byte

Open "a.exe" For Binary As #1
ReDim a(LOF(1) - 1)
Get #1, , a()
Close #1

Open "b.exe" For Binary As #2
Put #2, , a()
Close #2
End Sub

'不要用字符型，而用字节型。

声明：本网页内容为用户发布，旨在传播知识，不代表本网认同其观点，若有侵权等问题请及时与本网联系，我们将在第一时间删除处理。E-MAIL:11247931@qq.com