compare values on two colums on datagridview

I have a datagridview populated
I want to compare the values on each row on two columns and if they are different then change the forecolor on one column



I am using this kind of works  but look like not all the rows are compare



Private Sub DataGridView2_CellFormatting(sender As Object, e As System.Windows.Forms.DataGridViewCellFormattingEventArgs) Handles DataGridView2.CellFormatting
        If Me.DataGridView2.Columns(e.ColumnIndex).Name = "OLDPRICE" Then
            If e.Value IsNot Nothing Then
                XOLPPRICE = e.Value.ToString
            End If
        End If
        If Me.DataGridView2.Columns(e.ColumnIndex).Name = "NEWPRICE" Then
            If e.Value IsNot Nothing Then
                XNEWPRICE = e.Value.ToString
               RESULT = String.Compare(XOLPPRICE, XNEWPRICE)
                If RESULT = True Then
                    e.CellStyle.ForeColor = Color.Red
                Else
                    e.CellStyle.ForeColor = Color.Green
                End If
            End If
        End If

    End Sub




the values on the columns are like thise
OLDPRICE    NEWPRICE
2.45              2.50
3.34              3.34

so if the value on NEWPRICE  is different the OLDPRICE I want NEWPRICE to be color red
teogosAsked:
Who is Participating?
 
Kyle AbrahamsConnect With a Mentor Senior .Net DeveloperCommented:
Answer was provided.
0
 
SAMIR BHOGAYTAFreelancer and IT ConsultantCommented:
hi.. please try this code.

Private Sub btncheck_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btncheck.Click
 
           Dim mytable As New DataTable
           CMD.Connection = CN
           CMD.CommandText = "Select classname,studentname,fname,grno from students where classname='" & Me.ComboBox2.Text & "'"
           DataR = CMD.ExecuteReader
 
           Dim i As Integer
           For i = 0 To mytable.Rows.Count - 1
               DataR.Read()
       Next
       mytable.Load(DataR)
       DGV2.DataSource = mytable
 

       DGV2.Columns.Add("feemonth", "Fee Month")
       DGV2.Columns.Add("status", "Status")
 

       For i = 0 To mytable.Rows.Count - 1
           Dim i2 As Integer
           For i2 = 0 To DGV2.Rows.Count - 1
 
           Next
 
           With DGV2
 
               .Columns("classname").HeaderCell.Value = ("Class")
               .Columns("studentname").HeaderCell.Value = ("Student Name")
               .Columns("fname").HeaderCell.Value = ("Father's Name")
               .Columns("grno").HeaderCell.Value = ("GR NO")
 
           End With
 
           If DGV1.Rows.Count > 0 Then
 
           End If
 

 

 

           If DGV1.Rows.Count = 0 Then
               DGV2.Rows(i).Cells("status").Value = "Un Paid"
               DGV2.Rows(i).Cells("feemonth").Value = Me.ComboBox1.Text
               DGV2.Rows(i).Cells("status").Style.ForeColor = Color.Red
 

 
           ElseIf DGV1.CurrentRow.Cells("name").Value.ToString = DGV2.Rows(i).Cells("studentname").Value.ToString Then
 

               DGV2.Rows(i).Cells("status").Value = "Paid"
               DGV2.Rows(i).Cells("status").Style.ForeColor = Color.Blue
               DGV2.Rows(i).Cells("feemonth").Value = Me.ComboBox1.Text
           Else
               DGV2.Rows(i).Cells("status").Value = "UN Paid"
               DGV2.Rows(i).Cells("status").Style.ForeColor = Color.Red
 
               DGV2.Rows(i).Cells("feemonth").Value = Me.ComboBox1.Text
           End If
 

       Next
 
       DataR.Close()
 
   End Sub
0
 
teogosAuthor Commented:
I need to compare values on the same DATAGRIDVIEW
0
The new generation of project management tools

With monday.com’s project management tool, you can see what everyone on your team is working in a single glance. Its intuitive dashboards are customizable, so you can create systems that work for you.

 
Kyle AbrahamsSenior .Net DeveloperCommented:
I would personally handle this during the Itemdatabound  event.  

But, in the 2nd part of your code for the new price you're only setting the color if new price is not nothing . . . what happens if / when old price or new price is null?
   If e.Value IsNot Nothing Then
                XNEWPRICE = e.Value.ToString
                'XOLPRICE MAY NOT HAVE A VALUE BASED ON CODE IN ORIGINAL POST.
               RESULT = String.Compare(XOLPPRICE, XNEWPRICE)
                If RESULT = True Then
                    e.CellStyle.ForeColor = Color.Red
                Else
                    e.CellStyle.ForeColor = Color.Green
                End If
  else
     'do something.
  End If
0
 
teogosAuthor Commented:
I've requested that this question be closed as follows:

Accepted answer: 0 points for teogos's comment #a39701328

for the following reason:

Job not on active status
0
 
teogosAuthor Commented:
Job is not longer feasible
0
All Courses

From novice to tech pro — start learning today.