sorry, ich kämpfe noch mit der Nachvollziehbarkeit.... der code ist so komplex, dass er nichts nützen würde, ich muss es mal auf ein paar Zeilen reduzieren, wenn ich das mache klappt es aber so, wie bei dir, das ist das problem
ich schaue mal weiter Gruß Stefan > Ohne Code weiss ich's auch nicht > > a. > > > On 01.02.10 14:52, "Stefan Sicurella" <sicure...@onlymac.de> wrote: > >> Ok, das ist sehr merkwürdig, aber ich weiß nicht, was ich da falsch machen >> könnte >> >> Gruß >> >> Stefan >> >>> >>>> aus 0.825 wird 0.82 mit deinem Code unten, >>> >>> Bei mir nicht: >>> MsgBox str(round_kaufman(0.825)) >>> >>> Ergebnis 0,83 >>> >>> >>> hast du auch 2009 R5.1? >>> >>> ja >>> >>> a. >>> >>> >>>> Stefan >>>> >>>>> Und was geht NICHT? >>>>> >>>>> Bei mir geht's auch so: >>>>> >>>>> dim d as Double >>>>> const factor=100.0 >>>>> d = myFloatValue*factor >>>>> return round(d)/factor >>>>> >>>>> a. >>>>> >>>>> >>>>> >>>>> On 01.02.10 14:29, "Stefan Sicurella" <sicure...@onlymac.de> wrote: >>>>> >>>>>> Hallo, >>>>>> >>>>>> den Wert errechne ich aus Brutto-Beträgen und der dazugehörigen MwSt. >>>>>> Er dürfte nicht relevant sein, ist er aber in RB 2009 R5.1 >>>>>> Meine Paniklösung, die auf jeden Fall funktioniert: >>>>>> >>>>>> Function round_kaufman(myFloatValue as double) As double >>>>>> dim d as Double >>>>>> dim sk as string >>>>>> const factor=100 >>>>>> d = myFloatValue*factor >>>>>> sk=format(d,",###.0") >>>>>> if right(sk,1)="5" then d=d+0.1 >>>>>> return round(d)/factor >>>>>> >>>>>> End Function >>>>>> >>>>>> Gruß >>>>>> >>>>>> Stefan >>>>>> >>>>>>> Am 01.02.10 14:03, schrieb Stefan Sicurella: >>>>>>>> Hi, >>>>>>>> >>>>>>>> 0.825 hatte ich auch, habs nur in der Mail von Hand falsch getippt... >>>>>>>> >>>>>>>> ja, wenn ich es so mache wie unten beschrieben geht es auch. >>>>>>>> Wenn ich allerdings a durch addieren mehrerer Werte auch errechne geht >>>>>>>> es >>>>>>>> wieder nicht. >>>>>>>> >>>>>>>> Nur wenn ich expliziert die Zahl hinschreibe geht es... das ist doch >>>>>>>> irre? >>>>>>>> ;-) >>>>>>>> >>>>>>> >>>>>>> Die Herkunft des Wertes von "a" dürfte generell nicht relevant sein. >>>>>>> Wenn >>>>>>> du >>>>>>> dir eine Funktion baust welche den gerundeten Wert zurückgibt, so müsste >>>>>>> das >>>>>>> Ergebnis immer identisch sein. >>>>>>> >>>>>>> Hast du mal Beispiel-Code woran man sehen kann wie die unterschiedlichen >>>>>>> Wrte >>>>>>> (z.B. beim Addieren etc.) zustande kommen? >>>>>>> >>>>>>> -- >>>>>>> Michael Kagerbauer >>>>>>> http://rbcoder.de >>>>>>> >>>>>> >>>>>> >>>>> >>>>> >>>>> >>>> >>>> >>> >>> >>> >> >> > > >
