List(Of T).RemoveRange Method
[ This article is for Windows Phone 8 developers. If you’re developing for Windows 10, see the latest documentation. ]
Removes a range of elements from the List(Of T).
Assembly: mscorlib (in mscorlib.dll)
Parameters
- index
- Type: System.Int32
The zero-based starting index of the range of elements to remove.
- count
- Type: System.Int32
The number of elements to remove.
| Exception | Condition |
|---|---|
| ArgumentOutOfRangeException | index is less than 0. -or- count is less than 0. |
| ArgumentException | index and count do not denote a valid range of elements in the List(Of T). |
The items are removed and all the elements following them in the List(Of T) have their indexes reduced by count.
This method is an O(n) operation, where n is Count.
The following code example demonstrates the RemoveRange method and various other methods of the List(Of T) class that act on ranges. After the list has been created and modified, the RemoveRange method is used to remove two elements from the list, beginning at index location 2.
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