Imports System
Imports System.Collections.Generic
Public Class Example
Public Shared Sub Main()
Dim letters As New List(Of String)
letters.Add("A")
letters.Add("B")
letters.Add("C")
letters.Add("F")
letters.Add("E")
Console.WriteLine()
For Each letter As String In letters
Console.WriteLine(letter)
Next
Dim array(14) As String
letters.CopyTo(array)
letters.CopyTo(array, 6)
letters.CopyTo(2, array, 12, 3)
Console.WriteLine(vbLf & "Contents of the array:")
For Each letter As String In array
Console.WriteLine(letter)
Next
End Sub
End Class
|