ToArray Method

List(Of T).ToArray Method

[ This article is for Windows Phone 8 developers. If you’re developing for Windows 10, see the latest documentation. ]

Copies the elements of the List(Of T) to a new array.

Namespace:  System.Collections.Generic
Assembly:  mscorlib (in mscorlib.dll)

'Declaration
Public Function ToArray As T()

Return Value

Type: T ()
An array containing copies of the elements of the List(Of T).

The elements are copied using Array.Copy, which is an O(n) operation, where n is Count.

This method is an O(n) operation, where n is Count.

The following code example demonstrates the ToArray method and other methods of the List(Of T) class that act on ranges. At the end of the code example, the GetRange method is used to get three items from the list, beginning with index location 2. The ToArray method is called on the resulting List(Of T), creating an array of three elements. The elements of the array are displayed.


Imports System.Collections.Generic

Public Class Example

   Public Shared Sub Demo(ByVal outputBlock As System.Windows.Controls.TextBlock)

      Dim input() As String = {"Brachiosaurus", _
                                "Amargasaurus", _
                                "Mamenchisaurus"}

      Dim dinosaurs As New List(Of String)(input)

      outputBlock.Text += String.Format(vbLf & "Capacity: {0}", dinosaurs.Capacity) & vbCrLf

      outputBlock.Text &= vbCrLf
      For Each dinosaur As String In dinosaurs
         outputBlock.Text &= dinosaur & vbCrLf
      Next

      outputBlock.Text &= vbLf & "AddRange(dinosaurs)" & vbCrLf
      dinosaurs.AddRange(dinosaurs)

      outputBlock.Text &= vbCrLf
      For Each dinosaur As String In dinosaurs
         outputBlock.Text &= dinosaur & vbCrLf
      Next

      outputBlock.Text += String.Format(vbLf & "RemoveRange(2, 2)") & vbCrLf
      dinosaurs.RemoveRange(2, 2)

      outputBlock.Text &= vbCrLf
      For Each dinosaur As String In dinosaurs
         outputBlock.Text &= dinosaur & vbCrLf
      Next

      input = New String() {"Tyrannosaurus", _
                             "Deinonychus", _
                             "Velociraptor"}

      outputBlock.Text += String.Format(vbLf & "InsertRange(3, input)") & vbCrLf
      dinosaurs.InsertRange(3, input)

      outputBlock.Text &= vbCrLf
      For Each dinosaur As String In dinosaurs
         outputBlock.Text &= dinosaur & vbCrLf
      Next

      outputBlock.Text += String.Format(vbLf & "output = dinosaurs.GetRange(2, 3).ToArray") & vbCrLf
      Dim output() As String = dinosaurs.GetRange(2, 3).ToArray()

      outputBlock.Text &= vbCrLf
      For Each dinosaur As String In output
         outputBlock.Text &= dinosaur & vbCrLf
      Next

   End Sub
End Class

' This code example produces the following output:
'
'Capacity: 3
'
'Brachiosaurus
'Amargasaurus
'Mamenchisaurus
'
'AddRange(dinosaurs)
'
'Brachiosaurus
'Amargasaurus
'Mamenchisaurus
'Brachiosaurus
'Amargasaurus
'Mamenchisaurus
'
'RemoveRange(2, 2)
'
'Brachiosaurus
'Amargasaurus
'Amargasaurus
'Mamenchisaurus
'
'InsertRange(3, input)
'
'Brachiosaurus
'Amargasaurus
'Amargasaurus
'Tyrannosaurus
'Deinonychus
'Velociraptor
'Mamenchisaurus
'
'output = dinosaurs.GetRange(2, 3).ToArray
'
'Amargasaurus
'Tyrannosaurus
'Deinonychus


Windows Phone OS

Supported in: 8.1, 8.0, 7.1, 7.0

Windows Phone

Show:
© 2017 Microsoft