-- option strict on

This commit is contained in:
2023-08-28 06:58:52 -07:00
parent 20cc4a84ea
commit 71d8e44773

View File

@@ -217,7 +217,7 @@ Partial Class Finanzas_RepRazonesFinancieras
If i = index Then
serie.name = row(i).ToString()
Else
Dim actual = row(i).ToString().ToDouble
Dim actual As Double = row(i).ToString.ToDouble
serie.data.Add(actual)
anterior = actual
'If Not G1 OrElse (actual >= anterior) Then
@@ -415,7 +415,7 @@ Partial Class Finanzas_RepRazonesFinancieras
End Sub
Protected Sub GVDatos_RowDataBound(sender As Object, e As GridViewRowEventArgs)
If e.Row.RowType = DataControlRowType.DataRow Then
For i = 1 To e.Row.Cells.Count - 1
For i As Integer = 1 To e.Row.Cells.Count - 1
'Mind that i used i=1 not 0 because the width of cells(0) has already been set
Dim cell2 As TableCell = e.Row.Cells(i)
cell2.CssClass = "ceros"