背景音乐不仅在软件中起到“声”、“文”并茂的效果，而且能使用户减少在漫长的计算、等待过程中所带来的困倦和烦躁情绪，我们将通过用Microsoft Visual Basic开发为例，来讲解背景音乐在软件中的应用。

　　使用Microsoft Visual Basic进行多媒体音乐的播放是一件非常容易的事情。Microsoft Windows系统中支持两种声音文件：WAV格式文件和MIDI格式文件，一般使用API(Window
s应用程序编程接口)函数sndPlaySound播放WAV格式文件，使用mciExecute函数来播放MIDI文件。

　　1、播放WAV格式文件

　　要播放WAV格式文件，你必须在程序窗口的通用声明部分或标准模块中添加如下的声明：

　　Public Const SND_SYNC = &&H0

　　Public Const SND_ASYNC = &&H1

　　Public Const SND_NODEFAULT = &&H2

　　Public Const SND_MEMORY = &&H4

　　Public Const SND_ALIAS = &&H10000

　　Public Const SND_FILENAME = &&H20000

　　Public Const SND_RESOURCE = &&H40004

　　Public Const SND_ALIAS_ID = &&H110000

　　Public Const SND_ALIAS_START = 0

　　Public Const SND_LOOP = &&H8

　　Public Const SND_NOSTOP = &&H10

　　Public Const SND_VALID = &&H1F

　　Public Const SND_NOWAIT = &&H2000

　　Public Const SND_VALIDFLAGS = &&H17201F

　　Public Const SND_RESERVED = &&HFF000000

　　Public Const SND_TYPE_MASK = &&H170007

　　Private Declare Function sndPlaySound Lib "winmm.dll" Alias "sndPlaySoundA" (ByVal lpszSoundName As String, ByVal uFlags As Long) As Long

　　sndPlaySound函数需要两个参数：第一个参数soundfilename是要播放的WAV文件的名称；第二个参数是一个表明播放方式的标识常量，其定义的值如前面的声明所示，通常所使用的标识意义如下：

　　SND_SYNC播放WAV格式文件，播放完毕后将控制转移回应用中。

　　SND_ASYNC播放WAV格式文件，将控制立即转移回应用程序中，而不管对WAV文件的播放是否结束。

　　SND_MEMORY用于播放以前已经加载到内存中的WAV格式文件。

　　SND_LOOP循环播放WAV格式文件。

　　注意：SND_LOOP标识通常需要同SND_ASYNC共同使用，也即在两个标识之间添加“与”播放符，以免在对WAV格式文件进行播放的时候将系统挂起。

　　2、播放MIDI格式文件

　　播放MIDI格式文件时，你必须在程序窗口的通用声明部分中或标准模块中添加如下的声明语句：

　　Private Declare Function mciExecute Lib "winmm.dll" Alias "mciExecute" (ByVal lpstrCommand As String) As Long

　　API函数mciExecute只有一个参数：CommandString，它是一个命令字符串，用于表明对声音文件播放的命令，例如，要完整播放声音文件“C:WindowsMediaCanyon.mid”，只需要用以下一些语句即可实现：

　　Dim ReturnValue As Long

　　ReturnSoundValue = mciExecute("play C:WindowsMediaCanyon.mid")

　　如果只播放MIDI格式文件的部分，就可以使用from...to...这种语句格式，例如：需要播放CANYON.MID文件的20毫秒到500毫秒的部分，可以使用如下的语句：

　　Dim ReturnValue As Long

　　ReturnSoundValue = mciExecute("play C: WINDOWS MEDIACANYON.MID from 20 to 500")

　　使用API函数mciExecute也可以用来对WAV格式文件进行播放，方法同播放MIDI基本一样。现举列如下：

　　1、在Visual Basic应用窗体中加入以下声明：

　　Private Declare Function sndPlaySound Lib "winmm.dll" Alias "sndPlaySoundA" (ByVal lpszSoundName As String, ByVal uFlags As Long) As Long

加载微软的一个音效部件
名字好象叫：Microsoft Multimedia Control 6.x
确切版本我忘了~
你增加了这个部件后，可以右键点击，选择属性进行配置

首先我没有学过vb程序设计．在下学的是c++可视化编程．不过天下程序思想出自一家．我可以告诉你一个这样的思想：
　在c＋＋中有一个播放媒体的函数件＂Mdiaplayer＂,我想vb也一定有的．你可以这样来做：用鼠标单击form界面，然后单击属性栏中form的onAcvite.得到一个代码输入的模块区域，你可以写这样的代码（c＋＋的例子）
MediaPlayer->filename="在这里写下你所添加的音乐的位置路径"，
Mediaplayer->Open();　　/*打开播放媒体*/
Mediaplayer->play();　　　/*开始播放*/

当然如果你想用button来控制，你可以把代码写在buttonclick里面罗．

我想最简单的方法就是使用windowsmediaplayer控件，在“工程”－“部件”里选择windows media player，然后在窗体上创建一个对象，修改该对象的属性分别是：
1.visual－false
2.url－你想播放音乐的绝对路径
3.autostart－true