منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[VB.NET] تلوين الخلية بناءً على معيار العمر - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [VB.NET] تلوين الخلية بناءً على معيار العمر (/showthread.php?tid=29362)

تلوين الخلية بناءً على معيار العمر - اسامه الهرماوي - 14-04-19

السلام عليكم....
عندي قاعدة اكسس وفي داتا جريد فيو وهذه الداتا بها اسماء واعمار
مثل الاسم..... العمر
       اسامه..... 20
احتاج كود لو حقل العمر اكبر من 17 سنة يقوم بتعليم الحقل وحده فقط باللون  الاحمر ولو امكن حقل العمر فقط يبقي تمام.
وشكرا لكم.

RE: احتاج كود بسيط - Rabeea Qbaha - 14-04-19

PHP كود :
Private Sub GV_CellFormatting(ByVal sender As Object, ByVal e As DataGridViewCellFormattingEventArgs)
    For Each drview As DataGridViewRow In GV.Rows
        Dim ColNo As Integer = 2

        While (ColNo <= 2)

            If Not (drview.Cells(2).Value Is Nothing) Then

                If (Convert.ToInt32(drview.Cells(2).Value) > 17) Then
                    drview.Cells(2).Style.BackColor = Color.Red
                ElseIf (Convert.ToInt32(drview.Cells(2).Value) <= 17) Then
                    drview.Cells(2).Style.BackColor = Color.White
                End If
            End If

            ColNo += 1
        End While
    Next
End Sub 


RE: احتاج كود بسيط - اسامه الهرماوي - 14-04-19

شكرا شكرا شكر لك اخي العزيز.

RE: تلوين الخلية بناءً على معيار العمر - اسامه الهرماوي - 14-04-19

ولكن اخي هل ممكن ميظللش العمود كلة يعني الرقم فقط اللي اكبر من 17 يظهر بالاحمر.

RE: تلوين الخلية بناءً على معيار العمر - Rabeea Qbaha - 14-04-19

(14-04-19, 07:03 PM)اسامه الهرماوي كتب : ولكن اخي هل ممكن ميظللش العمود كلة يعني الرقم فقط اللي اكبر من 17 يظهر بالاحمر.

وضح اكثر اخي لم افهم عليك.

RE: تلوين الخلية بناءً على معيار العمر - sads - 15-04-19

For u = 0 To DataGridView1.Rows.Count - 1

            If DataGridView1.Rows(u).Cells(2).Value.ToString.Contains > 17 Then
                DataGridView1.Rows(u).DefaultCellStyle.BackColor = Color.Red
            End If
        Next


RE: تلوين الخلية بناءً على معيار العمر - اسامه الهرماوي - 15-04-19

اخواني المقصود كالاتي العمر 18 الي النهاية يظهر علي العمر فقط علامة مثل الصورة التالية.

RE: تلوين الخلية بناءً على معيار العمر - ابراهيم ايبو - 15-04-19

السلام عليكم اخي الكريم
عذرا على التأخير في الرد
اليك الكود التالي حيث يلون الرقم الموجود في العمود رقم 2 (اي ثالث عمود) اذا كان اكبر من 17
وان اردت تلوين الخلية فاستبدل كلمة Forcolor بـ Backcolor
كود :
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
       For i As Integer = 0 To DataGridView1.Rows.Count - 1
           If DataGridView1.Rows(i).Cells(2).Value > 17 Then

               DataGridView1.Rows(i).Cells(2).Style.ForeColor = Color.Red
           End If
       Next
   End Sub


RE: تلوين الخلية بناءً على معيار العمر - اسامه الهرماوي - 15-04-19

السلام عليكم...
هذا هو الكود للإفادة.
كود :
 Private Sub DataGridView1_CellFormatting(ByVal sender As Object, ByVal e As System.Windows.Forms.DataGridViewCellFormattingEventArgs) Handles DataGridView1.CellFormatting
   
       If Me.DataGridView1.Rows(e.RowIndex).Cells("العمر").Value > 18 Then
           Me.DataGridView1.Rows(e.RowIndex).Cells("العمر").Style.BackColor = Color.Red
       End If
   End Sub