Problem with StringSplit?

[Damein]

So I have this code, and it works so long as I don't use a number with more than one digit.

So, its just a test to figure out how to fix a problem in my other script.

Example:

2*2*2*2 comes out as: 16

Which, that works out correctly.

But:

2*22 comes out as: 4, not 44.

Here's the code:

Global $StoreProblemGrid, $result, $StartingNumber, $Count, $NumberToStartWith, $SaveNumbers

            $StoreProblemGrid = InputBox(0, "Test", "Input problem")
            $result = StringSplit($StoreProblemGrid, "*")
            $StartingNumber = $result[0]
            $Count = 1
            $State = 0
            $StartingNumber -= 1
            $NumberToStartWith = $result[1]
            Do
                $Count += 1
                $StartingNumber -= 1
                $NumberToStartWith *= $result[$Count]
                If $StartingNumber = 0 Then
                $SaveNumbers = ""
                $state = 1
                $Count = ""
                MsgBox(0, "Test", $NumberToStartWith)
                $NumberToStartWith = ""
            EndIf
        Until $state = 1

[enaiman]

You have quite a mess in there - I didn't even try to debug your code, I just re-wrote it:

Global $StoreProblemGrid, $compos, $result

    $result = 1
    $StoreProblemGrid = InputBox(0, "Test", "Input problem")
    $compos = StringSplit($StoreProblemGrid, "*")
    For $i = 1 To $compos[0]
        $result *= $compos[$i]
    Next
    MsgBox(0, "Test", $result)

Edit: BTW - StringSplit returns the number of elements in [0], so first element will be [1] -> $StartingNumber = $result[1] ... if you want to debug your code ...

Edited October 15, 2010 by enaiman

[Mison]

Edit: BTW - StringSplit returns the number of elements in [0], so first element will be [1] -> $StartingNumber = $result[1] ... if you want to debug your code ...

You're right. Use Flag = 2 to disable the return of the count.

$array = StringSplit($string,"",2)

[Malkey]

Try this short-cut.

Destination orientated, not the journey.

MsgBox(0, "Test Result", "Answer: " & Execute(InputBox("Test", "Input a valid mathematical expression." & _
        @CRLF & 'e.g. Enter "cos(240*Atan(1)/180) * 22"' & @CRLF & _
        'Should return: "11"', "cos(240*Atan(1)/180) * 22")), 3)