Visual Basic

    Dim numRows As Integer
    Dim dt As DataTable         ' This is the table returned from the database
    Dim dv As New DataView(dt)  ' Creates a new DataView for the table
 
    DataGird1.DataSource = dv   ' bind the grid to the dataview
    DataGrid.DataBind()
 
    numRows = dv.Count()

Private Sub mnuFileCheck_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles mnuFileCheck.Click
    Dim frmOneInstance As New frmOne() 'instance of form to mark this form against
    Dim intErrorCount As Integer = 0 'to keep an error count 
 
    If lblSID.Text <> frmOneInstance.lblID.Text Then
        intErrorCount += 1
    End If
 
    If lblSName.Text <> frmOneInstance.lblName.Text Then
        intErrorCount += 1
    End If
 
    If intErrorCount > 0 Then
        MessageBox.Show("Error count total: " & intErrorCount, "Result", MessageBoxButtons.OK, MessageBoxIcon.Information)
    Else
        MessageBox.Show("All Correct!", "Result", MessageBoxButtons.OK, MessageBoxIcon.Information)
    End If
End Sub