currency format

[mila]

I had looked in forum a simple program Format Number to add coma :

www.autoitscript.com/forum/index.php?showtopic=16376

Global $t, $t1, $final1, $result, $var[2], $final2

    ;$Var = 45678913231
    $var[0] = 123456
    $var[1] = 789012

for $i = 0 to 1
    $result = StringSplit($var[$i], "")

    For $x = $result[0] to 1 Step -1
        $t = $t +1
        MsgBox(0, "", $t)
        If $t = 4 Then
            $final1 = "," & $final1 
            $t = 1
        EndIf
        $final1 =  $result[$x] & $final1
    Next

    MsgBox(0, "Results", $final1)

Next

I using that code to format number more than 1 variable. When read variabel 1 the result is true but the problem is when read next variabel the result is union from current variabel and first variabel.

How to format number each of variabel?

Thank You.

[Tvern]

Is this what you are looking for?

Global $t, $t1, $final1, $result, $var[2], $final2

    ;$Var = 45678913231
    $var[0] = 123456
    $var[1] = 789012

for $i = 0 to 1
    $result = StringSplit($var[$i], "")
    $final1 = ""
    $t = 0
    For $x = $result[0] to 1 Step -1
    $t = $t +1
    MsgBox(0, "", $t)
    If $t = 4 Then
    $final1 = "," & $final1
    EndIf
    $final1 = $result[$x] & $final1
    Next
    MsgBox(0, "Results", $final1)
Next

I wasn't sure if you wanted to add a comma for every 3 numbers, or just for the last 3. This script does the latter.

I've made it reset $final1and $t for each number, which results in what I think you wanted for the examples provided.

I'll have a looksie if I can come up with a simpler solution.

Not exactly a simple solution, but this might be exactly what you want:

http://www.autoitscript.com/forum/index.php?showtopic=11732&view=findpost&p=87193

Edited June 8, 2010 by Tvern

[mila]

Hi Tvern,

Ya, that i'm looking for. So, i forgot to put $final1 = ""

Thanks Tvern