BeginConnected 属性

如果指定的连接符的起点已连接到了某一形状上，则该值为 True。MsoTriState 类型，只读。

expression   必需。该表达式返回“应用于”列表中的对象之一。

示例

如果 myDocument 上的第三个形状是连接符，且它的起点已连接到了某一形状上，本示例将把连接站点的编号存储到变量 oldBeginConnSite 中，把对所连接的形状的引用存储到对象变量 oldBeginConnShape 中，然后断开连接符的起点与形状的连接。

Set myDocument = Worksheets(1)
With myDocument.Shapes(3)
    If .Connector Then
        With .ConnectorFormat
            If .BeginConnected Then
                oldBeginConnSite = .BeginConnectionSite
                Set oldBeginConnShape = .BeginConnectedShape
                .BeginDisconnect
            End If
        End With
    End If
End With