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.

jueves, 22 de enero de 2009

Botones en Formulario

A todos nos pasa que empezamos a diseñar nuestros formularios y llega un momento que todos decidimos incluirle botones de navegación, botón de Salir, botón de Eliminar registro...etc

Esa labor en muchas ocasiones puede resultar tediosa y si por alguna de aquellas decidimos cambiar la imagen de nuestros formularios puede resultar desalentadora.

Sería ideal tener un código común para todos esos botones y que simplemente con copiar y pegar los botones de un formulario a otro, todos ellos funcionaran.

Pues este ejemplo va justamente de eso. De poder copiar y pegar los botones de un formulario a otro y con un código mínimo que funcionen.

Lo único que hay que hacer en cada formulario es poner en el Evento "Al activar registro": BotonesNavegacion Me

Y todos los botones empezarán a funcionar.

En este ejemplo yo he puesto los siguientes botones:

Primero, Siguiente, Anterior, Ultimo, Nuevo, Eliminar, Salir, QuitaFiltro

A los botones Siguiente y Anterior además les he añadido un poco de código para que en su propiedad Caption nos vaya mostrando en que registro nos encontramos y de cuantos, también que se desactiven al llegar al primer o último registro.

El botón QuitaFiltro lo he puesto porque necesita referencia del formulario a diferencia de los demás que solo con DoCmd basta, y de esta forma si necesitas añadir cualquier otro botón que necesite algo parecido puedes tener una guía.
Al botón eliminar le he quitado el aviso propio de Access y le he puesto uno personalizado, lo cual evita también que nos de error si deseamos cancelar la eliminación.

El enlace al ejemplo aquí