diff --git a/Ventas/Ventas.aspx.vb b/Ventas/Ventas.aspx.vb
index c2b48d1dc..b8b55420e 100644
--- a/Ventas/Ventas.aspx.vb
+++ b/Ventas/Ventas.aspx.vb
@@ -19763,8 +19763,8 @@ Partial Class Ventas
                     DdlIVA.SelectedValue = "1"
                     PorcentajeIVA = ViewState("IVA").ToString().ToDecimal
                 Case 0.08
-                    DdlIVA.SelectedValue = If(EsCreaApartirDe, $"{(TmpDT.MAX("PorcentajeIVA").ToDecimal() + 1).RoundSQL(2).ToString()}", "1.08")
                     PorcentajeIVA = If(EsCreaApartirDe, TmpDT.MAX("PorcentajeIVA").ToDecimal, ViewState("IVA").ToString().ToDecimal).RoundSQL(2)
+                    DdlIVA.SelectedValueExist((PorcentajeIVA + 1).ToString.Replace("1.00", "1")) ' detalle al usar cero, se está poniendo 1.00, debemos limpiar los ceros
                     DdlIVA.Visible = If(Not CveVenta > 0 Or EsCreaApartirDe Or CveDevolucion > 0, True, False)
                 Case 0.16
                     DdlIVA.SelectedValue = "1.16"