Location: near Govt College of Science Multan Pakistan
Posts: 9,683
Thanks: 2,337
Thanked 2,223 Times in 1,816 Posts
Contact Number: Removed
Program / Discipline: BSIT
Class Roll Number: 07-15
Time Spent Online: 3 Months 3 Weeks 5 Days 3 Hours 44 Minutes 43 Seconds
Program to find the Minimum Number in an Array
Module Module1 Sub Main() Dim ar As Integer() Dim min As Integer ar = New Integer() {15, 8, 1, 6, 34, 7, 5, 342, 4, 7} min = ar(0) For i = 1 To ar.GetUpperBound(0) If ar(i) < min Then min = ar(i) End If Next Console.Write("The Minimum value of the elements of array is: {0}", min) Console.ReadLine() End Sub End Module
__________________
(¯`v´¯) `*.¸.*` ¸.*´¸.*´¨) ¸.*´¨) (¸.*´ (¸.Bzu Forum
Don't cry because it's over, smile because it happened