Todo blza, galera?
Eu nunca mexi com API, mas tente fazer o mouse desaparecer e aparecer, e ocorreu o erro, eu desconfio de mim mesmo. Acho que na declaraçao faltou especificar qual é a DLL. Vejam a msg do erro, e o codigo do mouse:
Msg:
Run-time error '453':
Can't find DLL entry point showcursor in User32
Código:
(General) (Declarations)
Private Declare Function showcursor Lib "User32" (ByVal bshow As Integer) As Integer
(cmdcursor) (Click)
Private Sub Cmdcursor_Click(Index As Integer)
Select Case Index
Case 0
showcursor (False)
Cmdcursor(0).Enabled = False
Cmdcursor(1).Enabled = True
Cmdcursor(1).SetFocus
Case 1
showcursor (True)
Cmdcursor(1).Enabled = False
Cmdcursor(0).Enabled = True
Cmdcursor(0).SetFocus
End Select
End Sub
OBS: Em API sou leigo, tentando a testar isto.
Valeu!