Dim b As New SQLGroupTableBuilder("统计表","积压")
b.C
b.AddTable("积压", "部门编号","店铺档案","业务系统编号")
b.Groups.AddDef("{积压}.部门名称")
b.Groups.AddDef("{积压}.部门编号")
b.Totals.AddDef("调拔汇总")
b.Totals.AddDef("零售汇总")
b.Totals.AddExp("平均售罄率","-isnull([零售汇总],0)/isnull([调拔汇总],0)")
b.Build
Dim bjs As List(Of String) = DataTables("统计表").GetValues("部门编号|平均售罄率")
For Each bj As String In bjs
Dim drs As List(Of DataRow) = DataTables("店铺档案").Select("[部门编号] = " & bj(0))
For n As Integer = 0 To drs.Count - 1
If n > 0 Then
drs(n)("参考售罄率") = bj(1)
End If
Next
Next
无法将类型为“System.Collections.Generic.List`1[System.String[]]”的对象强制转换为类型“System.Collections.Generic.List`1[System.String]”。
加好友 
发短信
Post By：2019/11/29 11:41:00 [只看该作者]
