Visual Basic

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