Hey guys, i need a wave sound file for my program i am working for a basic tutorial for grade school and pre-scool so i am looking for a sound file that fitted to my quiz in pre-school i can`t find in google or to any sites..
ThisIsNotYourS 0 Newbie Poster
mahela 0 Light Poster
you must locate your sound file (abcd.wav) at the dirrectory that contain vb6 application.
private sub cmd1_click()
on error resume next
soundfile= App.path & "/" & "abcd.wav"
returnaval=playsound(soundfile, 0, &H0)
Endsub
hope this will help you.
mahela 0 Light Poster
sorry I forgot the most improtant part.please use below code set.
Private Declare Function PlaySound Lib _
"winmm.dll" _
(ByVal lpszName As String, ByVal _
hModule As Long, ByVal dwFlags As Long) As Long
private sub cmd1_click()
on error resume next
soundfile= App.path & "/" & "abcd.wav"
returnaval=playsound(soundfile, 0, &H0)
Endsub
sorry for the lost code set.enjoy now.
debasisdas 580 Posting Genius Featured Poster
The code is perfectly fine, but what i understand from the question is the OP is aking for a wave file not how to play it. OP needs a file not the code to open it.
mahela 0 Light Poster
Oh I see.you are correct.you can use wave file making software like..
Click Here
hope it may help you to make your own wave file.
michellspijkers 0 Newbie Poster
Hi!
Your problem is the first opportunity for me to finally post something here.
Your quiz software is probably very specific therefore you cannot find anything that will fill your needs . I had the same situation some time ago and found the following solution;
You can record your own wave using Audacity (freeware) then save it using whatever name you and directory you wish then in your Form declaration section insert the following code ( on 1 line )
Private Declare Function PlaySound Lib "winmm.dll" Alias "PlaySoundA" (ByVal lpszName As String, ByVal hModule As Long, ByVal dwFlags As Long) As Long
Insert the following code in the command button ( or whatever else you are using) to play the file.
retval = PlaySound("C:\wave directory name\filename.wav", 0&, &H20000)
Remember to change the directory name and filename to coincide with yours
I hope it solves the problem for you as it did for me
Be a part of the DaniWeb community
We're a friendly, industry-focused community of developers, IT pros, digital marketers, and technology enthusiasts meeting, networking, learning, and sharing knowledge.