Contact: aviboots(AT)netvision.net.il
39,938 questions
51,875 answers
573 users
Module Module1 Sub Main() Dim arr() As String = {"VB", "dot", "net"} Dim arr_clone() As String = arr.Clone() For Each ac In arr_clone Console.WriteLine("{0}", ac) Next End Sub End Module ' run: ' ' VB ' dot ' net