Как звуки воспроизвести я знаю, а вот как из этого ResFile - чето не доходит.
И второй вопрос если я скомпилирую проект в exe, то WAV будет внутри самого exe?
Спасибо за ранее!

dim WavSound as byte()
WavSound=loadresdata(101,"custom") 'загружаем звук в переменную. 101-имя файла в ресурсе
Open app.path & "\sound.wav" For Binary Access Write As #1 'открываем файл
Put #1, 1, WavSound 'записываем данные
Close #1 'закрываем файл
'Теперь файл "sound.wav" можно проиграть, а потом удалить.
Сейчас этот форум просматривают: AhrefsBot и гости: 14