Ver Mensaje Individual
  #6 (permalink)  
Antiguo 25/07/2005, 14:44
Sylvestre
 
Fecha de Ingreso: abril-2002
Ubicación: Euskal Herria
Mensajes: 95
Antigüedad: 22 años, 1 mes
Puntos: 0
Otra posible respuesta...

Aquí teneis otra respuesta respecto al maximo....

en lugar de utilizar la ssentencia IF, se puede utilizar esta otra...

Function Mayor(ByVal A As Double, ByVal B As Double) As Double
maximo = (A+B+ABS(A-B))/2
End Function


donde ABS() es el valor absoluto de un numero.


Saludos,