منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : اغلاق فورم و فتح فورم بعد 1 دقيقة
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
اخواني السلام عليكم من فضلكم عندي فورم 1 و فورم 2
الفورم 1 هو يلي سيفتح الأول كيف يمكن تظهر الفورم 1 لمدة دقيقة بعدها تنغلق و ينفتح الفورم رقم 2 شكرا و بارك الله فيكم
بارك الله فيك! يمكنك تحقيق هذا بسهولة باستخدام ميزة Timer في VB.NET. الفكرة هي إعداد مؤقت يعمل لمدة دقيقة (60,000 ميلي ثانية)، ثم يقوم بإغلاق الفورم الأول وفتح الفورم الثاني.

Public Class Form1

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
' إعداد المؤقت ليبدأ التشغيل عند فتح الفورم
Timer1.Interval = 60000 ' المؤقت مضبوط على دقيقة واحدة (60000 مللي ثانية)
Timer1.Start()
End Sub

Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
' إيقاف المؤقت بعد انتهاء الدقيقة
Timer1.Stop()

' إظهار الفورم الثاني
Dim form2 As New Form2()
form2.Show()

' إغلاق الفورم الأول
Me.Close()
End Sub

End Class

ملاحظات:
تأكد أن الفورم الثاني موجود:

يجب أن يكون لديك فورم باسم Form2 مضافًا إلى مشروعك.
إعداد الفورم الافتراضي:

تأكد من أن Form1 هو الفورم الافتراضي الذي يتم فتحه عند تشغيل التطبيق.
يمكنك التحقق من ذلك من خلال فتح Application Settings في خصائص المشروع وضبط Startup Form على Form1.
إظهار الفورم الثاني:

إذا أردت أن يكون الفورم الثاني بدوام كامل (Modal)، يمكنك استخدام:
form2.ShowDialog()
إغلاق التطبيق عند الفورم الثاني:

إذا كنت تريد أن يُغلق التطبيق بعد الفورم الثاني، استخدم:
Application.Exit()
جزاك الله خيرا اخي altoki ضبط معي و الحمد لله بارك الله فيك
الله يوفقك تشريف