Imports System
Imports System.Linq
Imports System.Collections.Generic
Public Class Program
Public Shared Sub Main()
Dim list = New List(Of KeyValuePair(Of String, Integer))()
list.Add(New KeyValuePair(Of String, Integer)("c", 6))
list.Add(New KeyValuePair(Of String, Integer)("vb.net", 8))
list.Add(New KeyValuePair(Of String, Integer)("java", 3))
list.Add(New KeyValuePair(Of String, Integer)("c#", 9))
list.Add(New KeyValuePair(Of String, Integer)("rust", 2))
list.Add(New KeyValuePair(Of String, Integer)("c++", 7))
Dim list_size As Integer = list.Count
For i As Integer = 0 To list_size - 1
Console.WriteLine(list.ElementAt(i).Key & " : " & list.ElementAt(i).Value)
Next
End Sub
End Class
' run:
'
' c : 6
' vb.net : 8
' java : 3
' c# : 9
' rust : 2
' c++ : 7
'