返回列表 上一主題 發帖

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

bugsfamily

帖子
17 
主題
3 
精華
0 
積分
33 
點名
0  
作業系統
XP SP3 
軟體版本
Office 2007 
閱讀權限
10 
性別
男 
註冊時間
2011-4-30 
最後登錄
2012-12-21 
1# 跳轉到 » 正序看帖
打印
tT
發表於 2012-3-9 01:35 | 只看該作者

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

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++可以嗎?

感謝!
收藏 分享

bugsfamily

帖子
17 
主題
3 
精華
0 
積分
33 
點名
0  
作業系統
XP SP3 
軟體版本
Office 2007 
閱讀權限
10 
性別
男 
註冊時間
2011-4-30 
最後登錄
2012-12-21 
4#
發表於 2012-9-21 19:53 | 只看該作者
回復  bugsfamily
我會用2維陣列來處理這樣的問題
Dim value(8,100) as Variant                      ' ...
alexliou 發表於 2012-5-5 10:59



    感謝。

TOP

alexliou

帖子
51 
主題
0 
精華
0 
積分
81 
點名
0  
作業系統
Win 7 
軟體版本
Office 2010 
閱讀權限
20 
性別
男 
註冊時間
2012-3-9 
最後登錄
2013-1-9 
3#
發表於 2012-5-5 10:59 | 只看該作者
回復 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
Alex

TOP

arksu

帖子
8 
主題
0 
精華
0 
積分
13 
點名
0  
作業系統
WIN7 
軟體版本
2010 
閱讀權限
10 
性別
男 
註冊時間
2012-5-2 
最後登錄
2012-5-6 
2#
發表於 2012-5-3 11:11 | 只看該作者
因為不知您是否使用的是VB.NET, 如果是的話, 我會建議分開兩部分,

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

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

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

TOP

        靜思自在 : 地上種了菜，就不易長草；心中有善，就不易生惡。
返回列表 上一主題