>Necesitaria saber como ocultar el cursor. He probado con las propiedades y
>a asignarle un dibujo de 1 pixel y nada.

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

Para mostrar el cursor:
l=ShowCursor(1&)

Para ocultarlo :
l=ShowCursor(0&)

Debes tener en cuenta que es una especie de contador. Si llamas a ocultar
dos veces seguidas debes llamar a mostrar otras dos veces para que se vea.
Cada vez que llamas a ocultar se decrementa un contador interno y cuando
llamas a mostrar se aumenta. Si el contador es mayor o igual que 0 el
puntero se muestra, en caso contrario no se muestra.



Un saludo.

_________________________________________________
José Rubí de la Vega
E-mail : jrubi@arrakis.es
WWW : http://www.arrakis.es/~jrubi
Podrás encontrar información sobre VB, la lista
VB-ESP y un resumen de los mensajes de la misma