edb 数据库导入 exui高级表格ex 好几个循环 怎么简化一下

sphinxes

导入效果跟这个一样  【非原创】修改了一下易数据库查看编辑工具 - 易语言资源网

嵌套这么多循环不会写  所以写了好几个循环  也能正常导入
我想怎么简化一下

  

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

变量名	类 型	静态	数组	备 注
a	整数型
b	整数型
c	整数型
d	整数型
e	整数型

计次循环首 (取字段数 () ＋ 1, a)
高级表格EX1.插入列 (a － 1, 1, 110, 50, 512, , 20, 20, 1, , 16, 16, 1, , 16, 16, , , , , , , , )
计次循环尾 ()
计次循环首 (取记录数 () ＋ 1, b)
高级表格EX1.插入项目 (b, 1, 0, 35, 20, 55, , , )
计次循环尾 ()
计次循环首 (取字段数 () ＋ 1, c)
高级表格EX1.置项目文本 (0, c, , , 取字段名 (c))
计次循环尾 ()
计次循环首 (取记录数 () ＋ 1, d)
高级表格EX1.置项目文本 (d, 0, , , 到文本 (d))
计次循环尾 ()
计次循环首 (取记录数 () ＋ 1, d)
跳到 (d)
计次循环首 (取字段数 (), e)
高级表格EX1.置项目文本 (d, e, , , 读 (e))
计次循环尾 ()
计次循环尾 ()

i支持库列表	支持库注释
ExuiKrnln	(未知支持库)

.版本 2<br /> <br /> .支持库 ExuiKrnln<br /> <br /> <br /> <br /> .子程序 _按钮1_被单击<br /> <br /> .局部变量 a, 整数型<br /> <br /> .局部变量 b, 整数型<br /> <br /> .局部变量 c, 整数型<br /> <br /> .局部变量 d, 整数型<br /> <br /> .局部变量 e, 整数型<br /> <br /> <br /> <br /> <br /> <br /> .计次循环首 (取字段数 () ＋ 1, a)<br /> <br />     高级表格EX1.插入列 (a － 1, 1, 110, 50, 512, , 20, 20, 1, , 16, 16, 1, , 16, 16, , , , , , , , )<br /> <br /> .计次循环尾 ()<br /> <br /> <br /> <br /> <br /> <br /> .计次循环首 (取记录数 () ＋ 1, b)<br /> <br />     高级表格EX1.插入项目 (b, 1, 0, 35, 20, 55, , , )<br /> <br /> .计次循环尾 ()<br /> <br /> <br /> <br /> .计次循环首 (取字段数 () ＋ 1, c)<br /> <br />     高级表格EX1.置项目文本 (0, c, , , 取字段名 (c))<br /> <br /> .计次循环尾 ()<br /> <br /> <br /> <br /> <br /> <br /> .计次循环首 (取记录数 () ＋ 1, d)<br /> <br />     高级表格EX1.置项目文本 (d, 0, , , 到文本 (d))<br /> <br /> .计次循环尾 ()<br /> <br /> <br /> <br /> <br /> <br /> .计次循环首 (取记录数 () ＋ 1, d)<br /> <br />     跳到 (d)<br /> <br />     .计次循环首 (取字段数 (), e)<br /> <br />         高级表格EX1.置项目文本 (d, e, , , 读 (e))<br /> <br />     .计次循环尾 ()<br /> <br /> <br /> <br /> .计次循环尾 ()

frankiy

  

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

变量名	类 型	静态	数组	备 注
x	整数型
xx	整数型

高级表格1.清空数据 ()
高级表格1.行数 ＝ 取记录数 () ＋ 1
高级表格1.列数 ＝ 取字段数 () ＋ 1
' 写表头
计次循环首 (取字段数 (), x)
高级表格1.置数据 (0, x, 1, 取字段名 (x))
计次循环尾 ()
' 写内容
计次循环首 (取记录数 (), x)
跳到 (x)
计次循环首 (取字段数 (), xx)
高级表格1.置数据 (x, xx, 1, 读 (xx))
计次循环尾 ()
计次循环尾 ()

i支持库列表	支持库注释
eGrid	高级表格支持库

.版本 2<br /> .支持库 eGrid<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 x, 整数型<br /> .局部变量 xx, 整数型<br /> <br /> 高级表格1.清空数据 ()<br /> <br /> 高级表格1.行数 ＝ 取记录数 () ＋ 1<br /> 高级表格1.列数 ＝ 取字段数 () ＋ 1<br /> <br /> ' 写表头<br /> .计次循环首 (取字段数 (), x)<br />     高级表格1.置数据 (0, x, 1, 取字段名 (x))<br /> .计次循环尾 ()<br /> <br /> ' 写内容<br /> .计次循环首 (取记录数 (), x)<br />     跳到 (x)<br /> <br />     .计次循环首 (取字段数 (), xx)<br /> <br />         高级表格1.置数据 (x, xx, 1, 读 (xx))<br /> <br />     .计次循环尾 ()<br /> <br /> .计次循环尾 ()

sphinxes

frankiy 发表于 2025-8-21 00:36
[e=4].版本 2
.支持库 eGrid

我需要的是 exui的代码