'统计生成
Dim g As New SQLGroupTableBuilder("日常业务按年统计", "任务指派")
g.C
g.Filter = "申报期_年 > 2017"
g.Groups.AddDef("申报期_年", "年份")
g.Totals.AddDef("业务编号", AggregateEnum.Count, "业务量")
dim dt as datatable = g.Build(True)
Functions.BeginSyncExecute("主页数据刷新＿左边图表1",dt )
'主页数据刷新＿左边图表1函数
_TJtable1 = args(0)
Dim n As Integer = _TJtable1.DataRows.Count
If n > 0 Then
Dim sum As Integer = _TJtable1.Compute("sum(业务量)")
……
Chart.VisualEffect = True '改变样式
Chart.DataTable =_TJtable1 '设置绑定表
Chart.SeriesList.Clear() '清除图表原来的图系
……
[此贴子已经被作者于2024/5/6 15:37:03编辑过]
加好友 
发短信
Post By：2024/5/6 11:02:00 [显示全部帖子]
