System.Cursor (Word)

Devuelve o establece el estado (la forma) del puntero. Posibles valores de retorno son wdCursorIBeam - Forma de cursor en I, wdCursorNormal - Forma de cursor normal, wdCursorNorthwestArrow - Forma de cursor diagonal empezando por la esquina superior izquierda, wdCursorWait - Forma de cursor de reloj de arena.

Dim intWait As Integer 
 
StatusBar = "Please wait..." 
 
For intWait = 1 To 1000 
 System.Cursor = wdCursorWait 
Next intWait 
 
StatusBar = "Task completed" 
System.Cursor = wdCursorNormal