Berny Mayer Member Licensed User Longtime User Jul 16, 2015 #1 Habe auch als Einsteiger das Problem, eine Zahl (oder einString) von z.B 7.1 in 7.10 umzuwandeln. Habt Ihr ein Tip für mich? Gruß Berny
Habe auch als Einsteiger das Problem, eine Zahl (oder einString) von z.B 7.1 in 7.10 umzuwandeln. Habt Ihr ein Tip für mich? Gruß Berny
specci48 Well-Known Member Licensed User Longtime User Jul 16, 2015 #2 Hallo Berny, es gibt hier den Befehl NumberFormat in zwei Ausprägungen: NumberFormat(Number As Double, MinimumIntegers As Int, MaximumFractions As Int)und NumberFormat2(Number As Double, MinimumIntegers As Int, MaximumFractions As Int, MinimumFractions As Int, GroupingUsed As Boolean) Eine ausführlichere Beschreibung hierzu findest du auch im Beginners Guide im Kapitel "14.8 String manipulation". Gruß specci48
Hallo Berny, es gibt hier den Befehl NumberFormat in zwei Ausprägungen: NumberFormat(Number As Double, MinimumIntegers As Int, MaximumFractions As Int)und NumberFormat2(Number As Double, MinimumIntegers As Int, MaximumFractions As Int, MinimumFractions As Int, GroupingUsed As Boolean) Eine ausführlichere Beschreibung hierzu findest du auch im Beginners Guide im Kapitel "14.8 String manipulation". Gruß specci48
pjo12345 Active Member Licensed User Longtime User Jul 16, 2015 #3 NumberFormat2(DeineZahl,1,2,2,False) B4X: Dim Zahl As Double Dim Ergebnis As String Zahl=1.7 Ergebnis = NumberFormat2(Zahl,1,2,2,False) Log("Zahl= " & Zahl) Log("Ergebnis= " & Ergebnis) Sollte funktionieren...
NumberFormat2(DeineZahl,1,2,2,False) B4X: Dim Zahl As Double Dim Ergebnis As String Zahl=1.7 Ergebnis = NumberFormat2(Zahl,1,2,2,False) Log("Zahl= " & Zahl) Log("Ergebnis= " & Ergebnis) Sollte funktionieren...
Berny Mayer Member Licensed User Longtime User Jul 16, 2015 #4 Danke Dir für Deine Antwort. Habe wohl den Fehler gemacht, Zahlen wie :"5.1" als String abzuspeichern. Jetzt will ich, dass in der Tabelle der Wert als "05.10" , dargestellt werden soll.
Danke Dir für Deine Antwort. Habe wohl den Fehler gemacht, Zahlen wie :"5.1" als String abzuspeichern. Jetzt will ich, dass in der Tabelle der Wert als "05.10" , dargestellt werden soll.
pjo12345 Active Member Licensed User Longtime User Jul 16, 2015 #5 Einfach die Zeile Ergebnis = NumberFormat2(Zahl,1,2,2,False) ändern in Ergebnis = "0" & NumberFormat2(Zahl,1,2,2,False)
Einfach die Zeile Ergebnis = NumberFormat2(Zahl,1,2,2,False) ändern in Ergebnis = "0" & NumberFormat2(Zahl,1,2,2,False)
specci48 Well-Known Member Licensed User Longtime User Jul 16, 2015 #7 Sofern Du die Zahlen "sauber" als String hast, kann man sie beliebig konvertieren, z.B.: Dim a As String = "5.1" Dim b As Double b = a Label1.Text = NumberFormat2(b, 2, 2, 2, False)
Sofern Du die Zahlen "sauber" als String hast, kann man sie beliebig konvertieren, z.B.: Dim a As String = "5.1" Dim b As Double b = a Label1.Text = NumberFormat2(b, 2, 2, 2, False)
Berny Mayer Member Licensed User Longtime User Jul 16, 2015 #8 Das sieht gut aus! So müsste ich meine "Stringzahl" mit NUMBERFORMAT2 umwandeln können.
MaFu Well-Known Member Licensed User Longtime User Jul 17, 2015 #9 pjo12345 said: Einfach die Zeile Ergebnis = NumberFormat2(Zahl,1,2,2,False) ändern in Ergebnis = "0" & NumberFormat2(Zahl,1,2,2,False) Click to expand... Das geht aber schief sobald die Nummer zweistellig wird. Besser so: B4X: Ergebnis = NumberFormat2(Zahl,2,2,2,False)
pjo12345 said: Einfach die Zeile Ergebnis = NumberFormat2(Zahl,1,2,2,False) ändern in Ergebnis = "0" & NumberFormat2(Zahl,1,2,2,False) Click to expand... Das geht aber schief sobald die Nummer zweistellig wird. Besser so: B4X: Ergebnis = NumberFormat2(Zahl,2,2,2,False)