كود الشاشه الإفتتاحيه

اخي الشاشة الافتتاحية هي عبارة عن اداة الصورة توضع على الفورم

وعند تشغيل البرنامج يتم تشغيلها لمدة خمس ثواني عن طريق اداة التايمر

وبعد مرور الخمس ثواني تختفي وتظهر الشاشة الرئيسية للبرنامج

اخي انا جربت اعمل التايمر

ولكن بعد ماتختفي الشاشه الإفتتاحيه ويظهر الشاشه الرئيسيه وادخل منها على نافذه اخرى ثواني وترجع تظهر مره ثانيه..؟!

اخي بالطبع سوف تظهر وذلك لان اداة التايمر تكرر ظهور الفورم كل خمس ثواني مثلا

ولتجنب المشكلة ضع الكود التالي في حدث التايمر

Timer1.Enabled = False

تحياتي

في حدث التايمر على اداة التايمر

ساجرب واخبرك النتيجه

شكراً لك

اخي وضعت على الفورم الإفتتاحي تايمر

بالخصائص التاليه:

interval: 1000

tag: 50

ثم وضعت الكود التالي

Private Sub Timer1_Timer()
Form3.Visible = False
Form7.Visible = True
Timer1.Enabled = False
End Sub

النتيجة

يظهر الفورم الإفتتاحي وخلفه الفورم الرئيسي

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

ضع النافذه الافتتاحية هي النافذه الافتراضيه للبرنامج

وضع كود عرض النافذه التاليه داخل التايمر ..

اخي / مفــ 2005ــادي .

والله ليك وحشه ليا نصيب القيك في موضوع تاني . المهم

الكود النهائي هيكون بالطريقة دي.

خد الكود ده وضعه في التيمر.

Private Sub Timer1_Timer()
Me.Visible = False
Form7.Visible = True
Timer1.Enabled = False
End Sub

مع ان الكود التاني برده صح بس جرب ده وقلي.

اخي كما قالت لك الاخت power girl تاكد من وضع الشاشة الافتتاحية هي الشاشة المقدمة للمشروع

وذلك باختيار القائمة Project ومن ثم اختيار البند Project Properties سوف تظهر لك شاشة اختر من الامر Startup object

اسم النافذه الافتتاحية

وضع الكود الذي وضعه الاخ a7med prof

والسلام

السلام عليكم

ميه ميه

شكراً لكم اخواني جميعاً