易语言调节器组件实现MYSQL分页记算源码

n ＝ 111 ' 总表数
.如果 (n ％ 20 ＝ 0)
n ＝ n ÷ 20
.否则
n ＝ n ÷ 20 ＋ 1
.如果结束
.如果真 (按钮值 ＝ -1) ' 减
s ＝ 到整数 (编辑框1.内容) － 1
.如果 (到整数 (编辑框1.内容) ＝ 1)
返回 ()
.否则
编辑框1.内容 ＝ 到文本 (s)
.如果结束
调试输出 (s × 10)
.如果真结束
.如果真 (按钮值 ＝ 1) ' 加
s ＝ 到整数 (编辑框1.内容) ＋ 1
.如果 (s ＞ n)
返回 ()
.否则
编辑框1.内容 ＝ 到文本 (s)
.如果结束
调试输出 (s × 10)