返回列表 上一主題 發帖

[發問] 如何才能用列舉方式來指定整數陣列的內容值

回復 1# luhpro
難道不能用列舉的方式一次指定整個整數陣列的值嗎?
  1. Sub Ex()
  2.     Dim A
  3.     A = Array(10, 20, 30)
  4.     MsgBox A(0)
  5.     A(0) = 50
  6.     MsgBox A(0)
  7. End Sub
複製代碼

TOP

本帖最後由 GBKEE 於 2011-5-1 06:26 編輯

回復 6# luhpro
[無法指定至陣列] VBA的說明
陣列中的各元素,必須個別指定其值。這個錯誤的起因與解決方法如下所示:
您試圖將一個值指定給一個陣列變數,但沒有指定要將這個值指定給哪個元素。
要設定一個陣列中的元素,您就必須指定此元素的註標。例如,若 MyArray 為一個整數陣列,則運算式 MyArray = 5 是不正確的,下列的運算式才是正確的:
MyArray(UBound(MyArray)) = 5
  1. Sub 可行()
  2.     Dim A()
  3.     A = Array(1, 2)
  4.     ReDim Preserve A(UBound(A) + 1)
  5.     A(UBound(A)) = 10
  6.     MsgBox UBound(A)
  7. End Sub
  8. '''''''''''''''''''''''''''''''''''''''''''''
  9. Sub 不可行()
  10. Dim A(1)
  11. A = Array(1,2)
  12. End Sub
複製代碼

TOP

        靜思自在 : 君子立恆志,小人恆立志。
返回列表 上一主題