تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] كيف يكون الكود الصحيح الخاص بالالوان
#1
Rainbow 
عندي 200 موظف عندي في في البوتون في مشروعي اسمة state والتاكس بوكس بيكون ثلاة خيارات Normal ,Unpaid ,Sick اريد لكل موظف في التاكي بوكس اذا طلعت الكتابة Sick  تطلع بالاحمر لكل موظف يطلع في بيانتة كذة تلقائياً    ، اما Normal يكون اسود طبيعي   ، اما unpaid   تطلع باللون  الازرق   اتمنى تكون الفكرة وصلت.


وموضح لكم بالصور

وهذاء هو الكود 


    Private Sub Label11_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label11.Click
        If State = "Normal" Then

            TextBox1.ForeColor = Color.Red
        ElseIf
            If Label11 = "Unpaid" Then

                TextBox1.ForeColor = Color.Blue
        ElseIf
                If Label11 = "Sick" Then

                    TextBox1.ForeColor = Color.Beige

                End If
    End Sub
End Class


الملفات المرفقة صورة/صور
       
الرد }}}}
تم الشكر بواسطة:
#2

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

الي فهمته إنه لمن تطلع الكتابة في مربع نص رقم 8 يتغير لون كتابة نفس مربع النص حسب تصنيف الكلمة الموجوده فيه، جرب هذا
وحسب ما ذكرت أن Normal أسود وUnpaid أزرق وSick أحمر
لكن أنا ما فهمت إيش دور الليبل11
PHP كود :
Private Sub TextBox8_TextChanged(ByVal sender As System.ObjectByVal e As System.EventArgsHandles TextBox8.TextChanged
    Select 
Case sender.Text

        
Case "Normal"
            
sender.ForeColor Color.Black

        
Case "Unpaid"
            
sender.ForeColor Color.Blue

        
Case "Sick"
            
sender.ForeColor Color.Red

    End Select
End Sub 

الرد }}}}
تم الشكر بواسطة: محمد مسافر
#3
(07-11-14, 07:57 PM)الوليد ☺ كتب :
السلام عليكم ورحمة الله

الي فهمته إنه لمن تطلع الكتابة في مربع نص رقم 8 يتغير لون كتابة نفس مربع النص حسب تصنيف الكلمة الموجوده فيه، جرب هذا
وحسب ما ذكرت أن Normal أسود وUnpaid أزرق وSick أحمر
لكن أنا ما فهمت إيش دور  الليبل11

PHP كود :
Private Sub TextBox8_TextChanged(ByVal sender As System.ObjectByVal e As System.EventArgsHandles TextBox8.TextChanged
    Select 
Case sender.Text

        Case 
"Normal"
 
           sender.ForeColor Color.Black

        Case 
"Unpaid"
 
           sender.ForeColor Color.Blue

        Case 
"Sick"
 
           sender.ForeColor Color.Red

    End Select
End Sub 


عفواً لم اكن اقصد الليبل كنت اقصد التاكس بوكس 8  واشتغل كويس شكراً لك
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [VB.NET] كيف اوضع ProgressBar في هذا الكود e-coder 0 43 23-05-17, 07:43 PM
آخر رد: e-coder
  [VB.NET] احتاج تعديل الكود يخص تشغيل Button حسب user domin hglogtd 4 105 22-05-17, 09:25 AM
آخر رد: hglogtd
  [VB.NET] اريد وضع مؤقت بدون تايمر داخل هذا الكود + المشروع بالكامل e-coder 0 48 19-05-17, 04:09 PM
آخر رد: e-coder
  [VB.NET] كيف اضع وقت في هذا الكود e-coder 4 130 18-05-17, 08:07 AM
آخر رد: e-coder
  اين الخطا في هذا الكود rabeh.ram 18 460 16-05-17, 10:48 PM
آخر رد: rabeh.ram
  [كود] طلب الكود للتاريخ الميلادي كتابياُ باسم الشهر الميلادي . محمد مسافر 2 78 11-05-17, 12:42 AM
آخر رد: محمد مسافر
  محتاج مساعدة في اكمال الكود bidaya 7 218 04-05-17, 05:14 PM
آخر رد: bidaya
  [VB.NET] طلب حل مشكلة هذا الكود A-R 3 96 02-05-17, 05:10 PM
آخر رد: A-R
Smile ممكن رسم سهم بهذا الكود abdalamask 16 372 02-05-17, 10:50 AM
آخر رد: silverlight
  [VB.NET] عايز اشغل الكود ده على ال #c MOSTAFA.KAMEL 10 233 02-05-17, 01:27 AM
آخر رد: MOSTAFA.KAMEL

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


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