ایجاد تاخیر

[sina_saravi1]

سلام

من در این باره جست و جو کردم ولی چیزی پیدا نکردم

میخواستم ببینم چجوری میشه بین عملیات یه تاخیری بزارم؟
مثلان تو حلقه for میخوام از یه sub استفاده کنم که برای چند هزارم ثانیه بعد دوباره حلقه اجرا بشه

من این کار رو برای load کردن فرمم میخوام که با opacity کم (0) به زیاد (100) برسه

اگه راه حل بهتری دارین من استقبال میکنم

[saadi2]

System.Threading.Thread.Sleep(5000)

[anooshiran]

سلام دوست عزيز

براي ايجاد وقفه از كد زير استفاده كن




system.threading.thread.sleep(5000)

[faravani]

سلام

imports system.threating
threath.sleep(milisecond)

[f.nabavi]

سلام. به نظر من بهتره از تایمر استفاده کنی . اول opacity فرم رو 0 بذار بعد از کد زیر استفاده کن. برای مقدار 0.01 که من هر بار دارم به opacity اضافه میکنم مقدار 20 برای interval تایمر مناسبه. اگر بخوای سریعتر فرم رو واضح کنی هم میتونی مقدار 0.01 رو اضافه کنی هم interval و کم کنی که بهتره interval رو کم کنی که فرم نرم تر واضح بشه

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
If Me.Opacity < 1 Then
Me.Opacity += 0.01
Else
Timer1.Enabled = False
End If
End Sub