来来来，大家注意了，DataTable分组求和的简单方式
'定义一个临时变量，用于判断某个分组是否已经求过和
dim temp=""
'求和的值
dim sumValue
'循环DataTable
for each dr in 网格部件1.DataTable.Rows
'根据长度判当前这条数据所属的分组是否已经求过和(在分组名称前后加上“|”,是为了避免：“是”“不是”这样的分组,这养的分组不加符号就判断不到)
if(Len(Replace(temp,"|"+dr["分组字段名"]+"|",""))=Len(temp))
'求某一个分组的和，并复制给变量(在这里，你就可以把值设置到其他的某个地方了)
sumValue=网格部件1.DataTable.Compute("sum(求和字段名)","地块号='"+dr["分组字段名"]+"')
'临时变量存入分组名称,加上逗号只是更好的避免分组名称前后冗余的情况，如:|是||不是|，如果不在前后加一个字符加以区分，就盘不判断了
temp=temp+"|"+dr["分组字段名"]+"|"
end if
next
原文地址:http://bbs.delit.cn/thread-533-1-1.html
转载请注明出处:
撰写人:度量科技www.delit.cn
'定义一个临时变量，用于判断某个分组是否已经求过和
dim temp=""
'求和的值
dim sumValue
'循环DataTable
for each dr in 网格部件1.DataTable.Rows
'根据长度判当前这条数据所属的分组是否已经求过和(在分组名称前后加上“|”,是为了避免：“是”“不是”这样的分组,这养的分组不加符号就判断不到)
if(Len(Replace(temp,"|"+dr["分组字段名"]+"|",""))=Len(temp))
'求某一个分组的和，并复制给变量(在这里，你就可以把值设置到其他的某个地方了)
sumValue=网格部件1.DataTable.Compute("sum(求和字段名)","地块号='"+dr["分组字段名"]+"')
'临时变量存入分组名称,加上逗号只是更好的避免分组名称前后冗余的情况，如:|是||不是|，如果不在前后加一个字符加以区分，就盘不判断了
temp=temp+"|"+dr["分组字段名"]+"|"
end if
next
原文地址:http://bbs.delit.cn/thread-533-1-1.html
转载请注明出处:
撰写人:度量科技www.delit.cn
来自 “ ITPUB博客 ” ，链接：https://blog.itpub.net/328153/viewspace-1966565/ ，如需转载，请注明出处，否则将追究法律责任。
上一篇：
网格部件设置列高，设置高度效果
下一篇：
文档显示部件类似套打显示构建效果
请登录后发表评论
登录
全部评论
