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

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (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=50601)

الصفحات: 1 2

فتح الشاشة الرئيسية - العيدروس - 09-11-24

السلام عليكم .اخواني هذا الملف وجدته عل اليوتوب 
لو سمحتم أين أضع الكود 
HOME.Show
Me.Close
اريد ان يكون الفورم 1 هو الفورم سبلاش سكرين و لما يكتمل تغير الالوان يفتتح الفورم HOME ما عرفت اين اضع السطرين بارك الله فيكم

RE: فتح الشاشة الرئيسية - F.H.M - 09-11-24

وعليكم السلام ورحمة الله وبركاته ،،،

ضع هذا الكود في الفورم لود للفورم HOME

كود :
Dim splash As New Form1
        splash.ShowDialog()

وإجعل Startup Form هو HOME

RE: فتح الشاشة الرئيسية - العيدروس - 09-11-24

شكرا لك أخي FHM و بارك الله فيك
لكن بهذا الكود يبقى الفورم سبلاش سكرين على طول شغال و لا يختفي و تظهر الفورم HOME

RE: فتح الشاشة الرئيسية - F.H.M - 09-11-24

(09-11-24, 07:28 PM)العيدروس كتب : شكرا لك أخي FHM و بارك الله فيك
لكن بهذا الكود يبقى الفورم سبلاش سكرين على طول شغال و لا يختفي و تظهر الفورم HOME

إنتظر وسوف يظهر

السبب بطول الإنتظار هو طول كود rgb

لأنك وضعت كود طويل فينتظر إنتهاء الكود

RE: فتح الشاشة الرئيسية - justforit - 10-11-24

(09-11-24, 03:01 PM)العيدروس كتب : السلام عليكم .اخواني هذا الملف وجدته عل اليوتوب 
لو سمحتم أين أضع الكود 
HOME.Show
Me.Close
اريد ان يكون الفورم 1 هو الفورم سبلاش سكرين و لما يكتمل تغير الالوان يفتتح الفورم HOME ما عرفت اين اضع السطرين بارك الله فيكم


انظر لخصائص المشروع و عدل اللازم

RE: فتح الشاشة الرئيسية - العيدروس - 10-11-24

شكرا اخي justforit على المساعدة لكن ما لاحظته بعد تطبيقي ما ذكرته لي هو اختفاء الفورم سبلاش سكرين بعد ثانيتين او ثلاثة فقط يعني ما يلحق الواحد يشوفها و تختفي بارك الله فيك و اسف على الازعاج

RE: فتح الشاشة الرئيسية - Taha Okla - 10-11-24

وعليكم السلام ورحمة الله وبركاته

بعد جعل الـ Home هي نافذة الاقلاع الرئيسية ..

أكتب الكود التالي في محررها :
كود :
   Private Sub HOME_Load(sender As Object, e As EventArgs) Handles MyBase.Load
       Me.WindowState = FormWindowState.Maximized
       Form1.MdiParent = Me
       Form1.Show()
   End Sub

وفي محرر نافذة الـ Form1 في قسم التصريحات العام : 
كود :
Dim t1 As Integer = 0

Dim t2 As Integer = 200  ' هذه القيمة تغيرها بحسب حاجتك من الوقت طويل أو قصير زيد أو أنقص منها كما تشاء

وفي نهاية كل تيك (Tick) لكل تايمر أضف الكود التالي : 
كود :
t1 += 1

If t1 > t2 Then Me.Close()


RE: فتح الشاشة الرئيسية - العيدروس - 10-11-24

شكرا جزيلا أخ طه و بارك الله فيك و جزاك كل خير ان شاء الله فعلا ضبطت الحكاية فقط لو من الممكن جعل السبلاش سكرين تظهر وحدها هي الاول و بعدها تظهر الفورم HOME لا اريدها ان تظهر وسط الفورم هوم طبعا اذا كان ممكن ذلك و لك كل الشكر

RE: فتح الشاشة الرئيسية - Taha Okla - 10-11-24

عدل :
كود :
Private Sub HOME_Load(sender As Object, e As EventArgs) Handles MyBase.Load
   ' Form1.MdiParent = Me
   Form1.ShowDialog()
   Me.WindowState = FormWindowState.Maximized
End Sub


RE: فتح الشاشة الرئيسية - العيدروس - 11-11-24

جزاك الله كل خير أخ طه فضلك علينا كثير عسى ان يعوضها لك الاه بأفضل منها يا رب