.版本 2 .支持库 iext2 .支持库 iext .子程序 _按钮1_被单击 .局部变量 文件名, 文本型 .局部变量 图片索引, 整数型 .局部变量 i, 整数型 .局部变量 索引, 整数型 .局部变量 图片组, 字节集 图片组 ＝ 建空图片组 (20, 20) 文件名 ＝ 寻找文件 (取运行目录 () ＋ “\示例图片\*.jpg”, ) .判断循环首 (文件名 ≠ “”) 图片索引 ＝ 加入图片 (图片组, 读入文件 (取运行目录 () ＋ “\示例图片\” ＋ 文件名), #白色) 文件名 ＝ 寻找文件 (, ) .判断循环尾 () 超级列表框1.图片组 ＝ 图片组 .计次循环首 (图片索引 ＋ 1, i) 超级列表框1.插入表项 (, , i － 1, , , ) .计次循环尾 ()