ShowCursor

Declaración:
Declare Function ShowCursor Lib "user32" Alias "ShowCursor" (ByVal bShow As Long) As Long
Descripción:
La función ShowCursor muestra o oculta el cursor del Mouse, este contiene un contador si este es negativo el cursor no se ve, si es positivo el cursor está visible.
Parámetros:
ByVal bShow As Long
Si se coloca 1 el contador se incrementa en 1, si se coloca 0 el contador disminuye en 1. Si el contador es menor a 0 el cursor está invisible.
Valor de retorno:
El valor de retorno es el estado del contador.
Uso:
Dim ValorRetorno As Long 'Variable para el valor de retorno
'Ejemplo 1 (Oculta el mouse):

ValorRetorno = ShowCursor(0)
'En este ejemplo se oculta el cursor.
'Ejemplo 1 (Muestra el mouse):
ValorRetorno = ShowCursor(1) 'En este ejemplo se muestra el cursor..