以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]动态列名  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=97148)
--  作者：铜豆
--  发布时间：2017/3/7 0:15:00
--  [求助]动态列名
有底纹的地方都想把它设置成动态 的能否实现

Dim Names As String() = {"客户","雇员"}

Dim Names1 As String() = {"单数","金额"}

Dim Names2 As String() = {"合计1","合计2"}
For Each Name As String In Names

For Each Name1 As String In Names1

For Each Name2 As String In Names2

e.datarow(Name2) = DataTables("订单").Compute("Sum(Names1)", "Name is not nothing ")

Next

Next

Next
--  作者：wyz20130512
--  发布时间：2017/3/7 0:59:00
--  
你的需求是什么？描述一下，或发个截图什么的。
--  作者：有点蓝
--  发布时间：2017/3/7 9:02:00
--  
e.datarow(Name2) = DataTables("订单").Compute("Sum(" & Names1 & ")", "Name is not nothing ")