028ArrayList添加元素

有两种方法向ArrayList添加元素：Add和AddRange方法。这两种方法的区别为：

•     Add方法将单个元素添加到列表的尾部。
•     AddRange方法获取一个实现ICollection接口的集合实例，例如Anay、Queue、Stack等，并将这个集合实例按顺序添加到列表的尾部。

         ArrayList接受空引用Nothing作为有效值并且允许有重复的元素。元素ICollection中的顺序在保存到ArrayList后不变。
 

Module Module1

    Sub Main()
        Dim myAL As New ArrayList
        myAL.Add("李雷")
        myAL.Add("和")
        myAL.Add("韩梅梅")


        Dim myQueue As New Queue
        myQueue.Enqueue("为什么")
        myQueue.Enqueue("没有")
        myQueue.Enqueue("在一起？")

        Console.WriteLine("ArrayList初始包含的内容是：")
        PrintValues(myAL)
        Console.WriteLine("队列Queue初始包含的内容是：")
        PrintValues(myQueue)

        myAL.AddRange(myQueue)
        Console.WriteLine("向ArrayList中添加队列后：")
        PrintValues(myAL)

        Console.Read()
    End Sub
    Private Sub PrintValues(ByVal myList As IEnumerable)
        Dim obj As Object
        For Each obj In myList
            Console.Write(" " & obj)
        Next

        Console.WriteLine()
    End Sub
End Module