閉じる

Array 関数  UBound と LBound 関数


Array 関数



変数をたくさん宣言しなければならないときには、この関数を使ってコードをすっきりと見やすくしましょう。



構文 Array(arglist)



arglist … 変数に保存する値。必ず指定します。



変数myRetにArray関数を使って配列を作成します。

値のリストをカンマで区切って指定します。値は左側から順に0・1・2・3・・・とインデックスが自動で付けられます。

このときに注意する点は、変数はバリアント型で宣言するということです。



Array 関数の使用例



  Dim myRet as Vriant



    myRet = Array("txtフィールド名1","txtフィールド名2","txtフィールド名3")



※例:myRet(2)はtxtフィールド名3となります。

 



UBound と LBound 関数



Array関数を使って作成した配列変数をもとにループ処理をしたいとき、いちいち配列の数をかぞえてから、ループする回数を設定するのは面倒です。この関数を使って楽をしましょう。



構文 UBound(arrayname[, dimension])

構文 LBound(arrayname[, dimension])



arrayname … 配列変数名を指定します。必ず指定します。

dimension  … 省略可能です。



UBoundは配列のインデックス番号の最大値を返します。

LBoundは配列のインデックス番号の最小値を返します。





UBoundとLBoundを使用した場合の例



Dim myRet as Vriant

Dim I as Integer



    myRet = Array("txtフィールド名1","txtフィールド名2","txtフィールド名3")

  

    For I = LBound(myRet) to UBound(myRet)



        ○○処理を実行



    Next



※この例だと配列が3つですので3回ループします。

 LBoundは0。UBoundは2になります。