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