Метод Shape.BreakLinkToData (Visio)

Статья
04/07/2023

Разрывает связь между фигурой и строкой данных, с которой она связана в указанном наборе записей данных.

Примечание.

Этот объект или элемент Visio доступен только лицензированным пользователям Visio профессиональный 2013.

Синтаксис

выражение. BreakLinkToData( _DataRecordsetID_ )

Выражение Выражение, возвращающее объект Shape .

Параметры

Имя	Обязательный или необязательный	Тип данных	Описание
DataRecordsetID	Обязательный	Long	Идентификатор набора записей данных, содержащего строку данных, с чем связана фигура.

Возвращаемое значение

Отсутствует

Примечания

Разрыв связи между фигурой и строкой данных не удаляет данные фигуры (которые в некоторых предыдущих версиях Visio называются пользовательскими свойствами) из фигуры, а также не удаляет ни графические данные, связанные с фигурой.

Пример

В следующем макросе Microsoft Visual Basic для приложений (VBA) показано, как использовать метод BreakLinkToData для разрыва связи между фигурой и строкой данных в наборе записей данных.

Перед выполнением этого макроса поместите фигуру на страницу, добавьте по крайней мере один набор записей данных в коллекцию DataRecordsets документа и используйте любой метод связывания, чтобы связать фигуру со строкой данных в наборе записей данных, который вы недавно добавили в коллекцию. Кроме того, можно связать фигуру со строкой данных, перетащив строку из окна внешних данных на фигуру в пользовательском интерфейсе Visio. Затем выберите связанную фигуру.

Public Sub BreakLinkToData_Example() 
 
    Dim vsoDataRecordset As Visio.DataRecordset 
    Dim vsoShape As Visio.Shape 
    Dim intCount As Integer 
         
    intCount = Visio.ActiveDocument.DataRecordsets.Count 
    Set vsoDataRecordset = Visio.ActiveDocument.DataRecordsets(intCount) 
     
    Set vsoShape = ActiveWindow.Selection.PrimaryItem 
    vsoShape.BreakLinkToData (vsoDataRecordset.ID) 
    
End Sub

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.

Поделиться через