data grid view

Question

0.00/5 (No votes)

See more:

hi
i have this code
i want to see rows that are the same as each other in grdfloopy.
and show them in grdfloopy1.:confused::confused: :sigh: :sigh:

VB

Private Sub selectghabz()
Dim a As HomePage = New HomePage
Dim i As Integer
Dim j, k As Integer
k = 0
For i = 0 To grdFloppy.RowCount - 1
For j = i + 1 To grdFloppy.RowCount - 1
If (grdFloppy.Item(3, i).Value = grdFloppy.Item(3, j).Value) And (grdFloppy.Item(4, i).Value = grdFloppy.Item(4, j).Value) Then

If (grdFloppy.Item(0, i).Value <> grdFloppy.Item(0, j).Value) Then
grdFloppy1.Rows.Add()
grdFloppy1.Item(0, k).Value = grdFloppy.Item(0, i).Value
grdFloppy1.Item(1, k).Value = grdFloppy.Item(1, i).Value
grdFloppy1.Item(2, k).Value = grdFloppy.Item(2, i).Value
grdFloppy1.Item(3, k).Value = grdFloppy.Item(3, i).Value
grdFloppy1.Item(4, k).Value = grdFloppy.Item(4, i).Value
grdFloppy1.Item(5, k).Value = grdFloppy.Item(5, i).Value
k = k + 1
End If
End If
Next
Next
End Sub

tnxxxxxxxxxxx

Posted 17-Sep-10 17:28pm

ateeh

Updated 17-Sep-10 18:33pm

v2

Add a Solution

2 solutions

Add a Solution

Add your solution here

Treat my content as plain text, not as HTML

Preview 0

…

Existing Members

Sign in to your account

...or Join us

Download, Vote, Comment, Publish.

Your Email
Password
Forgot your password?

Your Email
This email is in use. Do you need your password?
Optional Password

I have read and agree to the Terms of Service and Privacy Policy
Please subscribe me to the CodeProject newsletters

When answering a question please:

Read the question carefully.
Understand that English isn't everyone's first language so be lenient of bad spelling and grammar.
If a question is poorly phrased then either ask for clarification, ignore it, or edit the question and fix the problem. Insults are not welcome.
Don't tell someone to read the manual. Chances are they have and don't get it. Provide an answer or move on to the next question.

Let's work to help developers, not make them feel stupid.

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

Andy_L_J · Answer 1 · 2010-09-18T14:18:00

This works for me...

VB

For Each dr As DataGridViewRow In grdFloppy.Rows
      For Each dr2 As DataGridViewRow In grdFloppy.Rows
        If dr2.Index > dr.Index Then
          checkExists(dr, dr2)
        End If
      Next
    Next

VB

Private Sub checkExists(ByVal dr As DataGridViewRow, _
                          ByVal dr2 As DataGridViewRow)
    ' Compare the two rows
    If dr.Cells(3).Value.ToString = dr2.Cells(3).Value.ToString And _
              dr.Cells(4).Value.ToString = dr2.Cells(4).Value.ToString And _
              dr.Cells(0).Value.ToString = dr2.Cells(0).Value.ToString Then
      For Each drow As DataGridViewRow In grdFloppy1.Rows
        ' Check that row doesn't already exist in grdFloppy1
        If drow.Cells(3).Value.ToString = dr.Cells(3).Value.ToString And _
                           drow.Cells(4).Value.ToString = dr.Cells(4).Value.ToString And _
                           drow.Cells(0).Value.ToString = dr.Cells(0).Value.ToString Then
          Exit Sub
        End If
      Next
      ' Add the new row to grdFloppy1
      grdFloppy1.Rows.Add(New Object() {dr.Cells(0).Value, dr.Cells(1).Value, _
                                        dr.Cells(2).Value, dr.Cells(3).Value, _
                                        dr.Cells(4).Value})
    End If
  End Sub

ateeh · Answer 2 · 2010-09-18T17:35:00

Solution 2

tnx
by i want to find rows in DataGridViewRow1(:grdfloopy1) that are the same az each other in same fileds and then show these 2 rows in DataGridViewRow2(:grdfloopy1).
plzzzzzzzzzzzzz help me soon

Posted 18-Sep-10 17:35pm