Imports System
Imports System.Linq
Imports System.Collections.Generic
Public Class Program
Public Shared Sub Main()
Dim dict = New Dictionary(Of Integer, String)() From {
{2, "c#"},
{5, "c++"},
{9, "vb.net"},
{7, "java"},
{1, "c"},
{3, "rust"}
}
Console.WriteLine(dict.Values.Max())
End Sub
End Class
' run:
'
' vb.net
'