Shape.Move 事件

项目
10/25/2012

，在形状中移动，发生。

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

语法

声明
<BrowsableAttribute(True)> _
Public Event Move As EventHandler

[BrowsableAttribute(true)]
public event EventHandler Move

[BrowsableAttribute(true)]
public:
 event EventHandler^ Move {
    void add (EventHandler^ value);
    void remove (EventHandler^ value);
}

[<BrowsableAttribute(true)>]
member Move : IEvent<EventHandler,
    EventArgs>

JScript 不支持事件。

备注

Move 事件发生时，才形状的位置更改有关其容器，则，在容器中移动时。

有关如何处理事件的更多信息，请参见使用事件。

示例

下面的示例演示如何在事件处理程序中响应 Move 事件。此示例要求您具有一个 OvalShape 控件 OvalShape1 的、名为在窗体的 RectangleShape1 的一个 RectangleShape 控件。

Private Sub OvalShape1_Move() Handles OvalShape1.Move
    Dim rect As New Rectangle
    ' Get the bounding rectangle for the rectangle shape.
    rect = RectangleShape1.DisplayRectangle
    ' Determine whether the bounding rectangles overlap.
    If rect.IntersectsWith(OvalShape1.DisplayRectangle) Then
        ' Bring the oval shape to the front.
        OvalShape1.BringToFront()
    End If
End Sub

private void ovalShape1_Move(object sender, System.EventArgs e)
{
    Rectangle rect = new Rectangle();
    // Get the bounding rectangle for the rectangle shape.
    rect = rectangleShape1.DisplayRectangle;
    // Determine whether the bounding rectangles overlap.
    if (rect.IntersectsWith(ovalShape1.DisplayRectangle))
    // Bring the oval shape to the front.
    {
        ovalShape1.BringToFront();
    }
}