展开全部
注:仅支持MP3格式。其他格式需要用媒体播放器。但思路都是一样的
代码:
.版本 2
.子程序 _按钮1_被单击
.如果 (按钮1.标题 = “播放”)
.如果真 (编辑框2.内容 = “”)
信息框 (“请填写音乐位置”, 0, )
返回 ()
.如果真结束
.如果真 (到整数 (编辑框1.内容) ≤ 0)
信息框 (“请填写延迟播放时间”, 0, )
返回 ()
.如果真结束
时钟1.时钟周期 = 到整数 (编辑框1.内容) × 1000
按钮1.标题 = “停止”
.否则
时钟1.时钟周期 = 0
停止播放 ()
按钮1.标题 = “播放”
.如果结束
.子程序 _时钟1_周期事件
.如果 (选择框1.选中)
播放MP3 (-1, 编辑框2.内容)
.否则
播放MP3 (, 编辑框2.内容)
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
.版本 2
.子程序 _按钮1_被单击
.局部变量 检测是否暂停, 整数型, 静态
.如果真 (检测是否暂停 = 0)
播放MP3 (, “E:\段飞强\音乐\苏仨 - 练武功.mp3”)
检测是否暂停 = 1
返回 ()
.如果真结束
.如果真 (检测是否暂停 = 1)
暂停播放MP3 ()
检测是否暂停 = 2
返回 ()
.如果真结束
.如果真 (检测是否暂停 = 2)
继续播放MP3 ()
检测是否暂停 = 1
已调试,完全可以是,完善的话,可以自己摸索,提高技术
.子程序 _按钮1_被单击
.局部变量 检测是否暂停, 整数型, 静态
.如果真 (检测是否暂停 = 0)
播放MP3 (, “E:\段飞强\音乐\苏仨 - 练武功.mp3”)
检测是否暂停 = 1
返回 ()
.如果真结束
.如果真 (检测是否暂停 = 1)
暂停播放MP3 ()
检测是否暂停 = 2
返回 ()
.如果真结束
.如果真 (检测是否暂停 = 2)
继续播放MP3 ()
检测是否暂停 = 1
已调试,完全可以是,完善的话,可以自己摸索,提高技术
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
这不是废话!当然能了!
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询