如何用VB程序来播放WAV文件

　　第二，程序必须具有为用户提供关闭声音的选择设置。这一过程可以通过使用一个比如gProgramSoundsEnabled的全局布尔变量来实现。

　　我的方法是在一个函数中同时处理这些需要，如下所示。(以下代码假设音频文件已经存放在程序文件中)

　　Private Sub PlaySoundX(filename As String)

　　' If sound is enabled and filename exists,
　　' play the specified sound.

　　filename = App.path & "\" & filename

　　If FileExists(filename) And gProgramSoundsEnabled Then
　　　PlaySound filename, CLng(0), SND_ASYNC Or SND_FILENAME
　　End If

　　End Sub

　　正确使用这些函数，程序就可以播放任何Wave文件，如下所示：

　　PlaySoundX "DingDong.wav"

　　从VB程序播放音频文件的其他方法包括窗体上的多媒体控制。当你不需要这些控制特性时，以上讲述的技术已经足够，并且很容易掌握。(ZDNET CHINA)

进入讨论组讨论。