-- codgo comentado

This commit is contained in:
2023-07-18 17:13:10 -07:00
parent b7a1c2674e
commit 9db5a305ac

View File

@@ -281,7 +281,7 @@ Partial Class Finanzas_RepRazonesFinancieras2
For index = 1 To dt.Columns.Count - 5
CType(Gv.Columns(index + 4), BoundField).DataField = dt.Columns(index + 4).ColumnName
Gv.Columns(index + 4).Visible = True
Dim tmpDate As Date
'Dim tmpDate As Date
CType(Gv.Columns(index + 4), BoundField).HeaderText = dt.Columns(index + 4).ColumnName
'If (Date.TryParse(dt.Columns(index + 4).ColumnName, tmpDate)) Then
' CType(Gv.Columns(index + 4), BoundField).HeaderText = tmpDate.ToString("dd-MMM").Replace(".", "")