Private Declare Function ShowCursor Lib "user32" _
(ByVal bShow As Long) As Long


Call ShowCursor( 0 ) ' lo nascondo
Call ShowCursor( 1 ) ' lo mostro


Ref: http://wimania.com/daniel/vb/6.html