OvalShape 构造函数

项目
10/25/2012

初始化 OvalShape 类的新实例。

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

语法

声明
Public Sub New

public OvalShape()

public:
OvalShape()

new : unit -> OvalShape

public function OvalShape()

备注

OvalShape 控件直接在窗体或容器控件无法显示;必须在 ShapeContainer 对象包含它。在初始化 OvalShape后，必须将其 Parent 属性设置为现有 ShapeContainer 或到 ShapeContainer的新实例。

示例

下面的示例创建 ShapeContainer 和 OvalShape，将其添加到窗体中，并显示圆形。

Private Sub DrawCircle()
    Dim canvas As New Microsoft.VisualBasic.PowerPacks.ShapeContainer
    Dim oval1 As New Microsoft.VisualBasic.PowerPacks.OvalShape
    ' Set the form as the parent of the ShapeContainer.
    canvas.Parent = Me
    ' Set the ShapeContainer as the parent of the OvalShape.
    oval1.Parent = canvas
    ' Set the location and size of the circle.
    oval1.Left = 10
    oval1.Top = 10
    oval1.Width = 100
    oval1.Height = 100
End Sub

private void DrawCircle1()
{
    Microsoft.VisualBasic.PowerPacks.ShapeContainer canvas = 
        new Microsoft.VisualBasic.PowerPacks.ShapeContainer();
    Microsoft.VisualBasic.PowerPacks.OvalShape oval1 = 
        new Microsoft.VisualBasic.PowerPacks.OvalShape();
    // Set the form as the parent of the ShapeContainer.
    canvas.Parent = this;
    // Set the ShapeContainer as the parent of the OvalShape.
    oval1.Parent = canvas;
    // Set the location and size of the circle.
    oval1.Left = 10;
    oval1.Top = 10;
    oval1.Width = 100;
    oval1.Height = 100;
}