VB.netでラベルの配列を作るには (ID:80411)

名前

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

本文 >Lb(2, 2).Dispose() はやってみましたか？ >そのやり方はボタンを貼り付けた場合と違い難しそうです 簡単です Dim But(4) As Button Dim i As Integer For i = 0 To But.GetLength(0) - 1 But(i) = New Button But(i).Left = But(i).Width * i 'ボタンの配置 But(i).Top = Lb(9, 4).Top + Lb(9, 4).Height 'ラベルの下に But(i).Tag = i 'タグをセット Controls.Add(But(i)) '忘れないように But(i).Parent = TabPage1 'コンテナのセット AddHandler But(i).Click, AddressOf Buts_Click 'イベントハンドラー Next Labelと殆ど同じですが、どのボタンが押されてか判るようにTagをセットします。 後はイベントを作ります。 AddHandler But(i).Click, AddressOf Buts_Click の部分です '実際のイベントは Private Sub Buts_Click(ByVal sender As System.Object, _ ByVal e As System.EventArgs) Dim a As Integer Select Case sender.tag() 'ボタンの処理を入れる Case 0 Case 1 Case 2 Case 3 End Select End Sub こんな感じです