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
新聞熱點
疑難解答
