禁止在類模塊中使用公共類型的動態數組作為模塊級變量,私有級別的變量也不能被外界直接調用,所以數組的意義也就失去了。
因為類模塊創建的實例通常稱為對象,所以政府似乎總是給各種對象壹個“集合”的概念,比如應用程序集合對象、範圍集合對象、加載項集合對象等等。實際上,這裏的“集合”相當於壹個動態數組。例如,WorkBooks(1)返回第壹個工作簿,WorkSheets(2)返回第二個工作表。這不就是壹個動態數組需要表達的嗎??
因此,建議您嘗試使用Collect對象來實現類似於動態數組的功能。給妳壹個參考的例子:
雷姆?-= =巴蜀兄弟公司= =-團隊提供支持。
公共?Arr?作為?新的?收藏品
公共?功能?補充(ByRef?r?作為?範圍)?作為?範圍
設置?補充?=?r?創建對對應於參數r的單元格的引用
由…改編補充?補充?將建立的引用實例添加到Arr集合中。
結束?函數,則標準模塊創建壹個實例並返回集合元素的值:
私人?嗯?作為?新的?不好吃?創建類模塊unsamesky mm的實例
私人?Sub?xx()
暗淡?我?作為?長的
為了什麽?我?=?1?去哪?10
嗯。補充?Sheet1。細胞(我,?1)?將單元格A1到A10添加到mm實例的Arr集合中。
然後
結束?潛水艇
Sub?yy()
打電話?' Xx '呼叫xx
MsgBox?Mm.Arr(3)'嘗試返回集合的第三個元素,也就是工作表的單元格A3的內容!
結束?Sub可以使用附件測試: