agregado procesos y bd clases

guia/Extensiones/direcciones.vb

@@ -0,0 +1,13 @@
+Partial Public Class direcciones
+    Public ReadOnly Property PoblacionTmp As String
+        Get
+            Return municipios.ObtienePoblacion(Me.CodigoMunicipio)
+        End Get
+    End Property
+
+    Public ReadOnly Property ProvinciaTmp As String
+        Get
+            Return municipios.ObtieneProvincia(Me.CodigoMunicipio)
+        End Get
+    End Property
+End Class