两个超级列表框叠加

xf702

请大侠赐教，两个超级列表框（超级列表框1、超级列表框2）列标题都一模一样，不需要计算、不需要去重，只是单纯的叠加到超级列表框3中，序号延续。。。

Suky

  

变量名	类 型	静态	数组	备 注
n	整数型
i	整数型
列数	整数型
索引	整数型

超级列表框3.全部删除 ()
列数 ＝ 超级列表框3.取列数 ()
计次循环首 (超级列表框1.取表项数 (), n)
索引 ＝ 超级列表框3.插入表项 (, , , , , )
超级列表框3.置标题 (索引, 0, 到文本 (索引 ＋ 1))  ' 置序号
计次循环首 (列数 － 1, i)
超级列表框3.置标题 (索引, i, 超级列表框1.取标题 (n － 1, i))
计次循环尾 ()
计次循环尾 ()
计次循环首 (超级列表框2.取表项数 (), n)
索引 ＝ 超级列表框3.插入表项 (, , , , , )
超级列表框3.置标题 (索引, 0, 到文本 (索引 ＋ 1))  ' 置序号
计次循环首 (列数 － 1, i)
超级列表框3.置标题 (索引, i, 超级列表框2.取标题 (n － 1, i))
计次循环尾 ()
计次循环尾 ()

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

.版本 2<br /> .支持库 iext<br /> <br /> .局部变量 n, 整数型<br /> .局部变量 i, 整数型<br /> .局部变量 列数, 整数型<br /> .局部变量 索引, 整数型<br /> <br /> 超级列表框3.全部删除 ()<br /> <br /> 列数 ＝ 超级列表框3.取列数 ()<br /> .计次循环首 (超级列表框1.取表项数 (), n)<br />     索引 ＝ 超级列表框3.插入表项 (, , , , , )<br />     超级列表框3.置标题 (索引, 0, 到文本 (索引 ＋ 1))  ' 置序号<br />     .计次循环首 (列数 － 1, i)<br />         超级列表框3.置标题 (索引, i, 超级列表框1.取标题 (n － 1, i))<br />     .计次循环尾 ()<br /> .计次循环尾 ()<br /> .计次循环首 (超级列表框2.取表项数 (), n)<br />     索引 ＝ 超级列表框3.插入表项 (, , , , , )<br />     超级列表框3.置标题 (索引, 0, 到文本 (索引 ＋ 1))  ' 置序号<br />     .计次循环首 (列数 － 1, i)<br />         超级列表框3.置标题 (索引, i, 超级列表框2.取标题 (n － 1, i))<br />     .计次循环尾 ()<br /> .计次循环尾 ()

需要顺延的话     就这样子

a2882077

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_窗口1
变量名	类 型	数组	备 注
集_数组	文本型	0

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

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

计次循环首 (5, i)
超级列表框1.插入表项 (, , , , , )
超级列表框1.置标题 (i － 1, 0, 到文本 (i))
超级列表框1.置标题 (i － 1, 1, “测试” ＋ 到文本 (i))
超级列表框2.插入表项 (, , , , , )
超级列表框2.置标题 (i － 1, 0, 到文本 (i))
超级列表框2.置标题 (i － 1, 1, “测” ＋ 到文本 (i))
计次循环尾 ()

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

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

清除数组 (集_数组)
计次循环首 (超级列表框1.取表项数 (), i)
加入成员 (集_数组, 超级列表框1.取标题 (i － 1, 1))
计次循环尾 ()
计次循环首 (超级列表框2.取表项数 (), i)
加入成员 (集_数组, 超级列表框2.取标题 (i － 1, 1))
计次循环尾 ()
计次循环首 (取数组成员数 (集_数组), i)
超级列表框3.插入表项 (, , , , , )
超级列表框3.置标题 (i － 1, 0, 到文本 (i))
超级列表框3.置标题 (i － 1, 1, 集_数组 [i])
计次循环尾 ()

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

.版本 2<br /> .支持库 iext<br /> <br /> .程序集 窗口程序集_窗口1<br /> .程序集变量 集_数组, 文本型, , "0"<br /> <br /> .子程序 _窗口1_创建完毕<br /> .局部变量 i, 整数型<br /> <br /> .计次循环首 (5, i)<br />     超级列表框1.插入表项 (, , , , , )<br />     超级列表框1.置标题 (i － 1, 0, 到文本 (i))<br />     超级列表框1.置标题 (i － 1, 1, “测试” ＋ 到文本 (i))<br />     超级列表框2.插入表项 (, , , , , )<br />     超级列表框2.置标题 (i － 1, 0, 到文本 (i))<br />     超级列表框2.置标题 (i － 1, 1, “测” ＋ 到文本 (i))<br /> .计次循环尾 ()<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 i, 整数型<br /> <br /> 清除数组 (集_数组)<br /> .计次循环首 (超级列表框1.取表项数 (), i)<br />     加入成员 (集_数组, 超级列表框1.取标题 (i － 1, 1))<br /> .计次循环尾 ()<br /> .计次循环首 (超级列表框2.取表项数 (), i)<br />     加入成员 (集_数组, 超级列表框2.取标题 (i － 1, 1))<br /> .计次循环尾 ()<br /> .计次循环首 (取数组成员数 (集_数组), i)<br />     超级列表框3.插入表项 (, , , , , )<br />     超级列表框3.置标题 (i － 1, 0, 到文本 (i))<br />     超级列表框3.置标题 (i － 1, 1, 集_数组 <i>)<br /> .计次循环尾 ()

xf702

a2882077 发表于 2023-11-4 19:13
[e=1].版本 2
.支持库 iext

代码运行后，序号顺延没有问题了，但只合并了第一列。。为啥只合并了一列呢？如果想要合并6列、7列呢？

a2882077

xf702 发表于 2023-11-4 19:45
代码运行后，序号顺延没有问题了，但只合并了第一列。。为啥只合并了一列呢？如果想要合并6列、7列呢？ ...

以此类推啊，就理解为数据整合，思路就是先把你要的数据先整理出来利用变量去填就好了

Suky

  

变量名	类 型	静态	数组	备 注
n	整数型
i	整数型
列数	整数型
索引	整数型

超级列表框3.全部删除 ()
列数 ＝ 超级列表框3.取列数 ()
计次循环首 (超级列表框1.取表项数 (), n)
索引 ＝ 超级列表框3.插入表项 (, , , , , )
计次循环首 (列数, i)
超级列表框3.置标题 (索引, i － 1, 超级列表框1.取标题 (n － 1, i － 1))
计次循环尾 ()
计次循环尾 ()
计次循环首 (超级列表框2.取表项数 (), n)
索引 ＝ 超级列表框3.插入表项 (, , , , , )
计次循环首 (列数, i)
超级列表框3.置标题 (索引, i － 1, 超级列表框2.取标题 (n － 1, i － 1))
计次循环尾 ()
计次循环尾 ()

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

.版本 2<br /> .支持库 iext<br /> <br /> .局部变量 n, 整数型<br /> .局部变量 i, 整数型<br /> .局部变量 列数, 整数型<br /> .局部变量 索引, 整数型<br /> <br /> 超级列表框3.全部删除 ()<br /> <br /> 列数 ＝ 超级列表框3.取列数 ()<br /> .计次循环首 (超级列表框1.取表项数 (), n)<br />     索引 ＝ 超级列表框3.插入表项 (, , , , , )<br />     .计次循环首 (列数, i)<br />         超级列表框3.置标题 (索引, i － 1, 超级列表框1.取标题 (n － 1, i － 1))<br />     .计次循环尾 ()<br /> .计次循环尾 ()<br /> .计次循环首 (超级列表框2.取表项数 (), n)<br />     索引 ＝ 超级列表框3.插入表项 (, , , , , )<br />     .计次循环首 (列数, i)<br />         超级列表框3.置标题 (索引, i － 1, 超级列表框2.取标题 (n － 1, i － 1))<br />     .计次循环尾 ()<br /> .计次循环尾 ()

xf702

a2882077 发表于 2023-11-4 20:19
以此类推啊，就理解为数据整合，思路就是先把你要的数据先整理出来利用变量去填就好了 ...

计次循环首 (超级列表框1.取表项数 (), i)
加入成员 (集_数组, 超级列表框1.取标题 (i － 1, 1))     加入成员 (集_数组, 超级列表框1.取标题 (i － 1, 2)) '取超列1的第二列数据？
............
计次循环尾 ()
计次循环首 (超级列表框2.取表项数 (), i)
加入成员 (集_数组, 超级列表框2.取标题 (i － 1, 1))
     加入成员 (集_数组, 超级列表框2.取标题 (i － 1, 2))'取超列2的第二列数据？
计次循环尾 ()
计次循环首 (取数组成员数 (集_数组), i)
超级列表框3.插入表项 (, , , , , )
超级列表框3.置标题 (i － 1, 0, 到文本 (i))
超级列表框3.置标题 (i － 1, 1, 集_数组 [i)
     超级列表框3.置标题 (i － 1, 2, 集_数组 [i)'将取出的超列1、超列2数据，加到 超列 的第二列中？？
计次循环尾 ()







补充内容 (2023-11-4 20:33):
这个应该是不对的吧。。

xf702

Suky 发表于 2023-11-4 20:33
[e=1].版本 2
.支持库 iext

大师就是大师，非常强！！