Visual Basic 中学校 サンプル
VB.NET2002対応 VB.NET2003対応 VB2005対応 VB2008対応

 

Visual Basic 中学校 > VB.NET サンプル >

配列の要素の数を取得する

 

コレクションや配列の変換はループ処理を使用することでどのようにでも操作することができる。ここではループによらない方法を紹介する。

1.1次元配列の要素の数を取得する例

以下の例を実行すると要素の数である「3」が表示される。

VB.NET2002対応 VB.NET2003対応 VB2005対応 VB2008対応

Dim Values() As String = {"アメンボ", "イノシシ", "ウマ"}
Dim Count As
Integer

Count = Values.Length

MsgBox(Count)

 

2.多次元配列の次元数を取得する例

以下の例を実行すると次元の数である「2」が表示される。

VB.NET2002対応 VB.NET2003対応 VB2005対応 VB2008対応

Dim Values(,) As String = {{"アメンボ", "イノシシ", "ウマ"}, _
                           {"Apple", "Banana", "Cat"}}
Dim Count As
Integer

Count = Values.Rank

MsgBox(Count)

 

3.多次元配列の全要素数を取得する例

以下の例を実行すると全要素の数である「6」が表示される。

VB.NET2002対応 VB.NET2003対応 VB2005対応 VB2008対応

Dim Values(,) As String = {{"アメンボ", "イノシシ", "ウマ"}, _
                           {"Apple", "Banana", "Cat"}}
Dim Count As
Integer

Count = Values.Length

MsgBox(Count)

 

4.多次元配列の1次元あたりの要素数を取得する例

以下の例を実行すると時限ごとの要素数である「3」が表示される。なお、多次元配列では各次元の要素の数は常に等しい。

VB.NET2002対応 VB.NET2003対応 VB2005対応 VB2008対応

Dim Values(,) As String = {{"アメンボ", "イノシシ", "ウマ"}, _
                           {"Apple", "Banana", "Cat"}}
Dim Count As
Intege

Count = Values.Length \ Values.Rank

MsgBox(Count)