| Wednesday, September 24 2003 1:24 PM 当一定事件完成时，程序发出特定的信号则可以增加程序的用户界面特性，比如在下载完成或者选择一个命令的时候。使用一个多媒体功能，通过一个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 |
正在阅读：如何用VB程序来播放WAV文件如何用VB程序来播放WAV文件
2004-02-14 09:34
出处：PConline
责任编辑：huangpeidan
键盘也能翻页，试试“← →”键
