如何用VB程序来播放WAV文件
发布时间:2018-09-19 编辑:jiaochengji.com
教程集为您提供如何用VB程序来播放WAV文件等资源,欢迎您收藏本站,我们将为您提供最新的如何用VB程序来播放WAV文件资源
你所需要的API函数称为PlaySound,以下为该函数的声明:
Public Declare Function PlaySound Lib "winmm.dll" _
Alias "PlaySoundA" (ByVallpszName As String, _
ByValhModule As Long, ByValdwFlags As Long) _
As Long
在这一函数中,第一个变量是名称,包括运行的Wave文件的路径。第二个变量在运行文件时通常不使用,所以你可以将它赋值为zero。最后一个变量包含控制函数如何工作的标记。
为了当前的需要,必须需要两个标记。它们是:
SND_ASYNC (value= 1):以异步方式运行,这意味着当播放声音时函数在运行。
SND_FILENAME (value = &H20000):第一个变量为一个文件名。
所以,以下代码播放了DingDong.wav文件中的声音:
PlaySound "dingdong.wav", CLng(0), _
SND_ASYNC Or SND_FILENAME
当运行在一个程序中运行音频文件时,还有其他两点值得注意。第一,你必须确保一个特定的音频文件存在,否则会产生错误。这一过程可以用以下一个简单的函数来完成:
Public Function FileExists(FullFileName) As Boolean
' Passed a filename (with path) returns
' True if the file exists, False if not.
Dim s
s = dir(FullFileName)
If s = "" Then
FileExists = False
Else
FileExists = True
End If
End Function
第二,程序必须具有为用户提供关闭声音的选择设置。这一过程可以通过使用一个比如gProgramSoundsEnabled的全局布尔变量来实现。
您可能感兴趣的文章:
如何用VB程序来播放WAV文件
VB 从零开始编外挂(十二)
jquery 网页自动播放声音实例
C#中使用DirectX编程
如何实现VB和VC的联合调试
HTML5嵌入音频和视频的方法
html5中audio(音频)的分析
HTML5中音频的详细解析
虎牙直播常见问题汇总
HTML5视频播放的详细介绍
[关闭]