В QTP как хранить строку в одном массиве и номер в другом массиве

Question

В QTP принимают 10 входов от пользователя, если он принят ввод строки хранить его в одном массиве, и если это число, то хранить его в другой массив

Answer 1

size_of_num=0 
size_of_nonnum=0 
Dim Num() 
Dim Nonnum() 
For i=1 to 10 
val = InputBox ("Enter a number or a string", "User Input") 
msgbox val 
If IsNumeric(val) Then 
    msgbox "numeric" 
    Redim Preserve Num(size_of_num) 
    Num(size_of_num) = val 
    msgbox "Num("& size_of_num &") -->" & Num(size_of_num) 
    size_of_num=size_of_num+1 
else 
    msgbox "string" 
    Redim Preserve Nonnum(size_of_nonnum) 
    Nonnum(size_of_nonnum) = val 
    msgbox "Nonnum("& size_of_nonnum &") -->" & Nonnum(size_of_nonnum) 
    size_of_nonnum=size_of_nonnum+1 
End If 
Next 

Попробуйте это