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) 10 End Sub

