|
想将超级列表框的最新添加内容取出,写到数据库,不加循环取到的为空,加循环取到的总是最后一项,怎么能跳出循环,取最新添加的内容?
[e]
.版本 2
.支持库 iext
.支持库 spec
.子程序 _按钮8_被单击
.局部变量 表, 整数型
.局部变量 i, 整数型
.如果 (选择框14.选中 = 真) ' 按天提醒
表 = 超级列表框2.插入表项 (0, 编辑框31.内容 + “月” + 编辑框32.内容 + “日” + 编辑框29.内容 + “时” + 编辑框30.内容 + “分”, , , , )
超级列表框2.置标题 (表, 1, 编辑框34.内容)
.否则
.如果真 (选择框13.选中 = 真) ' 按月提醒
表 = 超级列表框2.插入表项 (0, 编辑框32.内容 + “日” + 编辑框29.内容 + “时” + 编辑框30.内容 + “分”, , , , )
超级列表框2.置标题 (表, 1, 编辑框34.内容)
.如果真结束
.如果真 (选择框12.选中 = 真) ' 按周提醒
表 = 超级列表框2.插入表项 (0, “星期” + 组合框7.内容 + “,” + 编辑框29.内容 + “时” + 编辑框30.内容 + “分”, , , , )
超级列表框2.置标题 (表, 1, 编辑框34.内容)
.如果真结束
.如果真 (选择框12.选中 ≠ 真 且 选择框13.选中 ≠ 真 且 选择框14.选中 ≠ 真)
信息框 (“必须选择提醒类型”, #错误图标, “提示”)
.如果真结束
.如果结束
.计次循环首 (超级列表框2.取表项数 (), i)
超级列表框2.取标题 (i - 1, 0)
调试输出 (超级列表框2.取标题 (i - 1, 0))
.计次循环尾 ()
[/e]
补充内容 (2014-2-1 12:24):
不研究这个了,已经不需要答案,谢谢各位。 |
|