Ajustes comparacion

Inventarios/RepEntradasSalidas.aspx.vb

@@ -1,4 +1,7 @@
-Imports System.Data
+Option Explicit On
+Option Strict On
+
+Imports System.Data
 Imports System.IO
 Imports Extensiones
 Imports Microsoft.Reporting.WebForms
@@ -65,7 +68,7 @@ Partial Class Inventarios_ReporteEntradasSalidas
             End If
 
             TxtFechaI.Text = Now.AddMonths(-1).ToShortDateString
-            TxtFechaF.Text = Now
+            TxtFechaF.Text = Now.ToString("dd/MM/yyyy")
             FechaInicial = "-1"
             FechaFinal = "-1"
 
@@ -374,7 +377,7 @@ Partial Class Inventarios_ReporteEntradasSalidas
             FechaI = "01-01-0001"
         End If
         If FechaF = "-1" OrElse FechaFinal.ToDate > Now.ToDate Then
-            FechaF = Now
+            FechaF = Now.ToString("dd/MM/yyyy")
         End If
         Dim RutaPDF As String
         Dim Ruta As String = UsuarioActual.Empresa.Ruta