VB6 ADO fvr informar se existe um comando ex: max(text1, text2, text3, text4, text5)

ou preciso usar mesmo o if text1 < text2 and ... para achar o maior valor entre as cinco variáveis     agradeço  qualquer Ajuda

tenta assim:

 

1) Cria um array com cinco posicoes, uma para cada valor.

 

2) ou se voce esta usando componente text usa o index do mesmo.

Coloca o text1 como text(1), o text2 como text(2) e assim por diante.

 

Depois aplica o codigo abaixo

dim valor as long

 

for i=1 to 4

   if text(i).text>text(i+1).text then

      valor=text(i).text

   else

   end if

next i

 

msgbox "O maio valor eh" & valor