بستن برنامه و اجرا دوباره برنامه

[aleas2]

سلام خسته نباشید برنامه بنده باید هر 30 دقیقه یکبار بسته بشه دوباره اجرا بشه بهترین روش چی که خودش اتوماتیک بسته بشه دوباره اجرا بشه؟

و اینکه کدی وجود نداره بدون بستن برنامه خودش اتوماتیک تمام متغیر های مقدار تست باکس ها و... مقداراشونو "" قرار بده و فرم لود از اول اجرا بشه؟

[vbhamed]

سلام

راستش اين جمله "تمام متغیر های مقدار تست باکس ها و... مقداراشون" يك مقدار گنگ هست و آدم نميفهمه منظورتون دقيقا چيه، متغيرها رو هم مي‌گين، فقط تكست باكس يا ...
اما در هر حال كد زير تمام تكست باكس هاي فرم جاري رو خالي مي‌كنه و Form_Load رو هم فراخواني مي‌كنه

Dim Obj As Object

For Each Obj In Controls
If TypeOf Obj Is TextBox Then o.Text = ""
Next

Form_Load

[aleas2]

توضیح بهتر اینکه تمام مشخصات هر چی کنترل روی فرم هسته مقدارهاشون مشخصاتشون
به حالت اولیه که فرم اجرا میشه بشه در کل یعنی مثل اینکه برای اولین بار برنامه رو اجرا میکنم بشه متوجه منظورم شدین؟

[SlowCode]

با همین روشی که آقا حامد گفتن میتونی این کار رو بکنی. فقط ممکنه حجم کدت زیاد بشه(بستگی داره به برنامت)
یه راه دیگه هم اینه که یه تایمر بزاری و بعد از 30 ثانیه برنامه خودت رو با shell باز کنی، بعد برنامه جاری رو ببندی.

[miladatashin]

خب چرا unload و دوباره load نمیکنید. میتونید تو تایمر این کد رو بنوسید

Private Sub Timer1_Timer()
Unload Form1
Form1.Show
End Sub

[mmssoft]

خب چرا unload و دوباره load نمیکنید. میتونید تو تایمر این کد رو بنوسید

Private Sub Timer1_Timer()
Unload Form1
Form1.Show
End Sub


نمیخوان فقط یک فرم رو ببندن، میخوان کل برنامه بسته بشه، و بعد اجرا بشه...

[mehran901]

خب دوست عزیز بیا با این روش کار کن

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

Private Sub Form_Unload(Cancel As Integer)
Cancel = 1
Shell App.Path & "\" & App.EXEName & ".exe", vbNormalFocus
Cancel = 0
End Sub



ی تایمر بذار هر 30 دقیقه unload me کن