{"id":448,"date":"2023-11-08T14:51:50","date_gmt":"2023-11-08T19:51:50","guid":{"rendered":"http:\/\/blog.espol.edu.ec\/sistinfo\/?p=448"},"modified":"2026-10-12T11:08:55","modified_gmt":"2026-10-12T16:08:55","slug":"resumen-codigo-modulos","status":"publish","type":"post","link":"https:\/\/blog.espol.edu.ec\/sistinfo\/resumen-codigo-modulos\/","title":{"rendered":"Resumen de c\u00f3digo en M\u00f3dulos"},"content":{"rendered":"\n<h2 class=\"wp-block-heading\">Formulario: Abrir con registro nuevo:<\/h2>\n\n\n\n<pre class=\"wp-block-code alignwide\"><code>Private Sub Form_Open(Cancel As Integer)\n    DoCmd.GoToRecord , , acNewRec\nEnd Sub<\/code><\/pre>\n\n\n\n<h2 class=\"wp-block-heading\">Registros: Buscar el \u00faltimo registro relacionado a un id. DLast()<\/h2>\n\n\n\n<pre class=\"wp-block-code alignwide\"><code>Private Sub id_producto_AfterUpdate()\n    saldo_antes = DLast(\"&#091;saldofinal]\", \"BodegaPrincipal\", \"BodegaPrincipal.&#091;id_producto] = \" &amp; id_producto)\nEnd Sub<\/code><\/pre>\n\n\n\n<h2 class=\"wp-block-heading\">Operaciones: Validar un retiro cuando hay saldo\/existencia<\/h2>\n\n\n\n<pre class=\"wp-block-code alignwide\"><code>Private Sub Retiro_AfterUpdate()\n    If existencias &lt; retiro Then\n        retiro = 0\n    End If\n    saldofinal = saldoanterior - retiro\nEnd Sub<\/code><\/pre>\n\n\n\n<h2 class=\"wp-block-heading\">Evento: Ejecutar consulta con click en bot\u00f3n<\/h2>\n\n\n\n<pre class=\"wp-block-code alignwide\"><code>Private Sub Bt_anexar_Click()\n    If anexado = False Then\n        Me.Refresh\n        DoCmd.OpenQuery \"c_anexaordenretiro2\", , acReadOnly\n        anexado = True\n        Me.Refresh\n    End If\nEnd Sub\n<\/code><\/pre>\n\n\n\n<h2 class=\"wp-block-heading\">Funciones y procedimientos<\/h2>\n\n\n\n<pre class=\"wp-block-code alignwide\"><code>Function <strong>saldoactualiza<\/strong>()\n    <strong>saldoactualiza<\/strong> = saldo_antes + ingreso - retiro\nEnd Function\n\nPrivate Sub id_producto_AfterUpdate()\n    saldo_antes = DLast(\"&#091;saldo_final]\", \"Inventario\", \"Inventario.&#091;id_producto] =\" &amp; Id_producto)\n    saldo_final = <strong>saldoactualiza<\/strong>()\nEnd Sub\n\n\nPrivate Sub ingreso_AfterUpdate()\n    saldo_final = <strong>saldoactualiza<\/strong>()\nEnd Sub\n\nPrivate Sub retiro_AfterUpdate()\n    saldo_final = <strong>saldoactualiza<\/strong>()\nEnd Sub\n<\/code><\/pre>\n\n\n\n<h2 class=\"wp-block-heading\">Palabras reservadas en Access VBA<\/h2>\n\n\n\n<p>No se usan como nombre de campo, casilla de texto, etc:<\/p>\n\n\n\n<pre class=\"wp-block-code alignwide\"><code>valor\nvalue<\/code><\/pre>\n\n\n\n<p><a href=\"https:\/\/learn.microsoft.com\/es-es\/office\/troubleshoot\/access\/reserved-words\">https:\/\/learn.microsoft.com\/es-es\/office\/troubleshoot\/access\/reserved-words<\/a><\/p>\n\n\n\n<p>&nbsp;<\/p>\n","protected":false},"excerpt":{"rendered":"<p>Formulario: Abrir con registro nuevo: Registros: Buscar el \u00faltimo registro relacionado a un id. DLast() Operaciones: Validar un retiro cuando hay saldo\/existencia Evento: Ejecutar consulta con click en bot\u00f3n Funciones y procedimientos Palabras reservadas en Access VBA No se usan como nombre de campo, casilla de texto, etc: https:\/\/learn.microsoft.com\/es-es\/office\/troubleshoot\/access\/reserved-words &nbsp;<\/p>\n","protected":false},"author":8043,"featured_media":0,"comment_status":"closed","ping_status":"closed","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[1843],"tags":[],"class_list":["post-448","post","type-post","status-publish","format-standard","hentry","category-actividades"],"_links":{"self":[{"href":"https:\/\/blog.espol.edu.ec\/sistinfo\/wp-json\/wp\/v2\/posts\/448","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/blog.espol.edu.ec\/sistinfo\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/blog.espol.edu.ec\/sistinfo\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/blog.espol.edu.ec\/sistinfo\/wp-json\/wp\/v2\/users\/8043"}],"replies":[{"embeddable":true,"href":"https:\/\/blog.espol.edu.ec\/sistinfo\/wp-json\/wp\/v2\/comments?post=448"}],"version-history":[{"count":12,"href":"https:\/\/blog.espol.edu.ec\/sistinfo\/wp-json\/wp\/v2\/posts\/448\/revisions"}],"predecessor-version":[{"id":738,"href":"https:\/\/blog.espol.edu.ec\/sistinfo\/wp-json\/wp\/v2\/posts\/448\/revisions\/738"}],"wp:attachment":[{"href":"https:\/\/blog.espol.edu.ec\/sistinfo\/wp-json\/wp\/v2\/media?parent=448"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/blog.espol.edu.ec\/sistinfo\/wp-json\/wp\/v2\/categories?post=448"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/blog.espol.edu.ec\/sistinfo\/wp-json\/wp\/v2\/tags?post=448"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}