返回介绍

LastChild 属性

发布于 2019-09-29 10:11:57 字数 1135 浏览 886 评论 0 收藏 0

返回一个 DiagramNode 对象,它代表父节点的最后一个子结点。

expression.LastChild

expression 必需。该表达式返回一个 DiagramNodeChildren 对象。

说明

使用 FirstChild 属性访问图表中的第一个子结点。使用 Root 属性访问图表中的父节点。

示例

本示例在当前文档中添加一个组织图表,添加三个节点,并将第一个和最后一个图表节点赋给变量。

Sub FirstChild()
    Dim shpDiagram As Shape
    Dim dgnRoot As DiagramNode
    Dim dgnFirstChild As DiagramNode
    Dim dgnLastChild As DiagramNode
    Dim intCount As Integer

    'Add organization chart to the current document
    Set shpDiagram = ThisDocument.Shapes.AddDiagram _
        (Type:=msoDiagramOrgChart, Left:=10, _
        Top:=15, Width:=400, Height:=475)

    'Add the first diagram node to the organization chart
    Set dgnRoot = shpDiagram.DiagramNode.Children.AddNode

    'Add three diagram child nodes under the first diagram node
    For intCount = 1 To 3
        dgnRoot.Children.AddNode
    Next

    'Assign the first and last child nodes to variables
    Set dgnFirstChild = dgnRoot.Children.FirstChild
    Set dgnLastChild = dgnRoot.Children.LastChild
End Sub

如果你对这篇内容有疑问,欢迎到本站社区发帖提问 参与讨论,获取更多帮助,或者扫码二维码加入 Web 技术交流群。

扫码二维码加入Web技术交流群

发布评论

需要 登录 才能够评论, 你可以免费 注册 一个本站的账号。
列表为空,暂无数据
    我们使用 Cookies 和其他技术来定制您的体验包括您的登录状态等。通过阅读我们的 隐私政策 了解更多相关信息。 单击 接受 或继续使用网站,即表示您同意使用 Cookies 和您的相关数据。
    原文