|
21楼
发表于 2018-1-1 12:20:22
|
只看该作者
江西省景德镇市
MP3上一曲下一曲代码,下载器需要修复一下
.版本 2
.支持库 iext
.子程序 _按钮4_被单击
超级列表框1.现行选中项 = 超级列表框1.现行选中项 + 1
.如果真 (超级列表框1.现行选中项 = 超级列表框1.取表项数 ())
超级列表框1.现行选中项 = 超级列表框1.现行选中项 - 1
超级列表框1.获取焦点 ()
返回 ()
.如果真结束
播放___音乐 (超级列表框1.取标题 (超级列表框1.现行选中项, 4), 超级列表框1.取标题 (超级列表框1.现行选中项, 5))
MP3播放器.播放 ()
时钟1.时钟周期 = 500
时钟2.时钟周期 = 0
超级列表框1.获取焦点 ()
.子程序 _按钮2_被单击
超级列表框1.现行选中项 = 超级列表框1.现行选中项 - 1
.如果真 (超级列表框1.现行选中项 < 0)
超级列表框1.现行选中项 = 超级列表框1.现行选中项 + 1
超级列表框1.获取焦点 ()
返回 ()
.如果真结束
播放___音乐 (超级列表框1.取标题 (超级列表框1.现行选中项, 4), 超级列表框1.取标题 (超级列表框1.现行选中项, 5))
MP3播放器.播放 ()
时钟1.时钟周期 = 500
时钟2.时钟周期 = 0
超级列表框1.获取焦点 ()
|
|