数据库分页显示例程，导出所有数据到文本文件

.如果真 (编辑框2.内容 ＝ “”)
信息框 (“请填写将要跳到的页数”, 0, )
返回 ()
.如果真结束
.如果真 (总数 ＜ 每表页数 × 到数值 (编辑框2.内容))
信息框 (“错误！此页数不存在”, 0, )
返回 ()
.如果真结束
跳到 (每表页数 × 到数值 (编辑框2.内容) － 每表页数)