
具体做法:
1。工具栏-》外接程序-》外接程序管理器-》加载
VB资源管理器
2。点击工具栏上的VB资源管理器
3。点击“添加自定义资源”,选择你要加载的mp3
这时你就看到mp3文件已经被作为资源载入了VB,引用这个资源的方法是使用函数
LoadRes(对象引用名)
程序最后写完编译的时候,VB会自动把mp3文件也写入exe文件中。
试试看吧,祝你好运
是用windowmediaplayer空间在工程——部件里面找到
应该在最下面
方法使用
windowmediaplayer1.url="e:\mp3\1.mp3"
放到form_load事件里面
拖进一个Windows
Media
Player控件,
设置其Visible属性为False
然后在Form_Load中用Windows
Media
Player加载你的背景音乐播放就OK了.
WindowsMediaPlayer1.Controls.play'播放WindowsMediaPlayer1.Controls.stop'停止
WindowsMediaPlayer1.Controls.pause'暂停
你这样连续让它播放\停止\暂停,它最后就是停止了,当然没有声音啦
Private Sub WindowsMediaPlayer1_OpenStateChange(ByVal NewState As Long)
WindowsMediaPlayer1.URL = "e:\wj\j.mp3"
WindowsMediaPlayer1.Controls.play
End Sub
就可以了
欢迎分享,转载请注明来源:内存溢出
微信扫一扫
支付宝扫一扫
评论列表(0条)