class TestStringSplit
{
    static void Main()
    {
        char[] delimiterChars = { ' ', ',', '.', ':', '\t' };
 
        string text = "one\ttwo three:four,five six seven";
        System.Console.WriteLine("Original text: '{0}'", text);
 
        string[] words = text.Split(delimiterChars);
        System.Console.WriteLine("{0} words in text:", words.Length);
 
        foreach (string s in words)
        {
            System.Console.WriteLine(s);
        }
    }
}
 
 

Private Shared Sub Comparar(cad1 As String, cad2 As String)
	Dim delimiterChars As Char() = {" "C, ","C, "."C, ControlChars.Tab, ControlChars.Lf}
 
 
	Dim wordsCad1 As String() = cad1.Split(delimiterChars)
	Dim wordsCad2 As String() = cad2.Split(delimiterChars)
	System.Console.WriteLine("Las partes que coinciden son:")
 
	For Each s1 As String In wordsCad1
		For Each s2 As String In wordsCad2
			If s1.Equals(s2) Then
				System.Console.WriteLine(s1)
			End If
		Next
	Next
End Sub
 

class Program
    {
        static void Main(string[] args)
        {
            string[] array1 = { "1", "2", "3", "6" };
            string[] array2 = { "7", "2", "4", "8" };
 
            ElementosIguales(array1, array2);
 
            Console.Read();
        }
        static void ElementosIguales(string[] array1, string[] array2)
        {
            var result = from x in array1
                         from y in array2
                         where x.Equals(y)
                         select x;
 
            Console.WriteLine("Los elementos iguales son:");
            foreach(var res in result)
                Console.WriteLine(res);
        }
    }
 

Private Shared Sub ElementosIguales(array1 As String(), array2 As String())
	Dim result = From x In array1From y In array2 Where x.Equals(y)x
 
	Console.WriteLine("Los elementos iguales son:")
	For Each res As var In result
		Console.WriteLine(res)
	Next
End Sub