启动应用程序时,背景音乐开始播放。 下面的代码使我能够做到这一点, 只要我将WAV音频文件集成到资源中即可。
不幸的是,WAV音频文件非常重:我的文件为40 MB。 如果我在mp3中使用了相同的音频文件,则为2.75 MB。
Visual Basic不接受mp3文件。有没有办法解决这个问题? 谢谢您的答复。
MainWindow类
'Music Background.
Private Sub Main_Form_Loaded(sender As Object, e As RoutedEventArgs) Handles Main_Form.Loaded
Dim son = New Media.SoundPlayer(My.Resources.My_Music)
son.PlayLooping()
答案 0 :(得分:0)
谢谢GSerg,您的链接使我能够找到解决方案:以下代码可以完美运行。 以前,请在Visual Studio下安装Naudio。然后, 导入System.IO-导入NAudio.Wave
音乐背景。
Private Sub Form_Main_Loaded(sender As Object, e As RoutedEventArgs) Handles Form_Main.Loaded
Dim mp3file As MemoryStream = New MemoryStream(My.Resources.My.Music)
Dim mp3Reader As Mp3FileReader = New Mp3FileReader(mp3file)
Dim waveOut As WaveOut = New WaveOut
waveOut.Init(mp3Reader)
waveOut.Play()
另一个问题:是否存在播放音乐循环的功能或其他代码?谢谢您的答复。