2 回答

TA貢獻(xiàn)1842條經(jīng)驗 獲得超13個贊
返回一個 Long 型數(shù)據(jù),其值為指定數(shù)組維可用的最小下標(biāo)。
語法
LBound(arrayname[, dimension])
LBound 函數(shù)的語法包含下面部分:
部分 描述
arrayname 必需的。數(shù)組變量的名稱,遵循標(biāo)準(zhǔn)的變量命名約定。
dimension 可選的;Variant (Long)。指定返回哪一維的下界。1 表示第一維,2 表示第二維,如此類推。如果省略 dimension,就認(rèn)為是 1。
說明
LBound 函數(shù)與 UBound 函數(shù)一起使用,用來確定一個數(shù)組的大小。UBound 用來確定數(shù)組某一維的上界。
對具有下述維數(shù)的數(shù)組而言,LBound 的返回值見下表:
Dim A(1 To 100, 0 To 3, -3 To 4)
語句 返回值
LBound(A, 1) 1
LBound(A, 2) 0
LBound(A, 3) -3
所有維的缺省下界都是 0 或 1,這取決于 Option Base 語句的設(shè)置。使用 Array 函數(shù)創(chuàng)建的數(shù)組的下界為 0;它不受 Option Base 的影響。
對于那些在 Dim 中用 To 子句來設(shè)定維數(shù)的數(shù)組而言,Private、Public、ReDim 或 Static 語句可以用任何整數(shù)作為下界。
返回一個 Long 型數(shù)據(jù),其值為指定的數(shù)組維可用的最大下標(biāo)。
語法
UBound(arrayname[, dimension])
UBound 函數(shù)的語法包含下面部分:
部分 描述
arrayname 必需的。數(shù)組變量的名稱,遵循標(biāo)準(zhǔn)變量命名約定。
dimension 可選的;Variant (Long)。指定返回哪一維的上界。1 表示第一維,2 表示第二維,如此等等。如果省略 dimension,就認(rèn)為是 1。
說明
UBound 函數(shù)與 LBound 函數(shù)一起使用,用來確定一個數(shù)組的大小。LBound 用來確定數(shù)組某一維的上界。
對具有下述維數(shù)的數(shù)組而言,UBound 的返回值見下表:
Dim A(1 To 100, 0 To 3, -3 To 4)
語句 返回值
UBound(A, 1) 100
UBound(A, 2) 3
UBound(A, 3) 4
LBound 函數(shù)示例
該示例使用 LBound 函數(shù)來返回數(shù)組的指定維數(shù)的最小可用下標(biāo)??梢允褂?Option Base 語句取代數(shù)組缺省下標(biāo)值 0。
Dim Lower
Dim MyArray(1 To 10, 5 To 15, 10 To 20) '聲明數(shù)組變量。
Dim AnyArray(10)
Lower = Lbound(MyArray, 1) '返回 1。
Lower = Lbound(MyArray, 3) '返回 10。
Lower = Lbound(AnyArray) '返回 0 或 1,取決于
'Option Base 的設(shè)置。
UBound 函數(shù)示例
該示例使用 UBound 函數(shù),確定數(shù)組的指定維的最大可用下標(biāo)。
Dim Upper
Dim MyArray(1 To 10, 5 To 15, 10 To 20) '聲明數(shù)組變量。
Dim AnyArray(10)
Upper = UBound(MyArray, 1) '返回 10。
Upper = UBound(MyArray, 3) '返回 20。
Upper = UBound(AnyArray) '返回 10。

TA貢獻(xiàn)1802條經(jīng)驗 獲得超5個贊
這個快捷的方式,不是太好辦
你可以這樣做!
寫入時
也就是 a=array("黑龍江","哈爾濱市","黑龍江","齊齊哈爾市" ....)
全這樣,
如果選黑龍江 查找黑龍江 的第下一個 也就是奇偶吧
查找一下!就行了!可能麻煩點!
添加回答
舉報