如何把下列数据，按每例20行，分列显示？

108937101

如何把下列数据，按每例20行，分列显示？


甲01-4.8.9.11.12
乙02-1.2.4.5.6.8.11
甲03-2.6.9.10.11
乙04-2.3.4.6.7.8.9
甲05-1.3.4.5.7.8.12
乙06-3.7.9.10.12
甲07-1.2.3.5.6.7.10
乙08-1.5.10.11.12
甲09-1.3.4.5.7.8.12
乙10-3.7.9.10.12
甲11-1.2.3.5.6.7.10
乙12-1.5.10.11.12
甲13-1.3.4.5.7.8.12
乙14-3.7.9.10.12
甲15-1.2.3.5.6.7.10
乙16-1.5.10.11.12
甲17-1.3.4.5.7.8.12
乙18-3.7.9.10.12
甲19-1.2.3.5.6.7.10
乙20-1.5.10.11.12
甲21-1.3.4.5.7.8.12
乙22-3.7.9.10.12
甲23-1.2.3.5.6.7.10
乙24-1.5.10.11.12
甲25-1.3.4.5.7.8.12
乙26-3.7.9.10.12
甲27-1.2.3.5.6.7.10
乙28-1.5.10.11.12
甲29-1.3.4.5.7.8.12
乙30-3.7.9.10.12
甲31-1.2.3.5.6.7.10
乙32-1.5.10.11.12
甲33-1.3.4.5.7.8.12
乙34-3.7.9.10.12
甲35-1.2.3.5.6.7.10
乙36-1.5.10.11.12
甲37-1.3.4.5.7.8.12
乙38-3.7.9.10.12
甲39-1.2.3.5.6.7.10
乙40-1.5.10.11.12
甲41-1.3.4.5.7.8.12
乙42-3.7.9.10.12
甲43-1.2.3.5.6.7.10
乙44-1.5.10.11.12
甲45-1.3.4.5.7.8.12
乙46-3.7.9.10.12
甲47-1.2.3.5.6.7.10
乙48-1.5.10.11.12
甲49-1.3.4.5.7.8.12
乙50-3.7.9.10.12
甲51-1.2.3.5.6.7.10
乙52-1.5.10.11.12
甲53-1.3.4.5.7.8.12
乙54-3.7.9.10.12
甲55-1.2.3.5.6.7.10
乙56-1.5.10.11.12
甲57-1.3.4.5.7.8.12
乙58-3.7.9.10.12
甲59-1.2.3.5.6.7.10
乙60-1.5.10.11.12
甲61-1.3.4.5.7.8.12
乙62-3.7.9.10.12
甲63-1.2.3.5.6.7.10
乙64-1.5.10.11.12

15039346689

test 1.e (940.38 KB, 下载次数: 3)

2023-3-19 10:20 上传

点击文件名下载附件

Ruang

紧显示20行？

Ruang

分页显示吗

108937101

Ruang 发表于 2023-3-18 21:58
分页显示吗

是的，每列20行，多列显示

qcby

如此如此

15039346689

test.e (938.95 KB, 下载次数: 4)

2023-3-18 23:31 上传

点击文件名下载附件

u871

  

数据类型名	公开	备 注
自_页码
成员名	类 型	传址	数组	备 注
数据	文本型		20

.版本 2<br /> <br /> .数据类型 自_页码<br />     .成员 数据, 文本型, , "20"

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
集_数据	自_页码	0
集_页码	整数型		记录页码

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

集_页码 ＝ 1
子程序_分割文本 ()
子程序_列表框置数局 ()

子程序名	返回值类型	公开	备 注
子程序_分割文本			将文本每20个一组进行分割

变量名	类 型	静态	数组	备 注
局_数据	自_页码
局_临时分割	文本型		0
局_计次	整数型
局_计数	整数型

局_临时分割 ＝ 分割文本 ( #常_原始数据, #换行符, )
计次循环首 (取数组成员数 (局_临时分割), 局_计次)
局_计数 ＝ 局_计数 ＋ 1
局_数据.数据 [局_计数] ＝ 局_临时分割 [局_计次]
如果真 (局_计数 ＝ 20)
局_计数 ＝ 0
加入成员 (集_数据, 局_数据)

计次循环尾 ()

子程序名	返回值类型	公开	备 注
_按钮_首页_被单击

集_页码 ＝ 1
子程序_列表框置数局 ()

子程序名	返回值类型	公开	备 注
_按钮_上一页_被单击

集_页码 ＝ 集_页码 － 1
如果真 (集_页码 ≤ 0)
集_页码 ＝ 取数组成员数 (集_数据)
编辑框1.内容 ＝ 到文本 (集_页码)
子程序_列表框置数局 ()

子程序名	返回值类型	公开	备 注
_按钮_下一页_被单击

集_页码 ＝ 集_页码 ＋ 1
如果真 (集_页码 ＞ 取数组成员数 (集_数据))
集_页码 ＝ 1
编辑框1.内容 ＝ 到文本 (集_页码)
子程序_列表框置数局 ()

子程序名	返回值类型	公开	备 注
_按钮_到某页_被单击

变量名	类 型	静态	数组	备 注
局_页码	整数型

集_页码 ＝ 到整数 (编辑框1.内容)
子程序_列表框置数局 ()

子程序名	返回值类型	公开	备 注
_编辑框_页码_内容被改变

变量名	类 型	静态	数组	备 注
局_页码	整数型

局_页码 ＝ 到整数 (编辑框1.内容)
判断 (局_页码 ≤ 0)
集_页码 ＝ 1
判断 (局_页码 ＞ 取数组成员数 (集_数据))
集_页码 ＝ 取数组成员数 (集_数据)
集_页码 ＝ 局_页码
编辑框1.内容 ＝ 到文本 (集_页码)

子程序名	返回值类型	公开	备 注
子程序_列表框置数局

变量名	类 型	静态	数组	备 注
局_计次	整数型
局_索引	整数型

超级列表框1.全部删除 ()
计次循环首 (取数组成员数 (集_数据 [集_页码].数据), 局_计次)
局_索引 ＝ 超级列表框1.插入表项 (, , , , , )
超级列表框1.置标题 (局_索引, 0, 到文本 (局_索引 ＋ 1))
超级列表框1.置标题 (局_索引, 1, 集_数据 [集_页码].数据 [局_计次])
计次循环尾 ()

i支持库列表	支持库注释
iext	扩展界面支持库一

.版本 2<br /> .支持库 iext<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 集_数据, 自_页码, , "0"<br /> .程序集变量 集_页码, 整数型, , , 记录页码<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> 集_页码 ＝ 1<br /> 子程序_分割文本 ()<br /> 子程序_列表框置数局 ()<br /> <br /> <br /> .子程序 子程序_分割文本, , , 将文本每20个一组进行分割<br /> .局部变量 局_数据, 自_页码<br /> .局部变量 局_临时分割, 文本型, , "0"<br /> .局部变量 局_计次, 整数型<br /> .局部变量 局_计数, 整数型<br /> <br /> 局_临时分割 ＝ 分割文本 (#常_原始数据, #换行符, )<br /> .计次循环首 (取数组成员数 (局_临时分割), 局_计次)<br />     局_计数 ＝ 局_计数 ＋ 1<br />     局_数据.数据 [局_计数] ＝ 局_临时分割 [局_计次]<br />     .如果真 (局_计数 ＝ 20)<br />         局_计数 ＝ 0<br />         加入成员 (集_数据, 局_数据)<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> <br /> <br /> .子程序 _按钮_首页_被单击<br /> <br /> 集_页码 ＝ 1<br /> 子程序_列表框置数局 ()<br /> <br /> <br /> .子程序 _按钮_上一页_被单击<br /> <br /> 集_页码 ＝ 集_页码 － 1<br /> .如果真 (集_页码 ≤ 0)<br />     集_页码 ＝ 取数组成员数 (集_数据)<br /> .如果真结束<br /> 编辑框1.内容 ＝ 到文本 (集_页码)<br /> 子程序_列表框置数局 ()<br /> <br /> <br /> .子程序 _按钮_下一页_被单击<br /> <br /> 集_页码 ＝ 集_页码 ＋ 1<br /> .如果真 (集_页码 ＞ 取数组成员数 (集_数据))<br />     集_页码 ＝ 1<br /> .如果真结束<br /> 编辑框1.内容 ＝ 到文本 (集_页码)<br /> 子程序_列表框置数局 ()<br /> <br /> <br /> .子程序 _按钮_到某页_被单击<br /> .局部变量 局_页码, 整数型<br /> <br /> 集_页码 ＝ 到整数 (编辑框1.内容)<br /> 子程序_列表框置数局 ()<br /> <br /> <br /> .子程序 _编辑框_页码_内容被改变<br /> .局部变量 局_页码, 整数型<br /> <br /> 局_页码 ＝ 到整数 (编辑框1.内容)<br /> .判断开始 (局_页码 ≤ 0)<br />     集_页码 ＝ 1<br /> .判断 (局_页码 ＞ 取数组成员数 (集_数据))<br />     集_页码 ＝ 取数组成员数 (集_数据)<br /> .默认<br />     集_页码 ＝ 局_页码<br /> .判断结束<br /> 编辑框1.内容 ＝ 到文本 (集_页码)<br /> <br /> <br /> .子程序 子程序_列表框置数局<br /> .局部变量 局_计次, 整数型<br /> .局部变量 局_索引, 整数型<br /> <br /> 超级列表框1.全部删除 ()<br /> .计次循环首 (取数组成员数 (集_数据 [集_页码].数据), 局_计次)<br />     局_索引 ＝ 超级列表框1.插入表项 (, , , , , )<br />     超级列表框1.置标题 (局_索引, 0, 到文本 (局_索引 ＋ 1))<br />     超级列表框1.置标题 (局_索引, 1, 集_数据 [集_页码].数据 [局_计次])<br /> .计次循环尾 ()

108937101

qcby 发表于 2023-3-18 22:59
如此如此

相当不错，可否改用高级表格？

108937101

15039346689 发表于 2023-3-18 23:31

相当不错，可否改用高级表格？