Group by two DataColumns

GroupingForm.vb

Imports System.Text
''' <summary>
''' Requires
''' 1 Button named DistinctGroupButton
''' 1 DataGridView named DataGridView1
''' </summary>
Public Class Form1
    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        Dim dt As New DataTable With {.TableName = "MyTable"}
        dt.Columns.Add(New DataColumn With {.ColumnName = "Identifier", .DataType = GetType(Integer),
                          .AutoIncrement = True, .AutoIncrementSeed = 1})
        dt.Columns.Add(New DataColumn With {.ColumnName = "Priority", .DataType = GetType(String)})
        dt.Columns.Add(New DataColumn With {.ColumnName = "Status", .DataType = GetType(String)})

        dt.Rows.Add(New Object() {Nothing, "Low", "New"})
        dt.Rows.Add(New Object() {Nothing, "High", "Old"})
        dt.Rows.Add(New Object() {Nothing, "Low", "New"})
        dt.Rows.Add(New Object() {Nothing, "Medium", "Old"})
        dt.Rows.Add(New Object() {Nothing, "Low", "New"})
        dt.Rows.Add(New Object() {Nothing, "Low", "New"})
        dt.Rows.Add(New Object() {Nothing, "High", "Old"})
        dt.Rows.Add(New Object() {Nothing, "Medium", "New"})
        dt.Rows.Add(New Object() {Nothing, "Medium", "Old"})
        dt.Rows.Add(New Object() {Nothing, "Low", "Old"})

        DataGridView1.DataSource = dt

    End Sub

    Private Sub DistinctGroupButton_Click(sender As Object, e As EventArgs) Handles DistinctGroupButton.Click

        Dim query = DataGridView1.Rows.OfType(Of DataGridViewRow)().
                Where(Function(row) Not row.IsNewRow).
                GroupBy(Function(row)
                            Return New With {Key .Priority = row.Cells("Priority").Value,
                            Key .Status = row.Cells("Status").Value}
                        End Function).
                Select(Function(group) New With
                           {
                               Key .Value = group.Key,
                               Key .Count = group.Count(),
                               Key .Rows = group.ToList()
                          }
                ).
                OrderByDescending(Function(x) x.Count).
                ToList

        Dim sb As New StringBuilder
        For Each item In query
            If item.Count > 1 Then
                sb.AppendLine($"{item.Value.Priority},{item.Value.Status} count {item.Count}")
                For Each row In item.Rows
                    sb.AppendLine($"   row: {row.Index}")
                Next
            End If
        Next

        TextBox1.Text = sb.ToString()

    End Sub
End Class

Hello Karen;

I found you on MSDN forum and I saw you can help me to implement the same logic but in C#.

May you possibly help me?

This is what I want :

Kareninstructor

I will appreciate your help!

See the following done with .NET Core 5, C# 9

Good evening professor;

I would like to thank you for your effort.
Now I can get the logic!
I'm using C# 7, and it is giving me the error as shown below

Can you possibly help!

Respectfully;

Use StringBuilder sb = new StringBuilder();

Thank you so much! Now there is no errors. I tried it apart and works.

In my case I import excel sheet which among the columns there are two columns containing same data. for instance you can find 0700 in column1, and in column2 but on different row. I tried to iterate and count how many times a number occurs in both columns of a sheet and put its repetition as shown below but I'm failing to do so. Can you help me to achieve as the following?

I tried this but count in only one column and doesn't display result in a dgv.

private void btn_CountRepetition_Click(object sender, EventArgs e)
{
var q = dataGridView1.Rows.OfType()
.GroupBy(x => x.Cells[3].Value.ToString())
.Select(g => new { Value = g.Key, Count = g.Count(), Rows = g.ToList() })
.OrderByDescending(x => x.Count);
foreach (var x in q)
{
DialogResult Result = MessageBox.Show("Tel Number: " + x.Value + " " + " Repetion: " + x.Count + " " + "Times", "--------------------COUNT RESULT---------------", MessageBoxButtons.OKCancel, MessageBoxIcon.Information);
if (Result == DialogResult.OK)
{

            }
            else
            {
                Close();

            }
        }

I'm going to be busy for a while so I suggest taking time with setting a breakpoint and inspecting what is being returned to learn than adapt as needed. Of course you can also asking in Stackoverflow or Microsoft Q&A forums.

Thank you so much! I appreciate your help