-- option strict on

2023-08-23 00:03:55 -07:00
parent 7ee978059d
commit 3bc4f72658
23 changed files with 212 additions and 257 deletions
--- a/Compras/RepGastos.aspx.vb
+++ b/Compras/RepGastos.aspx.vb
@@ -14,7 +14,7 @@ Partial Class RepGastos
 #Region "Propiedades"
    Private Property RfechaInicio() As DateTime
        Get
-            Return If(IsNothing(ViewState("RfechaInicio")), DateTime.MinValue, (ViewState("RfechaInicio")))
+            Return If(IsNothing(ViewState("RfechaInicio")), DateTime.MinValue, ViewState("RfechaInicio").ToString.ToDateTime)
        End Get
        Set
            ViewState("RfechaInicio") = Value
@@ -22,7 +22,7 @@ Partial Class RepGastos
    End Property
    Private Property RfechaFin() As DateTime
        Get
-            Return If(IsNothing(ViewState("RfechaFin")), DateTime.MinValue, (ViewState("RfechaFin")))
+            Return If(IsNothing(ViewState("RfechaFin")), DateTime.MinValue, ViewState("RfechaFin").ToString.ToDateTime)
        End Get
        Set
            ViewState("RfechaFin") = Value