VB.NET 配列の添字について

Question

Private testButton() As System.Windows.Forms.Button

Me.testButton= New System.Windows.Forms.Button() _
        {Me.testButton1, Me.testButton2, Me.testButton3, Me.testButton4, Me.testButton5}

 Dim i As Integer
        For n = 0 To Me.testButton.Length - 1
            AddHandler Me.testButton(i).Click, _
                AddressOf Me.testButton_Click
        Next n

VB.netでボタンコントロールの配列を作ったのですが、添字を1から使う方法はないでしょうか？

これだとtestButton1がtestButton(0)になってしまい、今作っているプログラムではすごく不便です。

何かいい方法はありますでしょうか？

Answer 1

はじめまして。thom.jpと申します。

結論からいうと、0番を作らない方法は存在しないので、KoichiSugiyamaさんが提示されているように、0番を空けておくのが現実的な妥協案でしょうか。私も、あまりお勧めしませんが。

Length -1に引っかかっているのであれば、UBound関数で添え字の最大数を取る方法もあります。
あるいは、コントロールの名称を0始まりにしてしまうとか。

VB.NETでは他の.NET言語との相互運用性を確保するために配列の下限は0に統一されました。
https://support.microsoft.com/ja-jp/kb/311333

なぜ0始まりなのかというと、C言語で考えると分かりやすいのですが、配列の添え字はもともと先頭要素からのオフセット(差分)を示すものだからです。その経緯から、先頭要素を取り出すときは0とするのが標準です。

VB6やVBAではOption Base 1を指定できたり、Dim Arr(2 to 5)などの下限指定できますが、こちらがむしろ異端ですね。扱いが楽なので私は気に入ってますが。

Comments

[ShouOkada]

わかりました、ありがとうございますm(__)m

Answer 2

あまりお勧めはできないですが、どうしてもコントロールの番号と配列の添え字を合わせたい、というのであれば、

Me.testButton= New System.Windows.Forms.Button() _
    {Nothing, Me.testButton1, Me.testButton2, Me.testButton3, Me.testButton4, Me.testButton5}

と要素0にNothingを入れる、というのはどうでしょうか。要素数が6になってしまいますが、それぞれのコントロールに対する添え字は1～5となります。

ただ、今後のために配列の要素は0始まりであることに慣れておいた方がいいと思います。

Comments

[ShouOkada]

1から始めるのはあまり良くないのですね・・・
わかりました、ありがとうございますm(__)m