.版本 2
.支持库 spec
.子程序 _按钮1_被单击
.计次循环首 (纵向滚动条1.最大位置 - 纵向滚动条1.位置, )
.如果真 (纵向滚动条1.位置 ≤ 纵向滚动条1.最大位置)
延迟 (30)
纵向滚动条1.位置 = 纵向滚动条1.位置 + 1
.如果真结束
.计次循环尾 ()
就这样了 那个延迟30毫秒自己看情况而定 其实30ms还是长了
(你最好自己新建个子程序 用 启动线程() 来弄 那样界面不会假死)
有疑问还请百度HI
---------第二次修改
上面的如果用户中途向上拖动了 他就不能完全到最低下
.版本 2
.支持库 spec
.子程序 _按钮1_被单击
.循环判断首 ()
延迟 (30)
纵向滚动条1.位置 = 纵向滚动条1.位置 + 1
.循环判断尾 (纵向滚动条1.位置 ≤ 纵向滚动条1.最大位置)
而这个更简短 我相信这个代码更适合你的程序
(这里也不一定要用多线程 按钮消息本来就是个中断)
--------------------------------
修改完善版 用到了多线程
.版本 2
.支持库 EThread
.支持库 spec
.子程序 __启动窗口_创建完毕
启动线程 (&Y_滚动, , )
.子程序 Y_滚动
.循环判断首 ()
延迟 (30)
纵向滚动条1.位置 = 纵向滚动条1.位置 + 1
.循环判断尾 (纵向滚动条1.位置 ≤ 纵向滚动条1.最大位置)
.版本 2
.子程序 __启动窗口_创建完毕
纵向滚动条1.位置 = 100
或者横向
用循环,计次循环首()