VB.NET播放WAV实现方法介绍

VB.NET编程语言可以说功能是非常强大的。而且其的应用范围也是很广泛。比如对界面的操作，和对声音的操作等等。我们今天将会了解到有关VB.NET播放WAV的相关应用技巧，希望能给大家大带来希望。

10年积累的成都网站制作、网站建设经验，可以快速应对客户对网站的新想法和需求。提供各种问题对应的解决方案。让选择我们的客户得到更好、更有力的网络服务。我虽然不认识你，你也不认识我。但先网站制作后付款的网站建设流程，更有营山免费网站建设让你可以放心的选择与我们合作。

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):第一个变量为一个文件名。

所以，以下VB.NET播放WAV代码播放了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.NET播放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.NET播放WAV的其他方法包括窗体上的多媒体控制。当你不需要这些控制特性时，以上讲述的技术已经足够，并且很容易掌握。

【编辑推荐】

1. VB.NET嵌入文件操作技巧分享
2. 深入分析VB.NET FieldOffset特性
3. VB.NET资源文件应用经验总结
4. VB.NET Dllimport特性内容概述
5. 简单实现VB.NET打开Notes数据库

标题名称：VB.NET播放WAV实现方法介绍
URL分享：http://www.mswzjz.com/qtweb/news36/190086.html

网站建设、网络推广公司-创新互联，是专注品牌与效果的网站制作，网络营销seo公司；服务项目有等

广告

声明：本网站发布的内容（图片、视频和文字）以用户投稿、用户转载内容为主，如果涉及侵权请尽快告知，我们将会在第一时间删除。文章观点不代表本网站立场，如需处理请联系客服。电话：028-86922220；邮箱：631063699@qq.com。内容未经允许不得转载，或转载时需注明来源： 创新互联