diff --git a/Ventas/Ventas.aspx.vb b/Ventas/Ventas.aspx.vb
index 26d9255ef..7ec63c062 100644
--- a/Ventas/Ventas.aspx.vb
+++ b/Ventas/Ventas.aspx.vb
@@ -29292,8 +29292,9 @@ Partial Class Ventas
     Private Sub CargaEstado()
         DdlComExtEstado.Items.Clear()
         If DdlComExtPais.SelectedValue.ToEntero() > 0 Then
-            DdlComExtEstado.DataSource = GlobalDTGralEstados("-1", CvePais:=DdlComExtPais.SelectedValue.ToEntero)(0)("ClaveSATPais").ToString()
+            DdlComExtEstado.DataSource = GlobalDTGralEstados("-1", CvePais:=DdlComExtPais.SelectedValue.ToEntero) '(0)("ClaveSATPais").ToString()
         End If
+        DdlComExtEstado.Visible = True
         DdlComExtEstado.Items.Insert(0, New ListItem("Seleccione", "-1"))
         DdlComExtEstado.DataBind()
     End Sub