Как сделать вызов файла с помошью кнопки?

[Virtuoso]

подскажите, пожайлуйста!
делаю будильник) хочу чтобы в нужное время запускал звуковой файл! ............ но чтобы не только wav, но и другие, ну хотя бы mp3.
нашёл как сделать wav, но отдельно это работает , а в моём будильнике не хочет ==>>

Private Declare Function sndPlaySound Lib "winmm.dll" Alias "sndPlaySoundA" _
(ByVal lpszSoundName As String, ByVal uFlags As Long) As Long
Private Const SND_SYNC = &H0
Private Const SND_ASYNC = &H1
Private Const SND_LOOP = &H8

Private Sub Command1_Click()
lpszSoundName = "C:\Windows\Media\ding.wav"
Call sndPlaySound(lpszSoundName, 1)
End Sub

В будильнике у него какие то проблемы с Private Declare ...
Кто чем может? )))

[uhm]

В поиск по слову mp3.

[Mikle]

Virtuoso
Да хоть MediaPlayer на форму кинь.
Еще проще:
http://bbs.vbstreets.ru/viewtopic.php?t ... highlight=

[Alex_2005]

ты где свою функцию объявил?

[FesK]

Private Declare Function sndPlaySound Lib "winmm.dll" Alias "sndPlaySoundA" _
(ByVal lpszSoundName As String, ByVal uFlags As Long) As Long
Private Const SND_SYNC = &H0
Private Const SND_ASYNC = &H1
Private Const SND_LOOP = &H8

Private Sub Command1_Click()
lpszSoundName = "C:\Windows\Media\ding.wav"
Call sndPlaySound(lpszSoundName, 1)
End Sub

API функцию объяви в модуле и без привата на счет констант не помню

[Kovu]

Хочешь *.mp3 юзай mciExecute
Что-то вроде

Код: Выделить всё

mciExecute "play " & FileName

Надеюсь и у тебя будет работать

[Sasha_karasov]

http://vbprosto.narod.ru/FAQVB.htm