Ad
DeNöffvs.Chris Mqobo

A function that returns the min of an array

Code
Diff
  • Module Kumite
    Public Function Min(arr As Single()) as Single
        Return arr.Min
    End Function
End Module
    • Module Kumite
    • Public Function Min(byref array() As single) as single
    • dim minV as integer = 10
    • for counter as integer = 1 to array().length - 1
    • if array(counter) < min then
    • return minV = array(counter)
    • else
    • return minV
    • end if
    • next
    • return minV
    • Public Function Min(arr As Single()) as Single
    • Return arr.Min
    • End Function
    • End Module