'
' MaxReal
'
' Author: Joe Strazzere
'
Function MaxReal$(real1$,real2$)
If Val(Multiply(Substract(real1$,real2$),"1000000")) > 0 then
MaxReal$ = real1$
Else
MaxReal$ = real2$
EndIf
EndFunction
msgbox(maxreal$("1.01","1.011"))
