01.
Partial
Class
UpdateProgress
02.
Inherits
System.Web.UI.Page
03.
04.
Protected
Sub
Page_Load(
ByVal
sender
As
Object
,
ByVal
e
As
System.EventArgs)
Handles
Me
.Load
05.
UpdateProgress1.DisplayAfter = 100
06.
UpdateProgress1.Visible =
True
07.
UpdateProgress1.DynamicLayout =
True
08.
End
Sub
09.
10.
Protected
Sub
Button1_Click(
ByVal
sender
As
Object
,
ByVal
e
As
System.EventArgs)
Handles
Button1.Click
11.
System.Threading.Thread.Sleep(1000)
12.
Label1.Text =
"Welcome To ThaiCreate.Com : "
& DateTime.Now.ToLongTimeString()
13.
End
Sub
14.
15.
End
Class