Question

How to convert int array into a dictionary with key and value in VB.NET

Answer 1

Imports System
Imports System.Linq

Public Class Program
	Public Shared Sub Main(ByVal args As String())
        Dim arr As Integer() = {1, 2, 3, 4, 5, 6}

    	Dim result = From n In arr.ToDictionary(Function(k) k, Function(v) If((v Mod 2) = 1, "Odd", "Even"))
                 		Select n

    	For Each dic In result
			Console.WriteLine("{0} is {1}", dic.Key, dic.Value)
    	Next
    End Sub
End Class









' run:
'
' 1 is Odd
' 2 is Even
' 3 is Odd
' 4 is Even
' 5 is Odd
' 6 is Even
'

 

70+ SQL courses for beginners and professionals