Visual Basic .NET Language
lijsten

Syntaxis

• List.Add (item als type)
• List.RemoveRange (indexeren als geheel getal, tellen als geheel getal)
• List.Remove (indexeren als geheel getal)
• List.AddRange (incasso)
• List.Find (match as Predicate (of String))
• Lijst.Invoegen (indexeren als geheel getal, item als type)
• List.Contains (item als Type)

Maak een lijst

Lijsten kunnen indien nodig worden gevuld met elk gegevenstype, met de indeling

Dim aList as New List(Of Type)

Bijvoorbeeld:

Maak een nieuwe, lege lijst met strings

Dim aList As New List(Of String)

Maak een nieuwe lijst met strings en vul deze met enkele gegevens

VB.NET 2005/2008:

Dim aList as New List(Of String)(New String() {"one", "two", "three"})

VB.NET 2010:

Dim aList as New List(Of String) From {"one", "two", "three"}

-

VB.NET 2015:

Dim aList as New List(Of String)(New String() {"one", "two", "three"})

NOTITIE:

Als u het volgende ontvangt wanneer de code wordt uitgevoerd:

Objectreferentie niet ingesteld op een instantie van een object.

Zorg ervoor dat je ofwel verklaren als New ie Dim aList as New List(Of String) of als te verklaren zonder de New , zorg ervoor dat je de lijst om een nieuwe lijst set - Dim aList as List(Of String) = New List(Of String)

Items toevoegen aan een lijst

Dim aList as New List(Of Integer)
aList.Add(1)
aList.Add(10)
aList.Add(1001)

Gebruik AddRange om meer dan één item tegelijk toe te voegen. Wordt altijd toegevoegd aan het einde van de lijst

Dim blist as New List(of Integer)
blist.AddRange(alist) 


Dim aList as New List(of String)
alist.AddRange({"one", "two", "three"}) 

Gebruik Invoegen om items toe te voegen aan het midden van de lijst

Invoegen plaatst het item in de index en hernummert de resterende items

Dim aList as New List(Of String)
aList.Add("one")
aList.Add("three")
alist(0) = "one"
alist(1) = "three"
alist.Insert(1,"two")

Nieuwe output:

alist(0) = "one"       
alist(1) = "two"
alist(2) = "three"

Items verwijderen uit een lijst

Dim aList As New List(Of String)
aList.Add("Hello")
aList.Add("Delete Me!")
aList.Add("World")

'Remove the item from the list at index 1
aList.RemoveAt(1)

'Remove a range of items from a list, starting at index 0, for a count of 1)
'This will remove index 0, and 1!
aList.RemoveRange(0, 1)

'Clear the entire list
alist.Clear()

Items ophalen uit een lijst

Dim aList as New List(Of String)
aList.Add("Hello, World")
aList.Add("Test")

Dim output As String = aList(0)

output :

Hallo Wereld

Als u de index van het item niet kent of slechts een deel van de tekenreeks kent, gebruikt u de methode Find of FindAll

Dim aList as New List(Of String)
aList.Add("Hello, World")
aList.Add("Test")

Dim output As String = aList.Find(Function(x) x.StartWith("Hello"))

output :

Hallo Wereld

De methode FindAll retourneert een nieuwe lijst (van tekenreeks)

Dim aList as New List(Of String)
aList.Add("Hello, Test")
aList.Add("Hello, World")
aList.Add("Test")

Dim output As String = aList.FindAll(Function(x) x.Contains("Test"))

output (0) = "Hallo, test"

output (1) = "Test"

Loop door items in de lijst

Dim aList as New List(Of String)
aList.Add("one")
aList.Add("two")
aList.Add("three")

For Each str As String in aList
    System.Console.WriteLine(str)
Next

Produceert de volgende uitvoer:

one
two
three

Een andere optie zou zijn om door de index van elk element te bladeren:

Dim aList as New List(Of String)
aList.Add("one")
aList.Add("two")
aList.Add("three")

For i = 0 to aList.Count - 1 'We use "- 1" because a list uses 0 based indexing.
    System.Console.WriteLine(aList(i))
Next

Controleer of het item in een lijst voorkomt

    Sub Main()
        Dim People = New List(Of String)({"Bob Barker", "Ricky Bobby", "Jeff Bridges"})
        Console.WriteLine(People.Contains("Rick James"))
        Console.WriteLine(People.Contains("Ricky Bobby"))
        Console.WriteLine(People.Contains("Barker"))
        Console.Read 
    End Sub

Produceert de volgende uitvoer:

False
True
False