[/quote
][e=1
].版本 2
删除 ()
变量循环首 (超级列表框1.
取表项数 (), 1, -1, i
)
如果真 (超级列表框1.
取当前状态图片 (i - 1
) = 1
)

超级列表框1.
删除表项 (i - 1
)
处理事件 ()
保存 (超级列表框1,
取特定目录 (3
) +
“保存文本.txt”)

变量循环尾 ()s = 超级列表框1.
取表项数 ()标签1.标题 =
“超列里还有:” +
到文本 (s
) +
“个”超级列表框1.
置标题 (i, 0, 阶级框.内容
)超级列表框1.
置标题 (i, 1, 名称框.内容
)超级列表框1.
置标题 (i, 2, 经验框.内容
)
计次循环首 (超级列表框.
取表项数 (), i
)
文本 = 文本 +
“=” + 超级列表框1.
取标题 (i - 1, 1
) +
“#” + 超级列表框1.
取标题 (i - 1, 2
) +
#换行符
写到文件 (保存路径,
到字节集 (文本
))
计次循环尾 ()
[e=1].版本 2
.支持库 iext
.支持库 shell
.子程序 _按钮_多选删除_被单击
删除 ()
.子程序 删除, , , 只删除表项,不删除原文本文件例子
.局部变量 i, 整数型
.局部变量 s, 整数型
.变量循环首 (超级列表框1.取表项数 (), 1, -1, i)
.如果真 (超级列表框1.取当前状态图片 (i - 1) = 1)
超级列表框1.删除表项 (i - 1)
处理事件 ()
保存 (超级列表框1, 取特定目录 (3) + “保存文本.txt”)
.如果真结束
.变量循环尾 ()
s = 超级列表框1.取表项数 ()
标签1.标题 = “超列里还有:” + 到文本 (s) + “个”
.子程序 保存, , 公开
.参数 超级列表框, 超级列表框
.参数 保存路径, 文本型
.局部变量 i, 整数型
.局部变量 文本, 文本型
超级列表框1.置标题 (i, 0, 阶级框.内容)
超级列表框1.置标题 (i, 1, 名称框.内容)
超级列表框1.置标题 (i, 2, 经验框.内容)
.计次循环首 (超级列表框.取表项数 (), i)
文本 = 文本 + “=” + 超级列表框1.取标题 (i - 1, 1) + “#” + 超级列表框1.取标题 (i - 1, 2) + #换行符
写到文件 (保存路径, 到字节集 (文本))
.计次循环尾 ()