こんなことできないでしょうか？ (ID:90423)

名前

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

本文 >...コントロール配列として追加したコントロールのイベントを取得... コントロールの配列は使用できないのだから、オブジェクトの配列を使うのだ。 Dim arrayStr() As String = {"赤", "青", "黄"} Dim tb() As Object = {TextBox1, TextBox2, TextBox3} For i As Integer = 0 To 2 tb(i).Text = arrayStr(i) Next コントロールの場合は配列ではなく、コレクションを使うのだ。 Dim ct As Control Dim arrayStr() As String = {"赤", "青", "黄"} For Each ct In Controls For i As Integer = 1 To Controls.Count If ct.Name = "TextBox" + CStr(i) Then ct.Text = arrayStr(i - 1) End If Next Next さるべーじさんは >dim arrayStr() String = {"赤", "青", "黄"} >TextBox & i & .Text = arrayStr(i-1) この文法がおかしと言ってますよ。確かに。。。。。(^^; コードを直打ちでなくデバッグしてから貼り付けた方がいいかな。 よく考えたらこんなことしてる暇は無いんだ。汗;