Protected Sub btnCompare_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnCompare.Click Dim txt1(CKEditor1.Text.Split(" ").Length) As String Dim txt2(CKEditor2.Text.Split(" ").Length) As String txt1 = CKEditor1.Text.Split(" ") txt2 = CKEditor2.Text.Split(" ") If txt2.Length <> txt1.Length Then lblMessage.Visible = True lblMessage.Text = "Please Insert Same Type File" Else Dim same As String = "" For i = 0 To txt2.Length - 1 If txt2(i) <> txt1(i) Then same += txt1(i) & "(" & txt2(i) & ") " Else txt2(i) = txt1(i) same += txt1(i).ToString & " " End If Next i CKEditor3.Text = same.ToString End If End Sub
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)