.程序集 窗口程序集1
.子程序 _按钮1_被单击
选择夹1.现行子夹 = 选择夹1.现行子夹 + 1页数()禁止事件 ()
.子程序 _按钮2_被单击
选择夹1.现行子夹 = 选择夹1.现行子夹 - 1
禁止事件 ()页数()
.子程序 禁止事件
.如果 (选择夹1.现行子夹 = 0)
按钮2.禁止 =真
.否则按钮2.禁止 =假
.如果结束
.如果 (选择夹1.现行子夹 = 选择夹1.取子夹数目 () - 1)
按钮1.禁止 =真
.否则按钮1.禁止 =假
.如果结束
.子程序 __启动窗口_创建完毕
禁止事件 ()页数()
.子程序 页数
.局部变量 阿萨德阿斯大苏打, 整数型
标签1.标题 = “第” + 到文本 (选择夹1.现行子夹 + 1) + “页”