Hi,
I have a button on my main Form which will pop up another form called PleaseWaitForm containing a RadWaitingBar.
The problem is I can get the WaitingBar to animate.
I have a button on my main Form which will pop up another form called PleaseWaitForm containing a RadWaitingBar.
The problem is I can get the WaitingBar to animate.
01.
Private
Sub
Btn_ReadFromDB_Click(sender
As
Object
, e
As
EventArgs)
Handles
Btn_ReadFromDB.Click
02.
StatusLabel.Text =
".................."
03.
Dim
pleaseWait
As
New
PleaseWaitForm
04.
'pleaseWait.Location = Me.Location
05.
pleaseWait.StartPosition = FormStartPosition.CenterScreen
06.
pleaseWait.Show()
07.
' Set cursor as hourglass
08.
Cursor.Current = Cursors.WaitCursor
09.
PleaseWaitForm.RadWaitingBar.StartWaiting()
10.
Application.DoEvents()
11.
'Read Excel Database
12.
ReadFromExcel(
"\Assets\Documents\?????.xls"
)
13.
PleaseWaitForm.RadWaitingBar.StopWaiting()
14.
Cursor.Current = Cursors.
Default
15.
' Hide the please wait form
16.
pleaseWait.Hide()
17.
End
Sub