Visual Basic - urge mouseicon

Hola a todos,mi pregunta es como puedo hacer para cambiar el mouseicon a la hora de hacer click en un boton,es decir que se ponga el relojito de windows
gracias de antemano....

Simple:
Private Sub Command1_Click()
Screen.MousePointer = 11
End Sub

P.D: Sin comentarios...!