vb 载入自己目录的音乐
2011-07-27 22:42
127 查看
要在任何机器上都能播放,需要把那首歌通过资源文件, 加入你的EXE文件里. 运行时释放临时文件, 关闭前删除临时文件. 工具 => VB资源编辑器 => "添加自定义资源"按钮(倒数第二) => 选择你要播放的歌曲 此时 VB资源编辑器 里有一个 "CUSTOM" 项, 其下有资源 "101". Dim sTempMp3Path As String '打开时释放临时文件 Private Sub Form_Load() Dim bMp3() As Byte '自定义释放的文件名(扩展名按原音乐的扩展名) sTempMp3Path = App.Path & "\temp.mp3" bMp3 = LoadResData(101, "CUSTOM") '读取资源 '释放资源 Open sTempMp3Path For Binary Access Write As #1 Put #1, , bMp3 Close #1 End Sub Private Sub 音乐_Click() WindowsMediaPlayer1.URL = sTempMp3Path End Sub '关闭前删除临时文件 Private Sub Form_Unload(Cancel As Integer) Kill sTempMp3Path End Sub
相关文章推荐
- C#、VB.NET将自己的程序注册到系统的右键菜单(所有文件和目录)
- VB遍历目录文件
- 自己写的文件操作的function和Sub vb.net dll
- VB 利用WMI进行共享目录的监视
- 自己定义ProgressDialog载入图片
- 载入音乐
- 嵌入式Linux中在开发板上/usr/bin目录下不能运行自己交叉编译的程序
- VB为自己的程序设定消息(可接收处理)
- eclipse工程目录内文件显示为xml格式,更改成自己想要的格式
- 让VB菜鸟最快写出自己的外挂.通杀所有游戏
- Linux网络编程一步一步学-自己编写一个HTTP协议的目录浏览和文件下载服务器
- 实现自己的音乐搜索软件(三)
- 给自己的BLOG来点音乐如何?
- 公布《编程的奥秘》配套升级版《.NET 2.0面向对象程序设计(VB2005篇)》写作构想及全书目录
- android 屏蔽某一目录下的图片资源 音乐或是图片库不显示指定数据夹
- jacob自己动生成word文档目录
- 谈vb目录文件操作的三种方法
- ASP.NET MVC 音乐商店 - 目录
- 自己拷贝的目录没有操作权限?
- VB.NET获取系统特殊目录