求助:读取WAV文件改变字节位置
现在有个WAV录音文件,录音文件开始512个字节是文件头没有变化,之后每256字节的前256字节和后256字节交换了位置,请教如果读取并交换使其正常文件下载
Dim bytBlock1(255) As Byte, bytBlock2(255) As Byte谢谢,去试一下
Open App.Path & "\test.wav" For Binary As #1
Open App.Path & "\new.wav" For Binary As #2
Get #1, , bytBlock1
Get #1, , bytBlock2
Put #2, , bytBlock1
Put #2, , bytBlock2
Do Until EOF(1)
Get #1, , bytBlock1
Get #1, , bytBlock2
Put #2, , bytBlock2
Put #2, , bytBlock1
Loop
Close #2
Close #1
补充:VB , 多媒体