Private Sub DataGrid1_ItemCreated(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.DataGridItemEventArgs) Handles DataGrid1.ItemCreated
If e.Item.ItemType = ListItemType.Footer Then
Dim lbl As Label = CType(e.Item.FindControl("Label2"), Label)
lbl.Text = Now
End If
End Sub