HtmlElement.CanHaveChildren 屬性

public:
 property bool CanHaveChildren { bool get(); };

public bool CanHaveChildren { get; }

member this.CanHaveChildren : bool

Public ReadOnly Property CanHaveChildren As Boolean

屬性值

true若元素可以有子元素;否則，。 false

範例

以下程式碼範例處理 Click 的 HtmlDocument事件。 如果某元素之前未用滑鼠點擊選取，程式碼會將該元素指派到一個名為 MoveElement的私有類別變數。 如果選取了元素，程式碼會嘗試將其附加到剛點擊的元素上。 此程式碼範例要求你的應用程式承載一個WebBrowser名為 WebBrowser1的控制項，且你已為該Click事件新增事件處理HtmlDocument程序。

HtmlDocument doc;
HtmlElement moveElement;

private void EnableElementMove()
{
    if (webBrowser1 != null)
    {
        doc = webBrowser1.Document;
        doc.Click += new HtmlElementEventHandler(doc_Click);
    }
}

void doc_Click(object sender, HtmlElementEventArgs e)
{
    if (moveElement == null)
    {
        moveElement = webBrowser1.Document.GetElementFromPoint(e.ClientMousePosition);
    }
    else
    {
        HtmlElement targetElement = webBrowser1.Document.GetElementFromPoint(e.ClientMousePosition);
        if (targetElement.CanHaveChildren)
        {
            targetElement.AppendChild(moveElement);
            moveElement = null;
        }
    }
}

Dim WithEvents Doc As HtmlDocument
Dim MoveElement As HtmlElement

Private Sub EnableElementMove()
    If (WebBrowser1 IsNot Nothing) Then
        Doc = WebBrowser1.Document
    End If
End Sub

Private Sub Document_Click(ByVal sender As Object, ByVal args As HtmlElementEventArgs) Handles Doc.Click
    If (MoveElement Is Nothing) Then
        MoveElement = WebBrowser1.Document.GetElementFromPoint(args.ClientMousePosition)
    Else
        With WebBrowser1.Document
            Dim TargetElement As HtmlElement = .GetElementFromPoint(args.ClientMousePosition)
            If (TargetElement.CanHaveChildren) Then

                TargetElement.AppendChild(MoveElement)
                MoveElement = Nothing
            End If
        End With
    End If
End Sub

備註

有些元素，如 IMG 和 SCRIPT，無法有子元素。 在你叫前AppendChildInsertAdjacentElement或對任意元素使用這個特性。