Private summe As Decimal = 0
 
    Protected Sub GridView1_RowDataBound(ByVal sender As Object, ByVal e As _
      GridViewRowEventArgs)
 
        If e.Row.RowType = DataControlRowType.DataRow Then
 
            summe += Convert.ToDecimal(DataBinder.Eval(e.Row.DataItem, _
              "Dauer_in_h"))
 
        End If
 
        If e.Row.RowType = DataControlRowType.Footer Then
 
            e.Row.Cells(4).Text = "Summe:"
            e.Row.Cells(5).HorizontalAlign = HorizontalAlign.Right
            e.Row.Cells(5).Font.Bold = True
 
            e.Row.Cells(5).Text = summe.ToString("c")
        End If
 
    End Sub