cambiar puntero de maus (vb6.0)

vmarkus · #1 (**permalink**) 13/04/2005, 12:44

_estoy trabajando en vb 6.0, tengo un procedimiento muy largo y me gustaria que al inicio de este tenga un puntero (relog) y cuando termina otro (el comun de flecha), ¿como puedo cambiar el puntero?
chau gracias

pablinweb · #2 (**permalink**) 13/04/2005, 14:13

Dim xPointer As Integer

xPointer = Screen.MousePointer
Screen.MousePointer = vbHourglass

comienza el procedimeinto
...
...
...
termina el procedimiento

Screen.MousePointer = xPointer

vmarkus · #3 (**permalink**) 14/04/2005, 15:02

gracias me re cirve.