Max Value in an Array

[nactoast]

If you have an array of numbers is there any command that returns the greatest value in the array?

[kedaman]

Ubound(arrayname) returns upper bound
Lbound(arrayname) returns lower bound

[QWERTY]

FOr me your question says: how to find the greatest number in an array not the number of items in an array. If that the case then something like this would do it:

Option Explicit

Private Sub Form_Load()
    Dim MyArray(1 To 6) As Integer
    Dim I As Integer
    Dim Temp As Integer
    
    For I = 1 To 6
        MyArray(I) = I
        If I = 6 Then
            MyArray(I) = 34
        End If
    Next I
    
    Temp = MyArray(1)
    For I = 2 To UBound(MyArray)
        If Temp < MyArray(I) Then
            Temp = MyArray(I)
        End If
    Next I
    
    MsgBox Temp '//Returns 34
End Sub

[JHausmann]

Nothing to stop you from writing your own

dim i as int
dim max_value as long 'or whatver the array value is defined

max_value=0
for i=1 to ubound(array_num)
if array_num(i) > max_value then max_value=array_num(i)
next i