Private Sub dgr1_ItemDataBound(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.DataGridItemEventArgs) Handles dgr1.ItemDataBound
If e.Item.ItemType = ListItemType.Item Or e.Item.ItemType = ListItemType.AlternatingItem Then
Dim viewCount As Decimal = Convert.ToDecimal(DataBinder.Eval(e.Item.DataItem, "bjd_je"))
viewstate("viewCountSum1") += viewCount
ElseIf e.Item.ItemType = ListItemType.Footer Then
e.Item.Cells(4).HorizontalAlign = HorizontalAlign.Center
e.Item.Cells(4).Text = "合计"
e.Item.Cells(5).HorizontalAlign = HorizontalAlign.Right
e.Item.Cells(5).Text = FormatNumber(viewstate("viewCountSum1"), 2)
viewstate("viewCountSum1") = 0
End If
End Sub