コントロールへのインデックス付与について (ID:147492)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文

>魔界の仮面弁士さま
ご指摘有難うございます。
質問掲示板を間違えておりましたのでこちらに移管します。

vb.netにて以下コントロールにアクセスしたいのですがうまくいきません。

フォームは以下構成になっております。
フォームに４つのグループボックスを配置し
各グループボックスの中にテキストボックスを２つ配置してます。

Form1
GroupBox1−TextBoxa1，TextBoxb1
GroupBox2−TextBoxa2，TextBoxb2
GroupBox3−TextBoxa3，TextBoxb3
GroupBox4−TextBoxa4，TextBoxb4

vb.netでは、コントロール配列がないということで以下処理にて、実行すると
「オブジェクト参照がオブジェクトインスタンスに設定されていません」とエラーが出てしまいます。

for i = 1 to 4
  Me.Controls("GroupBox" & i.ToString).Controls("TextBoxa" & i.ToString).Text = Status
  Me.Controls("GroupBox" & i.ToString).Controls("TextBoxb" & i.ToString).Text = name
next

>VB.NETで「コントロール配列」というと、互換ライブラリの
>Microsoft.VisualBasic.Compatibility.VB6.TextBoxArray クラスなどを
>指すことになりますが……本当にコントロール配列をお使いですか?

すみません言葉が間違っておりました。
コントロールを配列にみたててアクセスしたいということです。

>TextBoxa1 や TextBoxb1 は、Form1 ではなく GroupBox1 に属します。
こちらは、認識できております。

以下だとエラーがでずに、グループボックス内のテキストボックスa,bに値を入れることができるのですが
グループボックスも1〜4までインデックスで処理させたいのです。

Me.GroupBox1.Controls("TextBoxa" & i.ToString).Text = Status
Me.GroupBox1.Controls("TextBoxb" & i.ToString).Text = name

ご指摘のほどよろしくお願いいたします。

←解決時は質問者本人がここをチェックしてください。

戻る