G
Guest
I’m using Leban’s MouseWheelHookA2K method to prevent users from using the
mouse wheel to scroll through records
(http://www.lebans.com/mousewheelonoff.htm).
Using a module and the following code in the On Load event of the main form,
the mouse wheel is disabled for all forms and subforms . . .
' Turn the MouseWheel Off
Dim blRet As Boolean
' Call our MouseHook function in the MouseHook dll.
blRet = MouseWheelOFF(False)
.. . . *except* when the subform has a vertical scroll bar. If the subform
has a vertical scroll bar, the mouse wheel still works, despite the code.
How can I disable the mouse wheel on forms with a vertical scroll bar?
Thanks.
Kurt
mouse wheel to scroll through records
(http://www.lebans.com/mousewheelonoff.htm).
Using a module and the following code in the On Load event of the main form,
the mouse wheel is disabled for all forms and subforms . . .
' Turn the MouseWheel Off
Dim blRet As Boolean
' Call our MouseHook function in the MouseHook dll.
blRet = MouseWheelOFF(False)
.. . . *except* when the subform has a vertical scroll bar. If the subform
has a vertical scroll bar, the mouse wheel still works, despite the code.
How can I disable the mouse wheel on forms with a vertical scroll bar?
Thanks.
Kurt