تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] مطلوب كود لتغيير لون الفورم كل دقيقه
#1
Smile 
السلام عليكم
بدي كود لتغيير لون الفورم كل دقيقه
وشكرا
(( نحن قوم أعزنا الله بالإسلام فمهما ابتغينا العزة بغيره أذلنا الله )) .. 











الرد }}}
تم الشكر بواسطة:
#2
يا كلارو،
اضف Timer للفورم وعدل خصائصة بحيث تضع للخاصية Interval قيمة 60000 يعني دقيقة لأن الثانية تساوي 1000 وفعــّـــل الخاصية Enabled بتحديد القيمة True وبعدها ضع هذا الكود وقم بزيادة الألوان للمصفوفة كما تريد.
PHP كود :
Private Sub Timer1_Tick(sender As System.ObjectAs System.EventArgsHandles Timer1.Tick
    Dim clrs
() As Color = {Color.RedColor.GreenColor.Blue}
    Static 
indx As Integer
    Me
.BackColor clrs(indx)
    
indx += 1
    
If indx clrs.Count Then indx 0
End Sub 
الرد }}}
تم الشكر بواسطة: CLARO , ziad.mg95 , ziad.mg95
#3
الله يرضى عليك اخي شكرا جزلا
الرد }}}
تم الشكر بواسطة: الوادي
#4
اشكرك جزيل الشكر اخب العزيز

طيب عندي سؤال ثاني لو سمحت انا بدي اعمل برنامج ساعه و بدي كل دقيققة يتغير
لون الخلفية للون السود لمدة 3 ثوان ثم يرجع الون للازرق
(( نحن قوم أعزنا الله بالإسلام فمهما ابتغينا العزة بغيره أذلنا الله )) .. 











الرد }}}
تم الشكر بواسطة:
#5
يا كلارو،
الطلب الثاني يحتاج أن تضع اثنين من Timer
ال Timer1 تضع للخاصية Interval قيمة 60000 يعني دقيقة مثل التوضيح السابق وتفعيل الخاصية Enabled بتحديد القيمة True
اما Timer2 تضع للخاصية Interval قيمة 3000 يعني ثلاث ثوان ولا تقم تفعيل الخاصية Enabled يعني قيمتها False
PHP كود :
Private Sub Timer1_Tick(sender As System.ObjectAs System.EventArgsHandles Timer1.Tick
    Timer2
.Enabled True
End Sub

Private Sub Timer2_Tick(sender As System.ObjectAs System.EventArgsHandles Timer2.Tick
    
Static ac As Boolean True
    
If ac Then
        Me
.BackColor Color.Black
    
Else
        
sender.Enabled False
        Me
.BackColor Color.Blue
    End 
If
    
ac Not ac
End Sub 
الرد }}}
تم الشكر بواسطة: CLARO


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
Photo [VB.NET] مشكلة في شكل الفورم abuyazan 5 288 27-02-24, 09:38 PM
آخر رد: aljzazy
  [VB.NET] مشكلة ظهور textbox بعد حذفه من الفورم مبرمج صغير 1 1 209 27-01-24, 02:04 AM
آخر رد: مبرمج صغير 1
Photo [كود] مطلوب كود يستخدم الأوامر فقط لتحديث قاعدة بيانات بـ vb.net AhmedEissa 4 634 18-01-24, 11:40 PM
آخر رد: العتيق
  مطلوب كود الطباعة لهذا البرنامج melad2002 2 217 13-01-24, 06:42 PM
آخر رد: melad2002
  مطلوب شرح لتقارير DevExpress بلغة vb.net Adel27213 3 314 03-01-24, 12:23 AM
آخر رد: عبد العزيز البسكري
  [VB.NET] تحويل التاريخ بين أداتين تايم بيكر في نفس الفورم محمد العموري 1 254 29-12-23, 10:44 PM
آخر رد: Kamil
  [VB.NET] مطلوب سورس كود مبيعات h2551996 2 345 17-12-23, 08:03 PM
آخر رد: dr.programming
  [VB.NET] مطلوب تصحيح سطر فى هذا الــ Function AhmedEissa 3 493 13-12-23, 12:55 AM
آخر رد: العتيق
  [VB.NET] مطلوب دمج جملتين لتحديث قاعدة بيانات فى جملة واحدة AmeenRashed 1 328 18-11-23, 01:32 AM
آخر رد: sniper2030
  مطلوب كود جمع التاريخ Ahmed.vb 3 438 22-10-23, 08:32 AM
آخر رد: Ahmed5

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم