Seite 4 von 4
Verfasst: 09.11.2005 17:43
von Kaeru Gaman
hm, ich verstehe nich ganz, wieso da was nicht mehr funktioniert...
Code: Alles auswählen
Number$ = StrF(Var,4)
While Right( Number$,1)="0" Or Right( Number$,1)="."
Number$ = Left(Number$, Len(Number$)-1)
Wend
würd ich da mal so ausm ärmel schütteln...
Verfasst: 09.11.2005 18:16
von Lupo
@kaeru
nöö, das war zu schnell gecodet
Code: Alles auswählen
Var.f = 1200.00
Number$ = StrF(Var,4)
While Right( Number$,1)="0" Or Right( Number$,1)="."
Number$ = Left(Number$, Len(Number$)-1)
Wend
Debug Number$
LUPO
Verfasst: 09.11.2005 18:33
von Kaeru Gaman
*handvordiestirnklatsch*
argl, hast recht... die komma-prüfung muss aus der schleife raus...
Code: Alles auswählen
Number$ = StrF(Var,4)
While Right( Number$,1)="0"
Number$ = Left(Number$, Len(Number$)-1)
Wend
If Right( Number$,1)="."
Number$ = Left(Number$, Len(Number$)-1)
EndIf
Verfasst: 09.11.2005 19:46
von PB42
Klappt 1a!

Das war's, was ich gesucht hatte und das speichere ich als Muster-Datei. Ich selber hatte auch schon an das Arbeiten mit Strings gedacht, aber die Funktionen Left() und Right() sind neu für mich. Also vielen Dank, Kaeru Gaman und Lupo.
PB42