Почему "ломается" файл wav после вытаскивания из ресурсов - VB

Формулировка задачи:

Отправляю в Ресурсы рабочий wav, пытаюсь вытащить таким образом:

Open "C:\0001.wav" For Binary As #1
Put #1, , LoadResData(101, "CUSTOM")
Close #1

Подскажите, ПЛЗ, что не так делаю !!

Решение задачи: «Почему "ломается" файл wav после вытаскивания из ресурсов»

textual
                            Листинг программы 
                        

                            Dim Waw() As Byte
Waw=LoadResData(101, "CUSTOM")
Open "C:\0001.wav" For Binary As #1
Put #1, , Waw
Close #1
                        

Оцени полезность:

8 голосов , оценка 3.75 из 5

Похожие ответы