.版本 2
.支持库 eGrid
.支持库 spec
.程序集 窗口程序集_启动窗口
.子程序 _高级表格1_列宽被改变
.参数 列号, 整数型
高级表格2.置列宽 (0, 高级表格1.取列宽 (0))
高级表格2.置列宽 (1, 高级表格1.取列宽 (1))
高级表格2.置列宽 (2, 高级表格1.取列宽 (2))
高级表格2.置列宽 (3, 高级表格1.取列宽 (3))
高级表格2.置列宽 (4, 高级表格1.取列宽 (4))
.子程序 __启动窗口_创建完毕
高级表格2.置数据 (0, 0, #表格常量.文本型, “合计:”)
高级表格2.置数据 (0, 4, #表格常量.文本型, “合计222:”)
高级表格1.置列类型 (4, #表格常量.货币型)
高级表格2.置列类型 (4, #表格常量.货币型)
.子程序 _高级表格1_结束编辑
.如果真 (高级表格1.取光标行号 () = 高级表格1.行数 - 1) ' 说明到最后一行了,再自动加一行,
高级表格1.插入行 (到文本 (高级表格1.行数), )
' 高级表格2.置数据 (0, 4, , )
.如果真结束
高级表格2.置数据 (0, 4, #表格常量.文本型, 高级表格金额合计 (高级表格1, 4))
编辑框1.内容 = 到文本 (高级表格金额合计 (高级表格1, 4))
.子程序 高级表格金额合计, 整数型
.参数 高级表格, 高级表格
.参数 合计列
.局部变量 金额
.局部变量 计次
.计次循环首 (高级表格.行数 - 1, 计次)
金额 = 金额 + 到数值 (高级表格.取数据 (计次, 合计列))
.计次循环尾 ()
调试输出 (金额)
返回 (金额)
仅供参考,详细请查看代码
下载上面的源码就可以了