-validacion de fecha incial menor a fecha final

Transportes/RepContratos.aspx.vb

@@ -122,6 +122,11 @@ Partial Class ListadoContratos
             Exit Sub
         End If
 
+        If TxtFechaSalida.Text.ToDateTime > TxtFechaRegreso.Text.ToDateTime Then
+            Alert("La fecha inicial no puede ser mayor al final.", TipoMensaje.MsgAdvertencia)
+            Exit Sub
+        End If
+
         'Agregamos Contrato
 
         Dim ObjContratos As New ClsContratos