如何实现从列表中循环取数，请高手指点，不胜感激！

amy_alex

我想实现以下功能：
从数据列表界面的列表中双击一组数据，进入功能界面，进行一系列功能操作（略），然后退出功能界面至列表界面。
代码为Robot自动录制的一次操作，如何实现循环从列表中取数据-〉功能操作-〉退出？
每次双击列表中的不同行的数据，ItemText和Coords是变化的，如何设变量进行循环呢？这种办法是否可行呢？
请高手指点，不胜感激！
1   Sub Main
2   Window SetContext, "Class=#32770;Level=8", ""
3   ListView DblClick, "ObjectIndex=1;\;ItemText=4", "Coords=84,8"
4   Window SetContext, "Class=#32770;Level=10", ""
5   PushButton Click, "Text=Back"
6   Window SetContext, "Class=#32770;Level=8", ""
7   End Sub

amy_alex

为什么没有人回复？

村上舞!舞!舞

把你测试的系统窗口界面贴图上来看看

geniar

你取的行的ItemText和Coords是变化的，是有规律的？还是无规律的？
有规律的话，你按照规律的数来设置属性即可
无规律的话，建议用光标来操作，个人觉得光标操作好一些，可以避免意想不到的错误

不知道此方法是否可行，等待楼主的消息，：）

amy_alex

ItemText是变化的，有规律，应该可以用FOR循环，但我写的FOR循环还没执行通过；Coords变不变化不影响循环。
楼上指的光标是说键盘操作吗？可惜软件不支持

[ 本帖最后由 amy_alex 于 2008-5-4 10:45 编辑 ]

amy_alex

1   Sub Main
2   dim i as integer
3   dim LObject as string
4    for i=8 to 12
5    LObject="ObjectIndex=1;\;ItemText="&i
6   Window SetContext, "Class=#32770;Level=8", ""
7   ListView Click, LObject , "Coords=84,8"
8   next i
9   End Sub

搞定了，设了一个字符型的变量，参考了论坛里的另一个帖子，这样实现了依次点击列表中各条信息。谢谢各位朋友的回复，现在结帖了。