Change Cursor To Hourglass

[wil1cad2]

I'm using VB studio 2005. Pls help
to change cursor to HourGlass when u press a button and wait for calcualtion
the result.

Ex: If btnCalculate.En abled = True Then
Screen.MousePoi nter = vbHourglass
Else
Screen.MousePoi nter = vbDefault
End If
I got some thought above but doesn't work.
also some hint from instructor:
Windows.Forms.C ursor.Current = Cursors.WaitCur sor
Thank you.

[daniel aristidou]

Um try
me.cursor instead
Also just a question......W hy hourglass when button enabled not when calculating?
I wopuld have posted the code....under click
and the defualt cursor after the calculation code

[Killer42]

The Screen.MousePoi nter method is from VB6 (and earlier). I believe it's handled differently in VB2005.

[wil1cad2]

Um try
me.cursor instead
Also just a question......W hy hourglass when button enabled not when calculating?
I wopuld have posted the code....under click
and the defualt cursor after the calculation code

yes u are right it is when calculating.
so what is the code suggestion.
Thanks.

[Killer42]

I don't think we know enough about your code.

But the general idea is to turn on the hourglass (and perhaps issue a DoEvents to ensure Windows updates the display) before starting your long-running calculation. Then you set the mousepointer back to normal when the calculation is finished.

[DaveTheBari]

There is a 'Do' command to bring up the hourglass:-
DoCmd.Hourglass = True
To return to the default cursor:-
DoCmd.Hourglass = False
Cheers
Dave

[DaveTheBari]

Further to my last -
Maybe that's not a lot of use to you - I was searching for a solution to a problem in VB inside MS Access, so had Access on the brain. That DoCmd thing is an Access facility that operates in VB.
Dave