Question

How to iterate over a list with indexes and values in VB.NET

Answer 1

Imports System
Imports System.Linq
Imports System.Collections.Generic

Public Class Example
    Public Shared Sub Main(ByVal args As String())
        Dim list As List(Of String) = New List(Of String) From {
			"vb.net",
            "c",
            "c++",
            "python",
            "java"
        }

		Dim result = List.Select(Function(v, i) New With { _
        	Key.Index = i, _
        	Key.Value = v _
    	})

		For Each item In result
        	Console.WriteLine(String.Format("Index {0} = {1}", item.Index, item.Value))
    	Next
    End Sub
End Class





' run:
'
' Index 0 = vb.net
' Index 1 = c
' Index 2 = c++
' Index 3 = python
' Index 4 = java
'

 

70+ SQL courses for beginners and professionals