Unable to use array in QTP

[ovidiu]

Example of use:

Dim arrayList
Call SpliteStringToArray("1,2,3,4,5", ",", arrayList)
For i = Lbound(arrayList) to Ubound(arrayList)
    msgbox(arrayList(i))
Next


Public Function SpliteStringToArray(mystring, delimiter, outputArray)

    myArray = split(mystring, delimiter)

    ReDim outputArray(Ubound(myArray))
    outputArray = myArray

End Function