[ابو انس]

وعليكم السلام ورحمة الله وبركاته
تفضل 

كود :

 For i As Integer = 0 To dgv1.Rows.Count - 1
           For ii As Integer = 0 To dgv2.Rows.Count - 1
               If ii <= dgv2.Rows.Count - 1 Then
                   If dgv1.Rows(i).Cells(0).Value = dgv2.Rows(ii).Cells(0).Value Then
                       If dgv2.Rows(ii).Cells(0).Value <> Nothing Then
                           dgv2.Rows.RemoveAt(ii)
                           ii = ii - 1
                       End If
                   End If
               End If

           Next

       Next