PDA

View Full Version : نحوه استفاده از ProgressBar



amin_gh68
دوشنبه 10 مهر 1391, 23:04 عصر
دوستان کسی هست نحوه استفاده ProgressBar واسم بگه
هیچ جا نبود
ممنون میشم

ehsan-68
سه شنبه 11 مهر 1391, 00:50 صبح
سلام ...

نمیدونم این به دردت میخوره یا نه ...

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick

Dim i As Integer
i= 1
If ProgressBar1.Value = 100 Then
Me.Hide()
LoginForm1.Show()
Timer1.Enabled = False
Else
ProgressBar1.Value += 1
Label2.Text = Val(Label2.Text) + Val(i)

End If

End Sub

اون label2 رو برای نشون دادن درصدش گذاشتم ...

شرمنده دیگه حرفه ای تر از این نمیتونستم ... :لبخندساده:

ehsan-68
سه شنبه 11 مهر 1391, 09:32 صبح
فکر کنم این کدم بتونه خوب باشه ...

progressBar1.PerformStep()