.版本 2 .支持库 iext .子程序 _按钮1_被单击 .局部变量 ID, 整数型 .局部变量 文件夹信息, 文件夹信息_ .局部变量 MP3路径, 文本型 .局部变量 路径, 文本型 .局部变量 索引, 整数型 .局部变量 音乐路径, 文本型, , "0" .局部变量 计次, 整数型 路径 = 取空白文本 (255) ID = 浏览文件夹对话框_ (文件夹信息) 从列表id取路径_ (ID, 路径) 文件框1.目录 = 路径 MP3路径 = 寻找文件 (路径 + “\*.mp3”, ) .判断循环首 (MP3路径 ≠ “”) 输出调试文本 (MP3路径) 索引 = 超级列表框1.插入表项 (, , , , , ) 超级列表框1.置标题 (索引, 0, 路径 + “\” + MP3路径) MP3路径 = 寻找文件 (, ) .判断循环尾 () .计次循环首 (超级列表框1.取表项数 (), 计次) 加入成员 (音乐路径, 超级列表框1.取标题 (计次 - 1, 0)) .计次循环尾 () 播放MP3 (, 音乐路径)