VB表示2010填充陣列

Question

它不喜歡我的代碼：儘快

Dim n As Integer 
    Dim flag As Boolean 
    Dim i 
    Dim x() As Integer 

    n = InputBox("How many numbers do you want to be sorted?") 

    For i = 1 To n - 1 Step 1 
     x(i) = InputBox("Please enter a record") 
    Next i 

我希望把值代入X（）

Answer 1

你需要使用一個使用ReDim來指定的x大小爲你知道它（即後你的第一個的InputBox）：

n = InputBox("How many numbers do you want to be sorted?") 
ReDim x(n - 1) 

而且，你的循環會更簡單處理，如果它基於在零位：

For i = 0 To n - 1 Step 1