タイトル | : Re: VB2005で多数のオブジェクト貼り付け |
記事No | : 4312 |
投稿日 | : 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
|