Data Type VisualBasic Script

Sub arrayTest()
     Dim i As Integer
     Dim intMyScores(10) As Integer
    
     For i = 0 To 10
        intMyScores(i) = InputBox("Enter number " & i, "Static Array Test")
     Next
    
     For i = 0 To 10
        Debug.Print "For array element " & i & " the number is " & _
     intMyScores(i)
    Next
End Sub