el valor mayor de un array

[Lebennin]

Código:

For a=1 To 4 Step 1
      If a = 1 Then
                Minimo = vector(a)
                Maximo = vector(a)
      ElseIf vector(a) < Minimo Then
                Minimo = vector(a)
      ElseIf vector(a) > Maximo Then
                Maximo = vector(a)
      End If  
Next

Creo que con esto te funcionaria.