Contact: aviboots(AT)netvision.net.il
41,230 questions
53,732 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