こんにちは。
動的に作成したコントロールの削除(VB2005)について教えてください。


ボタン1を押下すると5つユーザーコントロールを作成します。

    ' イベントが発生するように宣言しておく
    Private WithEvents P_ctlFloor As ucrFloor
    Private Sub btnMake_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnMake.Click
        For j As Integer = 1 To 5
            P_ctlFloor = New ucrFloor
            Me.Controls.Add(P_ctlFloor)
            With P_ctlFloor
                .Size = New Size(10, 10)
                .Location = New Point(15 * j, 100)
                ' イベントを関連付ける
                AddHandler .DoubleClick, AddressOf FloorPict_DClick
            End With
        Next
    End Sub

    Private Sub FloorPict_DClick(ByVal sender As Object, ByVal e As System.EventArgs)
        MsgBox("CLICK")
    End Sub


ボタン2を押下するとユーザーコントロールを削除します。

    Private Sub btnDelete_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnDelete.Click
        Me.Controls.Remove(P_ctlFloor)
    End Sub

↑この処理ですが、一番最後に作成したユーザーコントロールしか削除されません。
　２番目のコントロールを削除したい場合、どのように対応したらよいのでしょうか。

何か情報ありましたら教えてください。よろしくお願いします。

はじめまして。
コントロールを作成しているところで、適当な
名前をつけて、削除する時にそれを指定すればできますよ。

>         For j As Integer = 1 To 5
>             P_ctlFloor = New ucrFloor
>             Me.Controls.Add(P_ctlFloor)
>             With P_ctlFloor
　　　　　　　　→.Name = j　'適当な名前付ける。
>                 .Size = New Size(10, 10)
>                 .Location = New Point(15 * j, 100)
>                 ' イベントを関連付ける
>                 AddHandler .DoubleClick, AddressOf FloorPict_DClick
>             End With
>         Next

削除処理の中で
　　Me.Controls.Remove(CType(Me.Controls("2"), ucrFloor))

こんにちは＾＾

>    コントロールを作成しているところで、適当な
>    名前をつけて、削除する時にそれを指定すればできますよ。

任意のコントロールが削除できました！
ありがとうございました☆

細かいツッコミですみません。

> 　　Me.Controls.Remove(CType(Me.Controls("2"), ucrFloor))

Removeメソッドの引数はControlですから、CTypeによるキャストは不要だと思います。

Me.Controls.Remove(Me.Controls("2"))

さらに細かい突っ込みを。

> > 　　Me.Controls.Remove(CType(Me.Controls("2"), ucrFloor))
> Removeメソッドの引数はControlですから、CTypeによるキャストは不要だと思います。

RemoveAtってメソッドがあったりしますが……。


でもって，Remove系はDispose呼び出さないと思いましたが，よいのですかね。
「呼ばないといけない」という感じではないにしろ，リソースリークの可能性が……。