How do you make the hourglass appear?

[RGB255]

I'm making a program and there are graphics in it. While the graphics are being drawn I want the mousepointer to appear as the hourglass and change back again.

[Silent Avenger]

Well there are several ways you can do this the easiest of which is to use the screen properties. I believe the mousepointer which is the hourgrlass is number 11. So to make the mousepointer into an hourglass you would use the following code:

code:

Screen.mousepointer = 11

this will change the mousepointer to an hour glass
Also to change back to the regular mouse pointer you would use the code:

code:

Screen.mousepointer = 0

Here's an example program to show you what this does. (put 2 command buttons on your form)

code:

Private Sub Command1_Click() Screen.mousepointer = 11 End Sub Private Sub Command2_Click() Screen.mousepointer = 0 End Sub