[Resolvido] Pegar variável de menor valor

[KBR 0]

Olá pessoal, estou com o seguinte problema.

 

Possuo 3 variáveis, sendo:

a = 10

b = 9

c = 15

 

Preciso de uma função onde o sistema consiga mostrar sempre a menor variável, ou seja, no caso acima ele mostraria somente o resultado da b.

 

Alguém faz idéia de como fazer? Creio que teria de utilizar vetor.

 

Abs.

[@fabiosantosrj 0]

da forma abaixo, nao importa quantos valores voce tenha. basta passar o vetor que ele retorna o menor valor.

 

function menorValor(byval vet)
	dim i
	dim menor

	if ubound(vet) = -1 then 
     	exit function
	end if

	menor = vet(0)
	for i = 1 to ubound(vet)
     	if menor > vet(i) then menor = vet(i)
	next

	return menor
end function

[KBR 0]

Deu certo. Obrigado!