Imports System
Imports System.Linq
Imports System.Collections.Generic
Module Program
Sub Main()
Dim list As New List(Of Integer) From {3, 7, 8, 91, 99, 10, -5, 1, 2}
Dim maxValue = list.Max()
Console.WriteLine(maxValue)
Dim minValue = list.Min()
Console.WriteLine(minValue)
End Sub
End Module
' run
'
' 99
' -5
'