Agradezco tus comentarios

Me encantaría conocer tus impresiones acerca de los distintos ejemplos o artículos de este blog, si te es posible deja un comentario en mi libro de visitas. En cambio para preguntas o problemas con alguno de los ejemplos, te ruego me las formules en el foro de Access en grupos Emagister o en en el foro de Access y VBA.

miércoles, 2 de enero de 2008

CAPITULO 1.- FUNCIÓN MSGBOX

Como había comentado en la introducción, vamos a obviar muchos aspectos técnicos , VBA (Visual Basic para Aplicaciones) permite acceder a las funcionalidades de un lenguaje orientado a eventos. Por tanto podemos programar todos los objetos de nuestra aplicación.

Pensemos en un formulario. Todos los controles de ese formulario serán objetos susceptibles de ser programados, un cuadro de texto, un botón de comando, un cuadro combinado, un botón de opción.....etc, pero también son objetos las secciones del formulario e incluso el propio formulario.


Vamos a empezar a programar, creamos un formulario nuevo vacío, Access por defecto le va a
llamar Formulario1 le dejamos ese nombre, lo ponemos en vista diseño y vamos a sus propiedades. (ver imagen abajo).

En la parte de arriba del todo, podemos leer Tipo de selección: Formulario, por tanto vamos a programar el Objeto Formulario para que haga lo que nosotros le pidamos.



Nos vamos a la ficha Eventos, buscamos uno que se llama "Al abrir"...

Nos aparece un cuadro combinado, lo desplegamos y elegimos [Procedimiento de Evento]...

Hacemos click en los tres puntitos que aparecen a la derecha y se nos mostrará una ventana de Visual Basic.



Access ha escrito por nosotros varias cosas, en la parte superior vemos:

Option Compare Database
Option Explicit


Es posible que Option Explicit no aparezca, por el momento no te preocupas, ahora mismo no nos hace falta.
Esa parte superior se llama Declaraciones.


Ahora vamos a lo que nos interesa, Access pone por nosotros el encabezado y el fin del procedimiento de Evento...


Private Sub Form_Open(Cancel As Integer)

End Sub



Por tanto nosotros solo tenemos que rellenar lo que va entre ambas cosas, que serán las instrucciones que queremos darle al Formulario, como el Evento que hemos elegido es "Al abrir", nuestras instrucciones se producirán cuando abramos el formulario.

Vamos a mostrar un mensaje, para ello escribimos:

MsgBox "Hola Mundo"


Por tanto ahora nos quedará así:


Private Sub Form_Open(Cancel As Integer)
MsgBox "Hola Mundo"

End Sub


Cerramos la ventana, cerramos el formulario, guardamos cambios y ahora abrimos el formulario. Se nos mostrará el mensaje "Hola Mundo"


Bueno...yo diría que por el momento esto ha sido facil ¿no?.


Hemos utilizado la función MsgBox en su forma más simple, vamos a mejorar un poco nuestro cuadro de mensaje, utilizando algunas de las opciones que esta función nos proporciona. Vamos a sustituir lo que pusimos antes:


MsgBox "Hola Mundo"


Por esto otro:


MsgBox "Hola Mundo", vbInformation, "Mi primer mensaje"


Ahora si abrimos de nuevo el formulario, podemos ver los cambios que se han producido.



Puedes probar cambiando vbInformation por vbCritical o por vbExclamation o por vbQuestion. También puedes cambiar "Mi primer mensaje" por cualquier otro título.



Más adelante veremos otras posibilidades que nos aporta esta función.


Para finalizar con este capítulo, prueba a poner exactamente lo mismo, pero en el evento "Al cerrar". Puedes experimentar probando en distintos eventos.

No hay comentarios:

Publicar un comentario en la entrada