コントロールを、かっこよく配列に入れたい

分類:[その他]

Option Strict On
'vista
'VisualBasic2008
Public Class form1
Private p_Box_Suu As Integer = 8
Private p_Box(p_Box_Suu - 1) As PictureBox
Private Sub form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
p_Box(0) = PictureBox1
p_Box(1) = PictureBox2
p_Box(2) = PictureBox3
p_Box(3) = PictureBox4
p_Box(4) = PictureBox5
p_Box(5) = PictureBox6
p_Box(6) = PictureBox7
p_Box(7) = PictureBox8
For i As Integer = 0 To p_Box_Suu - 1
p_Box(i).Visible = False
Next
End Sub
End Class
こうゆう入れ方しかできないんです。
初心者マークの8ヶ月です。
for文かなんかで、かっこよくPictureBoxを格納した〜い。
よろしくお願いします。

■No23712に返信(ローマ皇帝レオ♪さんの記事)
> for文かなんかで、かっこよくPictureBoxを格納した〜い。

５．特別な方法
http://homepage1.nifty.com/rucio/main/dotnet/shokyu/standard20.htm

分類が「その他」になっていますが、.NETに関するご質問ではないのでしょうか?

.NETの質問であると仮定すると、私のサイトでも紹介しているのですが、そちらはご覧いただけましたか?あまりかっこよくないので、ご質問されたのかもしれませんが...。

コントロールの配列を作成する
http://dobon.net/vb/dotnet/control/buttonarray.html

Public Class Form1
'ボタンコントロール配列のフィールドを作成
Private testButtons() As System.Windows.Forms.Button

'フォームのLoadイベントハンドラ
Private Sub Form1_Load(ByVal sender As Object, _
ByVal e As System.EventArgs) Handles MyBase.Load
'ボタンコントロール配列の作成（ここでは5つ作成）
Me.testButtons = New System.Windows.Forms.Button(4) {}

'ボタンコントロールのインスタンス作成し、プロパティを設定する
Me.SuspendLayout()
Dim i As Integer
For i = 0 To Me.testButtons.Length - 1
'インスタンス作成
Me.testButtons(i) = New System.Windows.Forms.Button
'プロパティ設定
Me.testButtons(i).Name = "Button" + i.ToString()
Me.testButtons(i).Text = i.ToString()
Me.testButtons(i).Size = New Size(30, 30)
Me.testButtons(i).Location = New Point(i * 30, 10)
'イベントハンドラに関連付け
AddHandler Me.testButtons(i).Click, _
AddressOf Me.testButtons_Click
Next i

'フォームにコントロールを追加
Me.Controls.AddRange(Me.testButtons)
Me.ResumeLayout(False)
End Sub

'Buttonのクリックイベントハンドラ
Private Sub testButtons_Click(ByVal sender As Object, _
ByVal e As EventArgs)
'クリックされたボタンのNameを表示する
MessageBox.Show(CType(sender, System.Windows.Forms.Button).Name)
End Sub

End Class
やじゅさんの方は牛乳配達のバイト後に確認しますね。（＾＾）