منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : مشروع يفيد المبتدئين أمثالي ولي به سؤال للمحترفين
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم
هذا برنامج به قاعدة بيانات وصممت به كريستال ريبورت .. وقمت بكتابة أكواد الربط ..
السؤال هل يمكن جعل لون خلية الرقم احمر اذا كان الرقم أقل من 12 في الداتا جريد فيو ...
وكذلك جعل لون خلية الاسم اخضر اذا كان قيمة الحقل absent تم التاشير عليها .. في الداتا جريد فيو
وشكرا
البرنامج مرفق ومصمم ب 2010
وعليكم السلام ورحمة الله وبركاته

أخي الكريم بعد كود ملء الداتا جريد بالبيانات
كود :
Table1DataGridView.DataSource = dat
        Table1DataGridView.DataMember = "Table1"

ضع هذا الكود
كود :
For i As Integer = 0 To Table1DataGridView.RowCount - 1
            If Table1DataGridView.Rows(i).Cells(0).Value < 12 Then
                Table1DataGridView.Rows(i).Cells(0).Style.BackColor = Color.Red
            End If
            If Table1DataGridView.Rows(i).Cells(2).Value = True Then
                Table1DataGridView.Rows(i).Cells(1).Style.BackColor = Color.Green
            End If
        Next
كالعادة .. شكرا استاذ احمد ..
العفو يا غالي Smile
For i As Integer = 0 To Table1DataGridView.RowCount - 1
If Table1DataGridView.Rows(i).Cells(0).Value < 12 Then
Table1DataGridView.Rows(i).Cells(0).Style.BackColor = Color.Red
End If
هذا الكود عندما يكون عندي داتا قرايد فيها عمود واحد .....
بس ياريت توضح لو كان في الداتا قرايد أكثر من عمود كيف يكون تمرير الشرط على جميع خلايا الداتا قرايد
ممكن نعمل loop آخر لعدد الاعمدة كالتالي
كود :
For i As Integer = 0 To datagridview1.ColumnCount - 1
            For x As Integer = 0 To datagridview1.RowCount - 1
                If datagridview1.Rows(x).Cells(i).Value > 12 Then
                    datagridview1.Rows(x).Cells(i).Style.BackColor = Color.Red
                End If
            Next
        Next
جزاك الله خير أخوي أحمد
عاشت الأنامل
العفو أخي الكريم
وجزاك الله خيرا:d