RogerioPsy Postado Junho 15, 2004 Denunciar Share Postado Junho 15, 2004 recupero do form varios numeros, e coloco num laço para retornar o maior, consigo recuperar o maior, mas quando vem dois numeros maiores so retorna 1.alguém pode me ajudar? strTodos = Soma & "1," & Soma2 & "2," & Soma3 & "3," & Soma4 & "4," & Soma5 & "5," & Soma6 & "6," & Soma7 & "7," & Soma8 & "8," & Soma9 & "9"myArrayTotal = Split(strTodos,",")'Laço para buscar o maior resultadoFor j = 0 to UBound(myArrayTotal) SomaOriginal = Left(myArrayTotal(j),len(myArrayTotal(j))-1) If SomaOriginal > intMaior Then intMaior = SomaOriginal intColuna = right(myArrayTotal(j),1) End If Next Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 dark0 Postado Junho 15, 2004 Denunciar Share Postado Junho 15, 2004 como esta seu codigo? Citar Link para o comentário Compartilhar em outros sites More sharing options...
Pergunta
RogerioPsy
recupero do form varios numeros, e coloco num laço para retornar o maior, consigo recuperar o maior, mas quando vem dois numeros maiores so retorna 1.
alguém pode me ajudar?
strTodos = Soma & "1," & Soma2 & "2," & Soma3 & "3," & Soma4 & "4," & Soma5 & "5," & Soma6 & "6," & Soma7 & "7," & Soma8 & "8," & Soma9 & "9"
myArrayTotal = Split(strTodos,",")
'Laço para buscar o maior resultado
For j = 0 to UBound(myArrayTotal)
SomaOriginal = Left(myArrayTotal(j),len(myArrayTotal(j))-1)
If SomaOriginal > intMaior Then
intMaior = SomaOriginal
intColuna = right(myArrayTotal(j),1)
End If
Next
Link para o comentário
Compartilhar em outros sites
1 resposta a esta questão
Posts Recomendados
Participe da discussão
Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.