ShapeContainer 构造函数

初始化 ShapeContainer 类的新实例。

命名空间:  Microsoft.VisualBasic.PowerPacks
程序集:  Microsoft.VisualBasic.PowerPacks.Vs(在 Microsoft.VisualBasic.PowerPacks.Vs.dll 中)

语法

声明
Public Sub New
public ShapeContainer()
public:
ShapeContainer()
new : unit -> ShapeContainer
public function ShapeContainer()

备注

使用 New 方法时,将创建行或形状在运行时,必须将其 Parent 属性设置为 ShapeContainer。 如果 ShapeContainer 为窗体或容器已存在,则应设置 Parent 属性设置为该 ShapeContainer。 如果 ShapeContainer 不存在,您可以创建 ShapeContainer 使用 New 方法并将其 Parent 属性设置为窗体或容器。

备注

注意不创建多每个窗体或容器中 ShapeContainer ;这样做可能引入意外行为。如果您添加一个设计时程 line 或 shape 控件添加到窗体或容器,在创建的编写代码以编程方式,应修改此代码使用设计器中创建的 ShapeContainer

示例

下面的示例检查现有 ShapeContainer 并将 OvalShape 控件的 Parent 属性创建在运行时使用 New 方法。

Private Sub Form1_Load() Handles MyBase.Load
    Dim NewOval As New OvalShape
    Dim i As Integer
    Dim found As Boolean
    ' Loop through the Controls collection.
    For i = 0 To Me.Controls.Count - 1
        ' If a ShapeContainer is found, make it the parent.
        If TypeOf Controls.Item(i) Is ShapeContainer Then
            NewOval.Parent = Controls.Item(i)
            found = True
            Exit For
        End If
    Next
    ' If no ShapeContainer is found, create one and set the parents.
    If found = False Then
        Dim sc As New ShapeContainer
        sc.Parent = Me
        NewOval.Parent = sc
    End If
    NewOval.Size = New Size(200, 300)
End Sub
private void form1_Load(System.Object sender, System.EventArgs e)
{
    OvalShape NewOval = new OvalShape();
    int i;
    bool found = false;
    // Loop through the Controls collection.
    for (i = 0; i < this.Controls.Count; i++)
    {
        // If a ShapeContainer is found, make it the parent.
        if (this.Controls[i] is ShapeContainer)
        {
            NewOval.Parent = ((ShapeContainer)this.Controls[i]);
            found = true;
            break;
        }
    }
    // If no ShapeContainer is found, create one and set the parents.
    if (found == false)
    {
        ShapeContainer sc = new ShapeContainer();
        sc.Parent = this;
        NewOval.Parent = sc;
    }
    NewOval.Size = new Size(200, 300);
}

.NET Framework 安全性

请参见

参考

ShapeContainer 类

Microsoft.VisualBasic.PowerPacks 命名空间

其他资源

Line 和 Shape 控件简介 (Visual Studio)

如何:使用 LineShape 控件绘制直线 (Visual Studio)

如何:使用 OvalShape 和 RectangleShape 控件绘制形状 (Visual Studio)