Addition von Dezimalzahlen mit Nachkommastellen

hallo,
irgendwie verzweifel ich gerade...

ich möchte 2 zahlen in einer Schleife addieren:

dim $z1 = "0.00"

for i = .....
$z1_Aktuell = StringMid($line, 32, 16))

msgbox(4096, "", $z1 & " + " & $z1_Aktuell & @CRLF & _
"$z1 + $z1_Aktuell")

$z1 = $z1 + $z1_Aktuell

msgbox(4096, "", "Summe= " & $z1 )

Next

Meine Msgbox sehen dann so aus:

0.00 + 7.016,00
$z1   +   $z1_Aktuell
Summe= 7.016
---
7.016 + 6.887,00
$z1   +   $z1_Aktuell
Summe= 13.903
---
13.903 + 60,00
$z1   +   $z1_Aktuell
Summe= 73.903

Wie man sieht, funktionieren die ersten beiden Additionen, nur bei der Dritten (13.903 + 60,00) erscheint als Ergebnis 73.903 .
Bei anderen Programmiersprachen deklariere ich ja um vorhinein die variablen, jedoch bei autoit nicht. ich vermute das er irgendwie durcheinanderkommt.

Wisst ihr wie ich mein code anpassen muss?

Viele Grüße und Danke bereits im Vorraus!

Bei der MsgBox-Ausgabe kann man die Rechnung mitverfolgen...
Ab der dritten Rechnung sind die Ergebnisse falsch.

VG

hi,
habe nun deine Tipps umgesetzt:

Func ...

dim $z1 = 0.00 ;Ist nun nicht mehr als String deklariert

for i = .....
$z1_Aktuell = StringMid($line, 32, 16))

msgbox(4096, "", $z1 & " + " & $z1_Aktuell & @CRLF & _
"$z1 + $z1_Aktuell")

$z1_Aktuell = _CheckDec($z1_Aktuell) ; In dieser Funktion wird aus einer DE Zahl (7.223,14) eine EN Zahl (7,223.14)

$z1 = $z1 + $z1_Aktuell

msgbox(4096, "", "Summe= " & $z1 )

Next

EndFunc

Func _CheckDec($value)
; Funktion zum umwandeln von DE Zahlen in EN Zahlen
$value = StringReplace($value, ",", ",,")
$value = StringReplace($value, ".", ",")
$value = StringReplace($value, ",,", ".")
;msgbox(4096, "", "checkvalue: " & $value)
return $value
EndFunc

MsgBox Output:

0 + 7,016.00
$z1   +   $z1_Aktuell
Summe= 7
---
7 + 6,887.00
$z1   +   $z1_Aktuell
Summe= 13
---
13 + 60.00
$z1   +   $z1_Aktuell
Summe= 73

Was ist den jetzt noch falsch?!

VG

Danke an alle!
Zum schluss lag es jetzt noch am tausender Trennzeichen...

Das eine ")" war durch abkürzung des codes falsch mitübernommen

so klappts:

Func ...

dim $z1 = 0.00 ;Ist nun nicht mehr als String deklariert

for i = .....
$z1_Aktuell = StringMid($line, 32, 16)

msgbox(4096, "", $z1 & " + " & $z1_Aktuell & @CRLF & _
"$z1 + $z1_Aktuell")

$z1_Aktuell = _CheckDec($z1_Aktuell) ; In dieser Funktion wird aus einer DE Zahl (7.223,14) eine EN Zahl (7,223.14)

$z1 = $z1 + $z1_Aktuell

msgbox(4096, "", "Summe= " & $z1 )

Next

EndFunc

Func _CheckDec($value)
; Funktion zum umwandeln von DE Zahlen in EN Zahlen
$value = StringReplace($value, ",", ",,")
$value = StringReplace($value, ".", "")
$value = StringReplace($value, ",,", ".")
;msgbox(4096, "", "checkvalue: " & $value)
return $value
EndFunc

Vielen Dank