VBScript code in QTP to create five elements array , to store five values in any type and display numbers only.

Option explicit

Dim val(4), i

For i=0 to 4 step 1

     val(i)=inputbox("Enter any values :")

Next

For i=0 to 4 step 1

     If isnumeric(val(i)) Then

         print(val(i))

     End If

Next