关于超级列表框的N个列数下求数值总和

OnLy，

如图所示

jcy0307

获取数据前删除超级列表框最后一行合计 ，获取完数据调用此子程序

  

子程序名	返回值类型	公开	备 注
计算
参数名	类 型	参考	可空	数组	备 注
表	超级列表框

变量名	类 型	静态	数组	备 注
列索引	整数型
合计	整数型
最后一行	整数型
现有行数	整数型
行索引	整数型
加数	整数型

现有行数 ＝ 表.取表项数 ()
最后一行 ＝ 表.插入表项 (, , , , , )
计次循环首 (表.取列数 (), 列索引)
计次循环首 (现有行数, 行索引)
加数 ＝ 到数值 (表.取标题 (行索引 － 1, 列索引 － 1))
合计 ＝ 合计 ＋ 加数
表.置标题 (最后一行, 列索引 － 1, 到文本 (合计))
计次循环尾 ()
调试输出 (“第” ＋ 到文本 (列索引) ＋ “列和”, 合计)
合计 ＝ 0
计次循环尾 ()

i支持库列表	支持库注释
iext	扩展界面支持库一
spec	特殊功能支持库

.版本 2<br /> .支持库 iext<br /> .支持库 spec<br /> <br /> .子程序 计算<br /> .参数 表, 超级列表框<br /> .局部变量 列索引, 整数型<br /> .局部变量 合计, 整数型<br /> .局部变量 最后一行, 整数型<br /> .局部变量 现有行数, 整数型<br /> .局部变量 行索引, 整数型<br /> .局部变量 加数, 整数型<br /> <br /> 现有行数 ＝ 表.取表项数 ()<br /> 最后一行 ＝ 表.插入表项 (, , , , , )<br /> .计次循环首 (表.取列数 (), 列索引)<br />     .计次循环首 (现有行数, 行索引)<br />         加数 ＝ 到数值 (表.取标题 (行索引 － 1, 列索引 － 1))<br />         合计 ＝ 合计 ＋ 加数<br />         表.置标题 (最后一行, 列索引 － 1, 到文本 (合计))<br />     .计次循环尾 ()<br />     调试输出 (“第” ＋ 到文本 (列索引) ＋ “列和”, 合计)<br />     合计 ＝ 0<br /> .计次循环尾 ()

1.e (5.44 KB, 下载次数: 7)

2023-9-27 23:17 上传

点击文件名下载附件

OnLy，

11年没有登录论坛了。11年没有碰过易语言了

b0y

求和的列 判断一下列名 不计入计算

jcos

OnLy， 发表于 2023-9-27 21:42
11年没有登录论坛了。11年没有碰过易语言了

{:3_48:}牛666

OnLy，

b0y 发表于 2023-9-27 21:50
求和的列 判断一下列名 不计入计算

主要是随机增加的列的话 怎么循环计算

xianggu

取列数,存起来,每次计算和值的时候判断存起来的列数和当前列数是否一样,不一样就计算最后一列加上去

jcy0307

楼上附件没负数，这个附件增加负数
1.e (5.85 KB, 下载次数: 2)

2023-9-27 23:24 上传

点击文件名下载附件

OnLy，

jcy0307 发表于 2023-9-27 23:24
楼上附件没负数，这个附件增加负数

你这计算的有问题。插入2行3行。出现6-7行数值。
固定列数的循环计算我会。现在是多了一个变量，会没有规则的增加列数。
比如你这个固定就7个列。后期会增加8个列

OnLy，

jcy0307 发表于 2023-9-27 23:24
楼上附件没负数，这个附件增加负数

少看了一行。里面加了列数变量。不过还是有点问题。就是单次计算没问题。
因为数据是一直存在的。增加一行数据的时候。再计算就出问题了