RemoveRange Method

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).

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

'Declaration
Public Sub RemoveRange ( _
	index As Integer, _
	count As Integer _
)

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.

ExceptionCondition
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


Windows Phone OS

Supported in: 8.1, 8.0, 7.1, 7.0

Windows Phone

Show:
© 2017 Microsoft