上面的当我选择下一行时,被选中项就会慢慢看不见了
我现在想让被选中项始终出现在超级列表项的中间,也就是始终在我的视线范围内,
这个该怎么做到呢?
第1个回答 推荐于2017-09-02
.版本 2
.支持库 iext
.子程序 __启动窗口_创建完毕
超级列表框1.始终显示选择项 = 真
超级列表框1.现行选中项 = 0
.子程序 _按钮1_被单击
超级列表框1.获取焦点 ()
.如果真 (超级列表框1.现行选中项 = 0)
信息框 (“已选中第一行!”, 0, )
返回 ()
.如果真结束
超级列表框1.现行选中项 = 超级列表框1.现行选中项 - 1
超级列表框1.保证显示 (超级列表框1.现行选中项 - 1)
.子程序 _按钮2_被单击
超级列表框1.获取焦点 ()
.如果真 (超级列表框1.现行选中项 = 超级列表框1.取表项数 () - 1)
信息框 (“已选中最后一行!”, 0, )
返回 ()
.如果真结束
超级列表框1.现行选中项 = 超级列表框1.现行选中项 + 1
超级列表框1.保证显示 (超级列表框1.现行选中项 + 1)
本回答被提问者采纳