Don’t Forget That Mouse Pointer

Don’t Forget That Mouse Pointer

If you turn the mouse pointer into an hourglass (and back to normal) in a routine with error handling, don’t forget to turn the mouse pointer back to normal in the error-handler section. Otherwise, the program might look busy, but actually be done:

 Private Function CalcTotal() As Long	On Error GoTo ProcErr	Screen.MousePointer = vbHourglass	'	'Code that may raise error	'	Screen.MousePointer = vbNormal	Exit Function 'Don't go into error handlerProcErr:	Screen.MousePointer = vbNormal	'	'Error handling code	'End Function


Share the Post: