关于sndPlaySound$$$$$$$$$$$$$$$$$$4

Question

我在网上看到了一个播放wav文件的程序，我安装的双操作系统（win98和win2000server），我的程序在2000下运行可以听到声音，但在win98下运行却听不到，请指教！！程序如下
模块内程序：
Public Declare Function sndPlaySound Lib "winmm.dll" Alias _
"sndPlaySoundA" (ByVal lpszSoundName As String, _
ByVal uFlags As Long) As LongPublic Const SND_SYNC = &H0
Public Const SND_ASYNC = &H1
Public Const SND_NODEFAULT = &H2
Public Const SND_LOOP = &H8
Public Const SND_NOSTOP = &H10
在form里的程序为：
Private Sub Command1_Click()
sFlags = SND_ASYNC Or SND_NODEFAULTsndPlaySound "notify.wav", sFlags
End Sub

Answer 1

哦！还有一个问题sndPlaySound "notify.wav", sFlags这句里的双引号中可以写入要播放文件的路径吗？我想在这用一个相对路径的方法程序如下：
Private Sub Command1_Click()dim voicenamevoicename = App.PathIf Right$(voicename, 1) <> "\" Then voicename = voicename & "\"voicename = voicename & "notify.wav"sFlags = SND_ASYNC Or SND_NODEFAULTsndPlaySound "voicename", sFlagsend sub
我测试的结果是在2000下和98下都不行，请各位大虾指教！

Answer 2

你确定你的.wav文件在你的程序目录下吗？