麻辣家族討論版版 » Excel程式區 » 請教些陣列宣告命名問題

返回列表下一主題上一主題發帖

[發問] 請教些陣列宣告命名問題

　暱稱: 隨風飄蕩的羽毛
　頭銜: [御用]潛水艇

高中生 Rank: 3 Rank: 3

帖子: 852
主題: 79
精華: 0
積分: 918
點名: 0
作業系統: Windows 7 , XP
軟體版本: Office 2007, Office 2003,Office 2010,YoZo Office
閱讀權限: 50
性別: 男
來自: 宇宙
註冊時間: 2011-4-8
最後登錄: 2024-2-21

1^# 跳轉到 » 正序看帖

字體大小: tT

發表於 2012-11-30 09:34 | 只看該作者

[發問] 請教些陣列宣告命名問題

本帖最後由 mark15jill 於 2012-11-30 09:36 編輯

以下是兩段陣列宣告，想請問，若今天有 chbo1(10,10) ~ chbo13(10,10) 該如何撰寫？
Dim chbo1(10, 10) As CheckBox
Dim chbo2(10, 10) As CheckBox

因為原本是使用大範圍的宣告，但因程式結果需求只能區域陣列宣告。
雖說可以依序編寫，可是這樣就失去意義。

樓主熱帖

收藏

  多做多想多學習，少看少錯少迷途

  多做=多多練習，多多編寫。
  多想=想想為什麼人家程式要那樣寫，如果換成自己，又會怎寫。
  多學習=學習人家的發問並解答，學習人家的寫法

  少看=只看不做也枉然

　暱稱: 隨風飄蕩的羽毛
　頭銜: [御用]潛水艇

高中生 Rank: 3 Rank: 3

帖子: 852
主題: 79
精華: 0
積分: 918
點名: 0
作業系統: Windows 7 , XP
軟體版本: Office 2007, Office 2003,Office 2010,YoZo Office
閱讀權限: 50
性別: 男
來自: 宇宙
註冊時間: 2011-4-8
最後登錄: 2024-2-21

4^#

發表於 2012-12-5 16:17 | 只看該作者

謝謝 GBKEE 與 kimbal 兩位大大的教導，小弟在此謝過。目前測試三重迴圈(kimbal大大教導的)。
只是，可能運算個數大多，執行中，會有些許延遲@@"

目前仍在把程式簡易化，等好了再放上來@@"

  多做多想多學習，少看少錯少迷途

  多做=多多練習，多多編寫。
  多想=想想為什麼人家程式要那樣寫，如果換成自己，又會怎寫。
  多學習=學習人家的發問並解答，學習人家的寫法

  少看=只看不做也枉然

超級版主 Rank: 8 Rank: 8

帖子: 5923
主題: 13
精華: 1
積分: 5986
點名: 0
作業系統: win10
軟體版本: Office 2010
閱讀權限: 150
性別: 男
來自: 台灣基隆
註冊時間: 2010-5-1
最後登錄: 2022-1-23

2017 雞年全勤獎章 2016猴年全勤獎章 2015羊年全勤獎章 2014馬年全勤獎章 2013蛇年全勤獎章 2012龍年全勤獎章論壇貢獻勳章熱烈參與勳章 2011兔年全勤獎章

3^#

發表於 2012-12-1 12:32 | 只看該作者

回復 1# mark15jill
雖說可以依序編寫，可是這樣就失去意義
是這樣嗎?

Sub Ex()
Dim chbo1(10, 10) As CheckBox
Dim AR(1 To 13), xi As Integer
For xi = 1 To UBound(AR)
AR(xi) = chbo1
Next
End Sub

複製代碼

版主 Rank: 7 Rank: 7 Rank: 7

帖子: 472
主題: 5
精華: 0
積分: 485
點名: 0
作業系統: Windows
軟體版本: MS Office
閱讀權限: 100
性別: 男
來自: 香港
註冊時間: 2010-7-4
最後登錄: 2014-12-28

論壇貢獻勳章

2^#

發表於 2012-11-30 23:49 | 只看該作者

回復 1# mark15jill

不太清楚你想要的效果.
想說的是陣列不只是兩維,還可以是3維,4維...
Dim chbo(13, 10, 10) As CheckBox

懂得發問,答案就會在其中

今日の一秒は明日にない
http://kimbalko-chi.blogspot.com
http://kimbalko.blogspot.com

靜思自在 : 一個缺口的杯子，如果換一個角度看它，它仍然是圓的。

返回列表下一主題上一主題