access数据库管理操作例子

集_高级表格 [参数].列数 ＝ 记录集1.字段数量
集_高级表格 [参数].行数 ＝ 0
.计次循环首 (记录集1.字段数量, i)
集_高级表格 [参数].置数据 (0, i － 1, #表格常量.文本型, 记录集1.取字段名 (i － 1))
列宽 ＝ 取文本长度 (记录集1.取字段名 (i － 1)) × 7.5
集_高级表格 [参数].置列宽 (i － 1, 列宽)
.计次循环尾 ()
集_页显示数 [参数] ＝ 到整数 (编辑框_显示.内容)
集_共有页 [参数] ＝ 选择 (记录集1.记录数量 ％ 集_页显示数 [参数] ＝ 0, 记录集1.记录数量 ＼ 集_页显示数 [参数] － 1, 记录集1.记录数量 ＼ 集_页显示数 [参数])
集_当前页 [参数] ＝ 0