السلام عليكم
لو سمحتو ابغا كود الفورم تنعرض مدة معينة ثم تختفي
جزاكم الله خير
السلام عليكم
لو سمحتو ابغا كود الفورم تنعرض مدة معينة ثم تختفي
جزاكم الله خير
وعليكم السلام ورحمه الله وبركاته ,
ضع Timerوحدد الوقت , وأكتب الكود داخله ,
إن شاء الله يكون المطلوب..
تم تعديل هذه المشاركة بواسطة إشراقــه فجــر في 24 يناير 2010 في 23:55
سبحآن الله وبحمده .. سبحآن الله العظيم .. ,
أنا بعد أسأل نفس السؤال
طيب وش فكرة الكود بالضبط يعني ممكن تعطيني لمحة عنه
يا "قهوه المساء" هل تريد هذا الكود للاسبلش اسكرين ام فروم يختفى بعد مده معينه وخلاص
على العموم الحليين معايا !!!!حدد لماذا فكره الكود لنوضح لك ما تريد بالضبط
جرب هي الطريقه بإستخدام التايمر
Dim i As Integer = 1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Timer1.Start()
End Sub
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
Do
If i = 5 Then
Me.Hide()
Else
i = i + 1
End If
Loop
End Subآسف على طريقة عرض الكود نظرا لعدم معرفتي لطريقة إضافة الكود في المشاركه
تم تعديل هذه المشاركة بواسطة محمد فؤاد تركي في 25 يناير 2010 في 10:39 — السبب: تنسيق الكود
جزاكم الله الجنة جميعا
شكرا اخي اسحاق ضبط الكود لكن شكله خمس ثواني ولما زدت الوقت ما لاحظت تغيير ؟
private sub Timer1_tick Dim waite as Integer =0 تعريف متغير من نوع رقمي ( integer ) waite += 10 الزيادة على المتغير بمقدار 10 if waite = 3000 then الشرط : اذا تساولى قمية المتغير مع قيمة العداد (Timer 1 ) timer1.enabled = false form2.show me.close end if
جعل interval في التايمر يساوي 3000 في مرحلة التصميم
بالتوفيق
تم تعديل هذه المشاركة بواسطة عبدالرحمن المرشود في 30 يناير 2010 في 17:17
بسم الله الذي لا يضر مع اسمه شيء بالارض ولا بالسماء وهو السميع العليم