在VB中调用WINAPI读写文件的问题

Question

不一定要用api的。用open "a.ext" for binary as #FileNum不是更好吗？

Answer 1

用二进制文件不是很好吗？干嘛非要用 API？

Answer 2

如各位所说，确实不一定要用API，用什么方法都行，只要给出完整的代码并能调试通过（VB6.0）。

Answer 3

'如果C文件仅仅是由A、B两文件连接而成(A在前B在后，无文件头两文件之间没有插入其它)Dim s1() As Byte
Dim s2() As Byte
Dim lena As Long 'A文件的已知字节数
Dim lenb As Long 'B文件的已知字节数
Redim s1(lena-1) As Byte
Redim s2(linb-1) As Byte'A、B、C为文件名(包括扩展名)Open "C:\C" For Binary As #1Get #1,1,s1()Get #1,lena +1,s2()Open "C:\A" For Binary As #2Put #2,,s1()Open "C:\B" For Binary As #3
Put #2,,s2()Close 

Answer 4

对不起上帖末2行有误！！'如果C文件仅仅是由A、B两文件连接而成(A在前B在后，无文件头两文件之间没有插入其它)Dim s1() As Byte
Dim s2() As Byte
Dim lena As Long 'A文件的已知字节数
Dim lenb As Long 'B文件的已知字节数
Redim s1(lena-1) As Byte
Redim s2(linb-1) As Byte'A、B、C为文件名(包括扩展名)Open "C:\C" For Binary As #1Get #1,1,s1()Get #1,lena +1,s2()Open "C:\A" For Binary As #2Put #2,,s1()Open "C:\B" For Binary As #3
Put #3,,s2()Close