Code How Progressbar works

Posted Date: 19 Nov 2008	Resource Type: Code Snippets	Category: VB.NET Syntax
Author: ujjwal kumar adhya	Member Level: Bronze
Rating:	Points: 7

Public Class Frmsplash
Inherits System.Windows.Forms.Form

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
ProgressBar1.Value += 2

If ProgressBar1.Value <= 30 Then
Label3.Text = "Initializing....."
ElseIf ProgressBar1.Value <= 50 Then
Label3.Text = "Loading components....."
ElseIf ProgressBar1.Value <= 70 Then
Label3.Text = "Integrating Database...."
ElseIf ProgressBar1.Value <= 100 Then
Label3.Text = "Please wait..."
End If

If ProgressBar1.Value = 100 Then
Timer1.Dispose()
Me.Visible = False
cur = New Frmpay()
cur.Show()
End If
End Sub

End Class

Responses

No responses found. Be the first to respond and make money from revenue sharing program.

Feedbacks

Popular Tags

What are tags ?

Search Tags

VB.NET PROGRAMMER .

Post Feedback

This is a strictly moderated forum. Only approved messages will appear in the site. Please use 'Spell Check' in Google toolbar before you submit.
You must Sign In to post a response.

	Next Resource: Code How to bring Print Dialog Box
	Previous Resource: Displaying Print dialogue box in Excel using VB.Net
	Return to Discussion Resource Index
	Post New Resource
	Category: VB.NET Syntax

Post resources and earn money!

More Resources