vb.net - 如何在运行时从表单中删除所有图片框

Question

我已经动态创建了图片框，但我希望在程序稍后的运行时删除所有图片框。我尝试了以下vb代码：

Dim c As Control
For Each c In Form.Controls
    If TypeOf (c) Is PictureBox Then
        Form.Controls.Remove(PictureBox)
    End If
Next

此代码的问题PictureBox在于它不是命名对象。我只是想从表单中删除所有图片框。

标签： vb.net

Answer 1

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
    For Each ctrl In Me.Controls
        Dim pb = TryCast(ctrl, PictureBox)
        If pb IsNot Nothing Then
            Me.Controls.Remove(pb)
        End If
    Next
End Sub