Visual Basic - com cambiar el puntero del mouse

hola:
espero me puedan ayudar, tengo un proceso de extraccion de datos de un archivo, y toma algo de tiempo, entonces me gustaria que en el puntero del mouse apareciera un reloj y cuando termine el proceso vuelva a la normalidad , y no se como hacer esto.

Gracias.

Screen.MousePointer = 11 ------ reloj de arena
Screen.MousePointer = 0-------normal

También puedes poner en vez de 11 ó 0 vbnormal y vbglass o algo así ahora no me acuerdo.

Lo que debes hacer para ello es poner lo siguiente dentro del procedimiento de extracción de datos:
'Esto convierte el puntero del mouse en un reloj de arena
Screen.MousePointer = vbHourglass
y al termino del procedimiento pones:
'Con esto le devuelves su estado habitual
Screen.MousePointer = vbDefault