OvalShape 建構函式

發行項
05/16/2015

初始化 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;
}