vb 载入声音

我在用vb做一个程序，要程序一运行就加载音乐，中途可以停止，而且音乐要能够打包到exe文件中，请问代码怎么写？谢谢啦！！

如果是.wav，可以用OLE控件，选择由文件创建。 OLE1.Action=7 '播放，9停止。 很简单，嵌入模式（缺省）可打包到frx（窗体数据文件）、exe（你要的）、ctx（用户控件数据文件）、ocx（ActiveX控件）等。 运行时自动把文件放到临时文件夹（可被清除垃圾程序删除）。 .wav文件是直接播放，其它文件按关联运行（比如wma、mp3就会调用所关联的播放器，不是你要的效果。）。 希望对你有帮助，实在要用其它文件，就学习一下资源文件，要用到二进制文件操作。

dim t() as byte t = loadresdata(101, "custom") '读取资源 open app.path & "\1.mp3" for binary as #1'保存成mp3 put #1, , t close

然后你把保存的文件指定到播放器就可以了