Declare Function ShowCursor Lib "user32" Alias "ShowCursor" (ByVal bShow As _
Long) As Long ‘ Place this in the declare section of a module
RetFunct = ShowCursor(False) ‘ This is the call to hide the mouse cursor
RetFunct = ShowCursor(True) ‘ This is the call to show the mouse cursor again