主题：关于窗口表合计的问题

d1 = Date.today
d2 = Date.today.AddDays(1)

Dim lbl2 As WinForm.Label = e.Form.Controls("Label2")
Dim lbl7 As WinForm.Label = e.Form.Controls("Label7")
lbl2.text = d1
lbl7.text = d1
'Dim st1 As String = "作废"
Tables("日报表打印_Table1").DataTable.LoadFilter = " [JFSJ] <   '"& d2 &"'   And [JFSJ] > '"& d1 & "'"    ' And DJZT = '作废'
Tables("日报表打印_Table1").DataTable.Load

Tables("日报表打印_Table1").Cols("DEHJ").GrandTotal = True '指定要合计的列
Tables("日报表打印_Table1").Cols("YHJE").GrandTotal = True
Tables("日报表打印_Table1").Cols("SSJE").GrandTotal = True
Tables("日报表打印_Table1").GrandTotal = True '显示合计模式

1、首先作废的订单，我需要在窗口中显示。

2、统计时不计入合计。

确实不会排除！