[發問] 請教: 如何利用迴圈動態產生變數

bugsfamily

Dear 大大
我想產生一些array的變數，如下:
dim 收盤value as Variant
dim 外資value as Variant
dim 投信value as Variant
dim 自營value as Variant
dim 融資value as Variant
dim 融券value as Variant
................
dim 收盤price as Variant
dim 外資price as Variant
dim 投信price as Variant
dim 自營price as Variant
dim 融資price as Variant
dim 融券price as Variant
................
因為很多，而且常常只有變數的後半段不一樣(會有變化)，但變數前半段名稱都一樣

請問有沒有可能將: 收盤價，外資，投信，自營商，融資，融券..先變成array

Dim MySheets(8) As String
    MySheets(0) = "收盤"
    MySheets(1) = "外資"
    MySheets(2) = "投信"
    MySheets(3) = "自營商"
    MySheets(4) = "融資"
    MySheets(5) = "融券"
    MySheets(6) = "開盤"
    MySheets(7) = "最高"
    MySheets(8) = "最低"

能不能利用迴圈將它們加上後半段的名稱，來宣告變數
如果VB不行C++可以嗎?

感謝!

arksu

因為不知您是否使用的是VB.NET, 如果是的話, 我會建議分開兩部分,

第一個部份建立你所需要的物件以及他的屬性,ˇ以您的範例來看有收盤,value,price
所以我會訂出name,value,price等三個屬性

第二部分利用迴圈new 出這個物件,填入相關屬性,塞進一個arraylist or list

然後看要怎麼用這些物件再從arraylist or list取出使用

alexliou

回復 1# bugsfamily
我會用2維陣列來處理這樣的問題
Dim value(8,100) as Variant                      '第二維度的size 可視資料量的大小而決定, 也可先不設定, 再用Redim來改變
Dim price (8,100) as Variant
利用第一維度的index 來代表它是哪一類的資訊
如value(0, x)代表收盤的value
   value(1,x)代表外資的value
.........
   value(8,x)代表最低的value

bugsfamily

回復  bugsfamily
我會用2維陣列來處理這樣的問題
Dim value(8,100) as Variant                      ' ...
alexliou 發表於 2012-5-5 10:59

    感謝。