Contact: aviboots(AT)netvision.net.il
39,845 questions
51,766 answers
573 users
Module Module1 Sub Main() Dim arr() As Integer = {2, 234, 48, 17, 98, 918, 800, 122397, 100, 28} Console.WriteLine("max = {0}", arr.Max) End Sub End Module 'run: ' 'max = 122397