2017-08-02 83 views
0
Dim LastNumber as Integer = 1 
Dim num_0() as Integer = {1, 2, 3, 4, 5} 
Dim num_1() as Integer = {6, 7, 8, 9, 10} 
Dim num_2() as Integer = {20, 21, 14, 36, 0} 
Dim y() As Integer 

y(0) = num_0(2) 

當我使用這個代碼在執行時完全指定一個整數變量爲整數變量和變化名動態

但問題是我想在NUM_0改變「0」(2) 當我做...

y(0) = num_ & LastNumber & (2) 

這不工作 或者 Y(0)=( 「num_」 & LastNumber & 「(2)」) 這給了我一個錯誤,將字符串轉換成一個整數是不可能

我的問題是我怎麼能代替「0」 NUM_0(2)與LastNumber整型變量...所以它讀取「8」出數組NUM_1(2)

+1

那不是。一旦編譯器完成它,'num_0'可能被命名爲別的東西。您無法即時創建變量引用,因爲編譯器必須在編譯時瞭解它們。我無法確切地說出你在玩什麼,但是把它們全部放在一個數組(或一個數組列表)中,其他索引變量指示每個組的開始以及'LastNumber'可以工作。請閱讀[問]並參加[旅遊] – Plutonix

回答

0

您可以使用multidimensional array(AKA矩形陣列):

Dim num As Integer(,) = { {1, 2, 3, 4, 5}, {6, 7, 8, 9, 10}, {20, 21, 14, 36, 0} } 

y(0) = num(LastNumber, 2) 

jagged array(數組的數組):它是如何工作

Dim num As Integer()() = { ({1, 2, 3, 4, 5}), ({6, 7, 8, 9, 10}), ({20, 21, 14, 36, 0}) } 

y(0) = num(LastNumber)(2)