配列の指定された次元で使用できる添字の最大値を、Long データ型の値で返します。
構文
UBound ( arrayname [, dimension ] )
UBound 関数には、次の引数があります。
|
引数 |
説明 |
|
arrayname |
必ず指定します。 配列 変数の名前。は、標準変数の名前付け規則に従います。 |
|
dimension |
省略可能。 バリアント型 (Long) の値を指定します。 どの次元の最大値を返すかを示す整数を指定します。 最初の次元なら 1、2 番目の次元なら 2、というように指定します。 引数 dimension を省略すると、1 が指定されたものと見なされます。 |
解説
UBound 関数は、LBound 関数と組み合わせて、配列のサイズを求めるために使用します。 配列の次元の最小値を調べるには、LBound 関数を使用します。
次のような次元の配列の場合、UBound 関数からは下表のような値が返ります。
Dim A(1 To 100, 0 To 3, -3 To 4)
|
ステートメント |
戻り値 |
|
UBound(A, 1) |
100 |
|
UBound(A, 2) |
3 |
|
UBound(A, 3) |
4 |
例
注: 次の例は、Visual Basic for Applications (VBA) モジュールでのこの関数の使用方法を示しています。 VBA の使用方法の詳細については、[検索] の横にあるドロップダウン リストで [開発者用リファレンス] を選び、検索ボックスに検索する用語を入力します。
この例では、UBound 関数を使用して、配列の指定された次元で使用できる添字の最大値を調べます。
Dim Upper
' Declare array variables.
Dim MyArray(1 To 10, 5 To 15, 10 To 20)
Dim AnyArray(10)
Upper = UBound(MyArray, 1) ' Returns 10.
Upper = UBound(MyArray, 3) ' Returns 20.
Upper = UBound(AnyArray) ' Returns 10.
