Gömma muspekaren?

Option Explicit
Private Declare Function ShowCursor Lib "user32" (ByVal lShow As Long) As Long

Public Sub pHideCursor()
    ShowCursor False
End Sub

Public Sub pShowCursor()
    ShowCursor True
End Sub

När du ska gömma, call pHideCursor
När du ska visa, call pShowCursor.

Glöm inte att ta pShowCursor när du avslutar programmet.

Kalas.. tack för det snabba svaret.. funkade klockrent

Det var så lite så..