منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
اغلاق فروم بوقت بعد وقت محدد - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : اغلاق فروم بوقت بعد وقت محدد (/showthread.php?tid=26575)

اغلاق فروم بوقت بعد وقت محدد - dasktop - 21-09-18

مرحبا

انا عملت برنامج وهو عبارة عن فروم وااضفت 1 تايمر وفي التايمر وضعت هاذا الكود         Me.Close()


وفي ال interval كتبت الرقم 3 ولم ينجح الاغلاق

RE: اغلاق فروم بوقت بعد وقت محدد - حريف برمجة - 21-09-18

1000 = ثانية

RE: اغلاق فروم بوقت بعد وقت محدد - العواد الصغير - 21-09-18

(21-09-18, 10:51 AM)dasktop كتب : مرحبا

انا عملت برنامج وهو عبارة عن فروم وااضفت 1 تايمر وفي التايمر وضعت هاذا الكود         Me.Close()


وفي ال interval كتبت الرقم 3 ولم ينجح الاغلاق

Public Class Form1
    Dim ii As Integer = 0
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Timer1.Interval = 500

    End Sub

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

        ii += 1
        If ii > 5 Then
            End
        End If
    End Sub
End Class

RE: اغلاق فروم بوقت بعد وقت محدد - dasktop - 21-09-18

(21-09-18, 11:06 AM)العواد الصغير كتب :
(21-09-18, 10:51 AM)dasktop كتب : مرحبا

انا عملت برنامج وهو عبارة عن فروم وااضفت 1 تايمر وفي التايمر وضعت هاذا الكود         Me.Close()


وفي ال interval كتبت الرقم 3 ولم ينجح الاغلاق

Public Class Form1
    Dim ii As Integer = 0
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Timer1.Interval = 500

    End Sub

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

        ii += 1
        If ii > 5 Then
            End
        End If
    End Sub
End Class

اخي انا اريد فقط اغلاق الفروم رقم 2بعد 5 ثواني والفروم 1 يبقى شغال لان الفروم 1 واجهة البرنامج والفروم 2 مجرد رسالة عند الضغط ع زر فقط المطلوب فقط كود اغلاق فروم 2 بعد 5 ثواني

RE: اغلاق فروم بوقت بعد وقت محدد - حريف برمجة - 21-09-18

إذا كنت تريد العرض لمدة 3 ثواني اجعل القيمة = 3000

ايضاً قم بتفعيل التايمر Enabled = True

RE: اغلاق فروم بوقت بعد وقت محدد - dasktop - 21-09-18

(21-09-18, 12:02 PM)حريف برمجة كتب : إذا كنت تريد العرض لمدة 3 ثواني اجعل القيمة = 3000

ايضاً قم بتفعيل التايمر Enabled = True

اخي انا المشروع يتكون من 2 فروم فروم رقم 1 هو البرنامج والفروم 2 مجرد رسالة تضهر عند الضغط على زر في الفروم 1 المطلوب هو كود اغلاق الفروم 2 بعد 5 او 3 ثواني فقط والفروم 1 يعمل

RE: اغلاق فروم بوقت بعد وقت محدد - حريف برمجة - 21-09-18

في الفورم 2 ضع تايمر وغير Enabled = False اجعلها True
ايضاً interval اكتب بها 3000 تعني 3 ثواني لأن كل 1000 يحسبها التايمر بثانية واحدة
دبل كلك على التايمر وأكتب هذا السطر :
Me.Close

انتهينا من الفورم 2

في الفورم 1 ضع هذا السطر في الزر :
Form2.Show

RE: اغلاق فروم بوقت بعد وقت محدد - dasktop - 21-09-18

تم نجحت الطريقة ونشكركم على التوضيح