.::::: فریز شدن برنامه :::::.

سلام دوستان عزیز
سوال من اینه که اگر زمانی در برنامه از حلقه نا محدود استفاده کنیم یا برای مثال در برنامه از یه حلقه که از عدد یک تا چند هزار که در یک لیست باکس خروجیشو میده استفاده بشه فرم برنامه تا زمانی که کل عدد به خروجی نرفته به حالت فریز در میاد و نمی شه برنامه رو وسط کار بست یا جابجا کرد
کسی راهکاری داره که جلوی این حالت گرفت؟!:6:

سلام.
تو حلقت یه doevents بذار.

سلام جیگر
راهکار پیشنهادی من که البته پیشرفته نیستش اینه:
فرض کن تو می خوای این کد رو اجرا کنی:

کد:

---

For i = 1 To 10000
Me.Caption = i
Next i

---

این کد ممکنه چندین ثانیه طول بکشه و در اون مدت فرمت فریز میشه
حالا میشه از یک تایمر استفاده کرد
الان وقت ندارم اگر کسی جوابت رو نداد به زودی میام تکمیل می کنم
ببخشید:41:

نقل قول:

---

سلام.
تو حلقت یه doevents بذار.

---

سلام میشه یک نمونه بزاری؟:10:
__________________-
فکر کنم جواب رو پیمان داد ولی منم جواب مبتدی خودم رو کامل کنم:31:

نقل قول:

---

راهکار پیشنهادی من که البته پیشرفته نیستش اینه:
فرض کن تو می خوای این کد رو اجرا کنی:

کد:

---


for i = 1 to 10000
me.caption = i
next i

---

این کد ممکنه چندین ثانیه طول بکشه و در اون مدت فرمت فریز میشه
حالا میشه از یک تایمر استفاده کرد

---

یک تایمر داریم به نام t
و از این کد استفاده می کنیم:

کد:

---

Dim I As Double
Private Sub Form_Load()
I = 0
T.Tag = 0
T.Interval = 10
End Sub
Private Sub T_Timer()
For I = I To I + 50
    Me.Caption = I
    If I >= 10000 Then
        T.Enabled = False
        Exit For
    End If
Next I
End Sub

---

اینطوری فرم فریز نمیشه هر چند می دونم روش خنده داریه:27:
ولی فقط عیبش اینه که یکم بیشتر طول میکشه
البته به جاش توان لغو عملیات رو داریم:21:

کد:

---


Do
DoEvents
    **Your Codes
Loop
---------------------------------------------------
For i = 1 To 100000
DoEvents
Me.Caption = i
Next

---

سلام.
بهرام روش استفاده از تایمر کاملا اشتباه است. اصلا منطقی نیست که حلقه ها رو داخل تایمر قرار بدیم. شاید لازم باشه حلقه فقط یه بار بچرخه ولی زیاد بچرخه. اون وقت تکلیف چیست؟ استفاده از تایمر باید به جاش باشه.
همون doevents روش حل این مشکله که جناب جمشیدی مثال خوبی زدن.

اره می دونم روشم مبتدیه:31:
روش DoEvents صد در صد بهتره
چیزی مه من از DoEvents فهمیدم اینه که در هر بار که حلقه تکرار میشه DoEvents باعث میشه که یک وقفه در اجرای کد رخ بده و شاید برای یک زمان بسیار کوتاه به فرم هیچ فرمانی ارسال نمیشه
البته مطمئن نیستم همین باشه:46:
اما کار مبتدیانه ای که من کردم این بود که هر 50 بار تکرار حلقه یک صدم ثانیه به برنامه استراحت می دادم:21:
در کل روش من در آوردیی بود:27:

سلام به همه
متشکرم
آقا بهرام درسته که روشت کاربرد نیست ولی یه ابتکار جدیده

سلام.
کار doevents اینه که به برنامه اجازه میده به قسمت های دیگه برنامه هم بپردازه.