.版本 2.程序集 窗口程序集1.程序集变量 ee, 文本型, , "0".程序集变量 rr, 整数型.程序集变量 aaa, 文本型.程序集变量 bbb, 文本型.子程序 __启动窗口_创建完毕编辑框1.内容 = “ 本程序是这样用的,您点击选择文件按钮后,可以选择多个mp3音频文件点击确定后,您选择的文件会添加到列表里,您可以用上下左右键来切换列表框里的文件,您切换的时候音乐开始被播放,本程序的热键说明:在音乐被播放的状态下,按下空格键、暂停播放,再按下继续播放,按下esc键停止播放,著:下列热键必须焦点在列表里才能够生效。”aaa = “列表手”bbb = “列表尾”.子程序 _按钮1_被单击ee = 多文件对话框 (“请选择要播放的音频文件,可以是多个文件!”, “mp3音频文件(*.mp3)|*.mp3”, , , 假).如果真 (取数组成员数 (ee) > 0) 插入成员 (ee, 1, aaa) .计次循环首 (取数组成员数 (ee), rr) 列表框1.加入项目 (ee , ) .计次循环尾 () 插入成员 (ee, rr + 1, bbb) 列表框1.加入项目 (bbb, ).如果真结束.子程序 _列表框1_列表项被选择.如果真 (列表框1.现行选中项 > 0) 播放MP3 (1, ee [列表框1.现行选中项]).如果真结束.子程序 _列表框1_按下某键, 逻辑型.参数 键代码, 整数型.参数 功能键状态, 整数型.局部变量 qq, 整数型qq = 取MP3播放状态 ().如果真 (键代码 = 32) .如果 (qq = 1) 暂停播放MP3 () .否则 继续播放MP3 () .如果结束.如果真结束.如果真 (键代码 = 27) 停止播放 ().如果真结束.如果真 (qq = 0) .如果真 (列表框1.现行选中项 > 0) 播放MP3 (1, ee [列表框1.现行选中项 + 1]) .如果真结束.如果真结束