1、在自己的工程里添加一个资源文件。
2、打开添加的资源文件,资源类型选择为音频,点击添加资源把准备好的wav格式音乐文件添加进入资源文件。
3、设置资源属性和文件属性为嵌入
4、代码以及调用方法
1 Private Sub Play_Music(ByVal Mname As String)
2
3 Dim res As IO.Stream = Reflection.Assembly.GetEntryAssembly.GetManifestResourceStream("宇宙诗集." & Mname) '把这里的'宇宙诗集'更改为你的工程名
4
5 Dim bytes(res.Length - 1) As Byte
6
7 res.Read(bytes, 0, bytes.Length)
8
9 My.Computer.Audio.Play(bytes, AudioPlayMode.BackgroundLoop)