La rueda de desplazamiento del ratón es útil en algunas aplicaciones informáticas , pero puede causar problemas en Microsoft Access. Si crea aplicaciones de bases de datos con Access, que podría estar familiarizado con la manera en la rueda de desplazamiento puede hacer que los registros a ciclo demasiado rápido o ciclo antes de la entrada de datos se ha completado. Con el lanzamiento de Access 2007, la rueda de desplazamiento está desactivado por defecto en la aplicación. En las versiones anteriores a Access 2007 , incluyendo Access 2003, debe desactivar manualmente la función de rueda de desplazamiento con un módulo o código VBA colocado en un procedimiento de evento del ratón. En este artículo se describen dos métodos para lograr esto . Cosas que necesitará de computadora con acceso a Internet
Mostrar más instrucciones
llamar a un archivo DLL de código manualmente
1
Descargar el MouseWheelHookA2k libre base de datos y código de ejemplo de el sitio web Holdings Lebans (ver Recursos para el enlace). Extraiga el archivo en una carpeta en el ordenador.
2
Copia y pega el archivo " MouseHook.DLL " en la carpeta con el archivo MDB de Access.
3 < p> Abra la base de datos Access . Buscar y abrir el formulario de " inicio" en la lista de formularios para su base de datos ( Tu forma de inicio puede tener un nombre diferente) .
4 Haga clic en el " Diseño de formularios Herramientas" barra de herramientas y crear un " comando Button "en cualquier lugar en el formulario.
5
Haga clic en el botón de comando y haga clic en la opción" Propiedades " en el menú emergente. Desplácese hasta la opción " clic" y haga doble clic en el campo vacío para abrir el Basic para Aplicaciones ( VBA) de editor
6
Copia Visual y pegue el siguiente código en el editor de VBA: . < Br >
' Gire la rueda del ratón Off
blRet Dim As Boolean
blRet = MouseWheelOFF
7
Cierre el editor de VBA.
8
Crear otro " botón de comando " en cualquier otra forma en su base de datos para convertir la rueda de nuevo antes de salir de la base de datos . Escriba el siguiente código detrás del botón de comando en el código " OnClick ":
' Gire la rueda del ratón en
blRet Dim As Boolean
blRet = MouseWheelON
< br >
Importación de un módulo en la base de datos Access
9
Descargue la base de datos de ejemplo basMouseHook libre y código del sitio EverythingAccess.com (ver Recursos para el enlace). Guardar la base de datos en una carpeta de su ordenador .
10
Abra la base de datos en Access. Haga clic en la opción "Archivo /Importar" y luego seleccione " Módulos ". Vaya a la carpeta donde guardó la base de datos basMouseHook e importar el módulo de código basMouseHook de la base de datos de la muestra.
11
Abra su forma " de inicio " en la ventana del diseñador de formularios . Haga clic en el formulario, a continuación, haga clic en la opción " Propiedades" en el menú emergente.
12
Desplácese hacia abajo para el procedimiento de evento " OnOpen " y haga doble clic en él para entrar en el editor de VBA .
13
Copia y pega el siguiente código en el procedimiento de evento " OnOpen ":
Private Sub Form_Open ( Cancel As Integer )
MouseHook Static As Object
Set MouseHook = NewMouseHook ( Me) End Sub