سوال در مورد Progress Bar

[Mohsen.]

سلام
من یک Progress bar گذاشتم و کد زیر رو به اون دادم.

toolStatusProgress.Visible = True
toolStatusProgress.Value = 100

حالا میخوام وقتی کارش تموم شد یعنی کل پراگرس پر شد اونو مخفی کنم. اما وقتی کد زیر رو میدم هنوز کارش تموم نشده مخفی میشه. باید چی کار کرد؟

If toolStatusProgress.Value = 100 Then toolStatusProgress.Visible = False

البته خودم میدونم این کد باید هم جواب نده.:لبخند:
ولی چیز دیگه نتونستم بنویسم.
ممنون

[JaVa]

سلام و...

این رو امتحان کن ببین.
Public Class Form1

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
ProgressBar1.Minimum = 0
ProgressBar1.Maximum = 100
ProgressBar1.Value = 0
Timer1.Enabled = True
End Sub

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

If ProgressBar1.Value < 100 Then
ProgressBar1.Value = ProgressBar1.Value + 1
Else
Timer1.Enabled = False
ProgressBar1.Visible = False
End If
End Sub
End Class



البته خودم میدونم این کد باید هم جواب نده.
:متفکر:

[gilsoft]

If toolStatusProgress.Value = 100 Then toolStatusProgress.Visible = False



سلام دوست عزیز
باید به شکل زیر عمل کنی

ابتدا تابع زیر رو ایجاد کن :

Function Delay(ByVal Second As Double) As Boolean
Dim Finish As Double = Second + Microsoft.VisualBasic.DateAndTime.Timer
Do While Microsoft.VisualBasic.DateAndTime.Timer < Finish : Loop
Return (True)
End Function

بعد دستو IF رو به شکل زیر تغییر بده :

If toolStatusProgress.Value >= 100 Then Delay(2) : toolStatusProgress.Visible = False

موفق باشید