在Classic Asp VBScript中迭代數組的最佳方式是什麼？

Question

在下面

For i = LBound(arr) To UBound(arr) 

什麼是要求使用LBound點的代碼？當然這總是0.

Answer 1

爲什麼不使用For Each？這樣你就不需要關心LBound和UBound是什麼。

Dim x, y, z 
x = Array(1, 2, 3) 

For Each y In x 
    z = DoSomethingWith(y) 
Next 

Answer 2

可能它來自VB6。因爲在VB6 Option Base語句，可以改變下界陣列是這樣的：

Option Base 1 

而且在VB6中，你可以改變下界特定陣列的是這樣的：

Dim myArray(4 To 42) As String 

Answer 3

我一直用於各...

Answer 4

有一個很好的理由不要使用For i = LBound(arr) To UBound(arr)

dim arr(10)分配陣列的十名一名成員，從0到10（假設VB6默認選項基礎）。

許多VB6程序員都假設該數組是基於一個數組，並且從不使用分配的arr(0)。我們可以通過使用For i = 1 To UBound(arr)或For i = 0 To UBound(arr)來消除潛在的錯誤來源，因爲那麼清楚是否正在使用arr(0)。

For each使每個數組元素的副本，而不是一個指針。

這有兩個問題。

1. 當我們試圖給數組元素賦值時，它並不反映在原始數據上。此代碼將值47分配給變量i，但不影響arr的元素。

   arr = Array(3,4,8) 
   for each i in arr 
       i = 47 
   next i 
   Response.Write arr(0) '- returns 3, not 47

2. 我們不知道一個數組元素的索引中for each，我們不能保證元素的順序（儘管它似乎是爲了。）

Answer 5

LBound可能並不總是0.

雖然無法創建一個數組，但VBScript中的下限不是0，但仍可以從COM組件中檢索變體數組可能指定了不同的LBound。

這就是說我從來沒有遇到過這樣的事情。