.版本 2
.支持库 iext
.程序集 窗口程序集1
.子程序 __启动窗口_创建完毕
超级列表框1.是否有检查框 = 真
.子程序 _按钮1_被单击, , , 选中
.局部变量 n, 整数型
.计次循环首 (超级列表框1.取表项数 (), n)
超级列表框1.置状态图片 (n - 1, 1)
.计次循环尾 ()
.子程序 _按钮2_被单击, , , 取消选中
.局部变量 n, 整数型
.计次循环首 (超级列表框1.取表项数 (), n)
超级列表框1.置状态图片 (n - 1, 0)
.计次循环尾 ()
.子程序 _按钮3_被单击, , , 检查
.局部变量 n, 整数型
.局部变量 文本, 文本型
.计次循环首 (超级列表框1.取表项数 (), n)
.如果真 (超级列表框1.取当前状态图片 (n - 1) = 1)
文本 = 文本 + 到文本 (n - 1) + “,”
.如果真结束
.计次循环尾 ()
.如果 (文本 = “”)
信息框 (“没有选中”, 0, )
.否则
信息框 (“你当前选中项有:” + 文本, 0, )
.如果结束