Jag försöker att använda mig av ShowCursor-functionen, men den fungerar dåligt. När jag kör igång programmet, så gömms cursorn som jag vill, men jag får den inte tillbaka.
<code>
Private Declare Function ShowCursor Lib "user32" (ByVal bShow As Long) As Long

'i form loade
ShowCursor 0

i form unload
ShowCursor 1
</code>
Något som jag har glömt?

Hej
Frågan är hur du stänger programmet när du inte har
någon cursor.Jag testade och det funkar ua om
jag stänger via Ctrl Alt Delete. Hur stänger du ??
/Sven

Hej!
Under form_keyDown
<code>
Key = KeyCode
Select Case KeyCode
Case vbKeyEscape
GameOver
'mera koder
Sub GameOver()
Dim Response As Integer
ShowCursor 1
</code>
Det bör väll räcka?

Jag fick det att fungera när jag la showcursor under en modul.

Kan det ha varit Private i "Private Declare..." som gjorde det tro?

Japp, precis.