Ver Mensaje Individual
  #4 (permalink)  
Antiguo 24/05/2002, 03:11
Mecenias
 
Fecha de Ingreso: agosto-2001
Mensajes: 336
Antigüedad: 23 años, 8 meses
Puntos: 0
Re: devolver valor mayor de varios valores dados

BURBUJA, ya no me acuerdo del metodo de la burbuja,pero algo asi, coges los numeros les plicas un split,asilo tienes en un array y luego lo recoores guardando en una variable el mayor de ellos :


mystring = "10 20 14 8?"
myarray = Split(mystring," ")
'Perdon pero es que no me acuerdo de como se sabe el numero de elementos de un array es este momento
Final=Ubound(myarray)-1
'le asignas el primero
mayor=myarray(0)
for i=0 to final
if mayor<myarray(i) then
mayor=myarray(i)
end if

Next

Un SaLudo, el codigo es una idea y habria que revisarlo,(Por fin es viernes) :P