Dim
dt
As
DataTable =
Me
.DataGridView1.DataSource
tleft.Text = Format(dt.Compute(
"sum(
调整金额
)"
,
"true"
),
"0.00"
).ToString()
sumaverage.ForeColor = Color.Red
UltraStatusBar1.Panels(0).Text =
"
调整金额合计
:"
& Format(dt.Compute(
"sum(
调整金额
)"
,
"true"
),
"0.00"
).ToString()