计次循环取值问题求助

麦小鱼 · 发表于 2011-4-5 01:00:59

本帖最后由 poprock 于 2011-4-5 01:03 编辑

新手学习中希望大大们帮帮忙我用计次循环写的代码为什么只能重复一次，它不能根据帐号的总数量来依次循环(休息五秒)，看看哪里错了。。另外每循环一次帐号和内容现行选中项就自动下移一次如何实现？

循环取值学习.rar (1.39 KB, 下载次数: 14)

w589321 · 发表于 2011-4-5 01:01:00

本帖最后由一片凄凉于 2011-4-5 01:26 编辑

看下是不是这样的:

循环取值1.rar (1.47 KB, 下载次数: 21)

xbzx · 发表于 2011-4-5 01:48:32

.版本 2
.支持库 iext
.支持库 spec

.程序集窗口程序集1

.子程序 _按钮1_被单击
.局部变量 i, 整数型
.局部变量用户名, 文本型

编辑框.内容＝ “”
.计次循环首 (超级列表框_帐号.取表项数 (), i)
超级列表框_帐号.现行选中项＝ i － 1  ' 因列表框现行选中项是从0开始的，而i则是从1开始的，所以要减1
超级列表框_内容.现行选中项＝ i － 1
超级列表框_帐号.获取焦点 ()  ' 方便看清列表框选中项
编辑框.加入文本 (超级列表框_帐号.取标题 (超级列表框_帐号.现行选中项, 0) ＋ #换行符＋超级列表框_帐号.取标题 (超级列表框_帐号.现行选中项, 1) ＋ #换行符＋超级列表框_内容.取标题 (超级列表框_内容.现行选中项, 0) ＋ #换行符)
延迟 (2000)  ' 2秒以后再进行下一个循环
.计次循环尾 ()
信息框 (“循环结束”, 0, )  ' 结束提示

.子程序 __启动窗口_将被销毁

结束 ()  ' 上面使用了延迟2秒的命令，如果循环没结束关闭窗口会出错，这里使用了结束程序。

		自动登录	找回密码
密码			注册

[已解决] 计次循环取值问题求助

最佳答案