关于超级列表框问题的求助

18016666515

各位大神好， 图为超级列表框，目前选定状态为第一行，想要每隔5秒自动选定第二行(自动选定第二行时第一行取消选定状态)，隔5秒自动选择第三行，依次列表向下逐行自动选定，每次只选定一行，其余行均不选定状态，研究了好久，望各位大神指点，谢谢

走一回

这个一定行

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
选中	整数型

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

变量名	类 型	静态	数组	备 注
i	整数型
sy	整数型

' 自行添加一个超级列表框\一个时钟
计次循环首 (10, i)
sy ＝ 超级列表框1.插入表项 (i, , , , , )
超级列表框1.置标题 (sy, 0, 到文本 (i))
超级列表框1.置标题 (sy, 1, “序号” ＋ 到文本 (i))
计次循环尾 ()
超级列表框1.现行选中项 ＝ 选中
时钟1.时钟周期 ＝ 5000
超级列表框1.获取焦点 ()

子程序名	返回值类型	公开	备 注
_时钟1_周期事件

判断 (选中 ＝ 超级列表框1.取表项数 () － 1)
选中 ＝ 0
选中 ＝ 选中 ＋ 1
超级列表框1.选择表项 (选中)

i支持库列表	支持库注释
iext	扩展界面支持库一

.版本 2<br /> .支持库 iext<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 选中, 整数型<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 i, 整数型<br /> .局部变量 sy, 整数型<br /> <br /> ' 自行添加一个超级列表框\一个时钟<br /> .计次循环首 (10, i)<br />     sy ＝ 超级列表框1.插入表项 (i, , , , , )<br />     超级列表框1.置标题 (sy, 0, 到文本 (i))<br />     超级列表框1.置标题 (sy, 1, “序号” ＋ 到文本 (i))<br /> .计次循环尾 ()<br /> 超级列表框1.现行选中项 ＝ 选中<br /> 时钟1.时钟周期 ＝ 5000<br /> 超级列表框1.获取焦点 ()<br /> <br /> .子程序 _时钟1_周期事件<br /> <br /> .判断开始 (选中 ＝ 超级列表框1.取表项数 () － 1)<br />     选中 ＝ 0<br /> .默认<br />     选中 ＝ 选中 ＋ 1<br /> .判断结束<br /> 超级列表框1.选择表项 (选中)

小茹

给你个简单版的

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

.计次循环首 (超级列表框1.取表项数 (), 计次)
    超级列表框1.现行选中项 ＝ 计次 － 1
    延迟 (5000)
.计次循环尾 ()

循环不好，可以用时钟

末影人

超级列表框1.现行选中项 ＝ 计次 +1

18016666515

末影人 发表于 2019-8-3 01:33
超级列表框1.现行选中项 ＝ 计次 +1

这个我试过，结果变成多选了， 不知道是不是我的方法不对， 我想要的是逐行单选

18016666515

末影人 发表于 2019-8-3 01:33
超级列表框1.现行选中项 ＝ 计次 +1

这个我试过，结果变成多选了， 不知道是不是我的方法不对， 我想要的是逐行单选

末影人

18016666515 发表于 2019-8-3 08:36
这个我试过，结果变成多选了， 不知道是不是我的方法不对， 我想要的是逐行单选

取消焦点试试

18016666515

小茹 发表于 2019-8-3 01:20
给你个简单版的

.版本 2

这个我试过，结果变成全选了， 不知道是不是我的方法不对， 我想要的是逐行单选

18016666515

末影人 发表于 2019-8-3 08:43
取消焦点试试

也不行，还有其他办法不

st8051

先来一个 超级列表框1.现行选中项 ＝ -1   再来  超级列表框1.现行选中项 ＝ 计次 -1