Enumerable.ToArray(Of TSource) Method
[ This article is for Windows Phone 8 developers. If you’re developing for Windows 10, see the latest documentation. ]
Creates an array from a IEnumerable(Of T).
Assembly: System.Core (in System.Core.dll)
'Declaration <ExtensionAttribute> _ Public Shared Function ToArray(Of TSource) ( _ source As IEnumerable(Of TSource) _ ) As TSource()
Type Parameters
- TSource
The type of the elements of source.
Parameters
- source
- Type: System.Collections.Generic.IEnumerable(Of TSource)
An IEnumerable(Of T) to create an array from.
Return Value
Type: TSource ()An array that contains the elements from the input sequence.
Usage Note
In Visual Basic and C#, you can call this method as an instance method on any object of type IEnumerable(Of TSource). When you use instance method syntax to call this method, omit the first parameter.| Exception | Condition |
|---|---|
| ArgumentNullException | source is Nothing. |
The ToArray(Of TSource)(IEnumerable(Of TSource)) method forces immediate query evaluation and returns an array that contains the query results. You can append this method to your query in order to obtain a cached copy of the query results.
ToList(Of TSource) has similar behavior but returns a List(Of T) instead of an array.
The following code example demonstrates how to use ToArray(Of TSource) to force immediate query evaluation and return an array of results.
Structure Package Public Company As String Public Weight As Double End Structure Sub ToArrayEx1() ' Create a list of Package values. Dim packages As New List(Of Package)(New Package() _ {New Package With {.Company = "Coho Vineyard", .Weight = 25.2}, _ New Package With {.Company = "Lucerne Publishing", .Weight = 18.7}, _ New Package With {.Company = "Wingtip Toys", .Weight = 6.0}, _ New Package With {.Company = "Adventure Works", .Weight = 33.8}}) ' Project the Company values from each item in the list ' and put them into an array. Dim companies() As String = _ packages _ .Select(Function(pkg) pkg.Company) _ .ToArray() ' Display the results. Dim output As New System.Text.StringBuilder For Each company As String In companies output.AppendLine(company) Next outputBlock.Text &= output.ToString() & vbCrLf End Sub ' This code produces the following output: ' ' Coho Vineyard ' Lucerne Publishing ' Wingtip Toys ' Adventure Works