タイトル : Re: VB2005で多数のオブジェクト貼り付け 投稿日 : 2006/09/25(Mon) 13:07 投稿者 : 魔界の仮面弁士
> btnAddボタンをクリックした回数が2回目の時(3回目〜も)、 > 新たに"ボタン2","ボタン3"という風に追加していきたいのですが Private buttonIndex As UInteger = 0 Private Sub btnAdd_Click(ByVal sender As Object, ByVal e As EventArgs) Handles btnAdd.Click Dim btn As New Button() buttonIndex += 1 btn.Text = String.Format("ボタン{0}", buttonIndex) btn.Location = New Point(0, 40 * buttonIndex) btn.Size = New Size(150, 30) Controls.Add(btn) End Sub |