ShapeCollection.Remove 方法

项目
09/04/2008

更新：2007 年 11 月

命名空间： Microsoft.VisualBasic.PowerPacks
程序集： Microsoft.VisualBasic.PowerPacks.Vs（在 Microsoft.VisualBasic.PowerPacks.Vs.dll 中）

语法

声明
Public Sub Remove ( _
    value As Shape _
)
用法
Dim instance As ShapeCollection
Dim value As Shape

instance.Remove(value)

public void Remove(
    Shape value
)

public:
void Remove(
    Shape^ value
)

public function Remove(
    value : Shape
)

参数

value
类型：Microsoft.VisualBasic.PowerPacks.Shape

要从 ShapeCollection 中移除的 Shape。

备注

当从控件集合中移除 Shape 时，所有后续形状都在集合中向上移动一个位置。

还可以使用 RemoveAt 方法来移除单个 Shape，或者使用 Clear 方法来移除所有形状。

若要向集合中添加新的 Shape 对象，请使用 Add 或 AddRange 方法。

对继承者的说明：

在派生类中重写 Remove 时，一定要调用基类的 Remove 方法，以保证从集合中移除形状。

示例

下面的示例演示如何使用 Remove 方法从窗体中移除 Shape，但前提是该形状是窗体的 ShapeCollection 的成员。此示例要求窗体上至少有两个 OvalShape 控件。

Private Sub Form1_Click(ByVal sender As Object, _
 ByVal e As System.EventArgs) Handles Me.Click
    Dim canvas As ShapeContainer
    ' Get the ShapeContainer.
    canvas = OvalShape1.Parent
    ' If OvalShape2 is in the same collection, remove it.
    If canvas.Shapes.Contains(OvalShape2) Then
        canvas.Shapes.Remove(OvalShape2)
    End If
End Sub

private void form1_Click(object sender, System.EventArgs e)
{
    ShapeContainer canvas;
    // Get the ShapeContainer.
    canvas = ovalShape1.Parent;
    // If OvalShape2 is in the same collection, remove it.
    if (canvas.Shapes.Contains(ovalShape2))
    {
        canvas.Shapes.Remove(ovalShape2);
    }
}