走近VB.Net(十) 播放声音文件

Me.BorderStyle = FormBorderStyle.None ''''改变窗体边框为none,没有标题栏

button1.Text = "播放上段" : button2.Text = "播放下段" : button3.Text = "退出程序"

AxMMControl1.TimeFormat = 0

AxMMControl1.DeviceType = "waveaudio" ''''定义播放*.wav格式

AxMMControl1.filename = System.WinForms.Application.StartUpPath & "\" & "muli.wav" ''''载入文件， System.WinForms.Application.StartUpPath为当前目录的意思

AxMMControl1.Command = "open" ''''打开载入的文件

AxMMControl1.Visible = False ''''使控件不可见，在后台工作

End Sub

End Class

至于从几毫秒开始到几毫秒结束，是把不同的声音文件使用如acoustica.exe这样的声音编辑程序整理成一个文件，记住先使用windows的录音机录下来，这样生成的文件较小,把一些杂音，空白都剪切掉，这样就是很小了。

VB.Net中文站网址：http://vbnetcn.126.com

文章整理：西部数码--专业提供域名注册、虚拟主机服务
http://www.west263.com
以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息，谢谢!