-
February 24th, 2005, 02:03 PM
#1
Wait Cursor
I have a form with a button and a textbox.
I have a also a class Cls_Import with a public function Import performing a long task.
From Import I use RaiseEvent to notify main form to write some task info in the textbox.
How to show the wait cursor during the long task?
I did something like this:
Code:
Private Sub cmdImport_Click()
' ...
If oImp Is Nothing Then
Set oImp = New Cls_Import
End If
Me.MousePointer = vbHourglass
bRet = oImp.Import() 'a long task here
Me.MousePointer = vbDefault
'...
End Sub
But doesn't work.
What must be done?
-
February 24th, 2005, 02:51 PM
#2
Re: Wait Cursor
Try.
Screen.MousePointer = vbhourglass
Screen.MousePointer = 0 ' return to normal
-
February 25th, 2005, 04:17 AM
#3
Re: Wait Cursor
Thank you very much.
It works.
Posting Permissions
- You may not post new threads
- You may not post replies
- You may not post attachments
- You may not edit your posts
-
Forum Rules
|
Click Here to Expand Forum to Full Width
|