control.add 変数のついて (ID:113451)

名前

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

本文 僕はクリックするたびに Labe1 Label2 ・ ・ ・ というふうにラベルが追加されていくものを作りたいと思っています。 そこで Option Explicit Private WithEvents btnObj As Label Dim I As Long ------------------------------------------------------------- Private Sub Command1_Click() I = 1 Set btnObj = Form1.Controls.Add("VB.Label", "btnObj(I)") With btnObj(I) .Visible = True .Width = 2000 .Caption = "Hello" .Top = 1000 + 500 * I .Left = 1000 End With I = I + 1 End Sub ( (I) というのはここを変数Iとしたいと思っているということです。） というふうにしたいんですが オブジェクト名の中に変数を入れにはどうすればいいのでしょうか？ またはオブジェクト名に変数を入れずにこのようなプログラムを作る方法があれば教えてください。 よろしくお願いします！