Метод DataColumn.SetProperty (Visio)
Задает значение указанного свойства data-column.
Примечание.
Этот объект или элемент Visio доступен только лицензированным пользователям Visio профессиональный 2013.
Синтаксис
expression. SetProperty (Свойство, Значение)
Выражение Выражение, возвращающее объект DataColumn .
Параметры
Имя | Обязательный или необязательный | Тип данных | Описание |
---|---|---|---|
Свойство | Обязательный | VisDataColumnProperties | Свойство столбца данных, значение которого требуется задать. Возможные значения см. в разделе Примечания . |
Value (Значение) | Обязательный | Variant | Значение, присваиваемое свойству data-column. Возможные значения см. в разделе Примечания . |
Возвращаемое значение
Отсутствует
Примечания
При связывании фигур в документе Microsoft Visio с данными в наборе записей данных Visio сопоставляет столбцы в наборе данных со строками в разделе Данные фигуры электронной таблицы ShapeSheet, каждый из которых соответствует элементу данных фигуры.
Примечание.
В некоторых предыдущих версиях Visio данные фигур назывались пользовательскими свойствами.
Свойства столбцов данных сопоставляют столбцы данных с определенными ячейками в разделе Данные фигуры таблицы фигур. Например, передав методу SetProperty новое значение для свойства DisplayName , которое представлено перечисленным значением visDataColumnPropertyDisplayName, вы задаете значение ячейки Метка в разделе Данные фигуры таблицы фигур для определенного элемента данных фигуры.
Кроме того, установка этого свойства задает метку элемента данных фигуры в диалоговом окне Данные фигуры , а также имя столбца данных, отображаемого в окне Внешние данные в пользовательском интерфейсе Visio. Эти параметры соответствуют параметрам, которые можно задать в диалоговом окне Параметры столбца в пользовательском интерфейсе Visio (щелкните правой кнопкой мыши в окне Внешние данные и выберите параметры столбца), а также те, которые можно сделать в диалоговом окне Типы и единицы измерения для каждого столбца (щелкните Типы данных в диалоговом окне Параметры столбца ).
Возможные значения для параметра Property объявлены в VisDataColumnProperties и показаны в следующей таблице.
Константа | Значение | Описание |
---|---|---|
visDataColumnPropertyCalendar | 3 | Календарь свойства data-column. |
visDataColumnPropertyCurrency | 5 | Валюта свойства столбца данных. |
visDataColumnPropertyDisplayName | 6 | Отображаемое имя свойства столбца данных в пользовательском интерфейсе. |
visDataColumnPropertyHyperlink | 8 | Становится ли значение столбца данных гиперссылкой в пользовательском интерфейсе Visio при его связывании с фигурой. |
visDataColumnPropertyLangID | 2 | Идентификатор языка свойства столбца данных. |
visDataColumnPropertyType | 1 | Тип данных свойства data-column. |
visDataColumnPropertyUnits | 4 | Единицы свойства data-column. |
visDataColumnPropertyVisible | 7 | Отображается ли свойство data-column в пользовательском интерфейсе. |
Возможные значения для параметра Value зависят от значения параметра Property . В следующей таблице показаны допустимые значения свойств столбца данных для каждого свойства столбца данных в зависимости от типа данных столбца данных.
Свойство Data Column | Числовой | Дата | Валюта | Длительность | String. | Boolean. |
---|---|---|---|---|---|---|
Константа | visPropTypeNumber | visPropTypeDate | visPropTypeCurrency | visPropTypeDuration | visPropTypeString | visPropTypeBoolean |
Visible | Логический | Логический | Логический | Логический | Логический | Логический |
DisplayName | String | String | String | String | String | String |
LangID | Допустимый номер LCID | |||||
Валюта | Допустимая 3-буквная строка с константой валюты, используемая в функции CY в электронной таблице Таблицы фигур Visio. | |||||
Календарь | Один из членов VisCellVals в зависимости от значения LangID (см. таблицу ниже). | |||||
Units | Один из следующих членов VisUnitsCodes:
ИЛИ Описательная строка: строка, используемая для единиц измерения, например cm или sq cm. Эта строка будет проверена, чтобы она была одним из поддерживаемых единиц Visio. Передача недопустимых строк приводит к сбою метода. |
Один из следующих членов VisUnitsCodes:
ИЛИ Описательная строка: строка, используемая для таких единиц, как ew. Эта строка будет проверена, чтобы она была одним из поддерживаемых единиц Visio. Передача недопустимой строки приведет к сбою этого метода. |
||||
Гиперссылки | Boolean |
Свойства LangID и Calendar привязаны к правилам проверки, показанным в следующей таблице. Языки, которые не отображаются, используют только западный календарь.
Язык | Хирджи | Западной | Французский транслитерация | Транслитерация английского языка | Иврит лунный | Эра Сака | Летоисчисление по правлениям японских императоров | Корейский Danki | Тайский буддийский |
---|---|---|---|---|---|---|---|---|---|
Все арабские | x | x | x | x | |||||
Бенгла (Бангладеш) | x | x | |||||||
Дивехи | x | x | |||||||
Все английский | x | x | x | x | |||||
Персидский | x | x | |||||||
Иврит | x | x | |||||||
Хинди | x | x | |||||||
японский; | x | x | |||||||
Корейский | x | x | |||||||
Кашмири (арабский) | x | x | |||||||
Пенджаби (Пакистан) | x | x | |||||||
Пушту | x | x | |||||||
Синдхи | x | x | |||||||
Тайский | |||||||||
Урду | x | x | |||||||
Тамзайт | x | x |
Пример
В следующем макросе Microsoft Visual Basic для приложений (VBA) показано, как с помощью метода GetProperty получить значение ячейки Метка в разделе Данные фигуры для первого столбца в наборе записей данных, переданного методу, и отобразить его в окне Интерпретация. Затем он использует метод SetProperty , чтобы задать значение и отобразить новое значение. Изменение этого значения изменяет подпись данных фигуры в диалоговом окне Данные фигуры для всех фигур, связанных со строками в наборе записей данных.
Чтобы получить и задать значение ячейки Label, макрос передает значение visDataColumnPropertyDisplayName из перечисления VisDataColumnProperties в методы DataColumn.GetProperty и DataColumn.SetProperty .
Перед выполнением этого макроса создайте в проекте VBA хотя бы один набор записей данных, который будет передаваться в макрос.
Public Sub SetProperty_Example(vsoDataRecordset As Visio.DataRecordset)
Dim strPropertyName As String
Dim strNewName As String
Dim vsoDataColumn As Visio.DataColumn
strNewName = "New Property Name"
Set vsoDataColumn = vsoDataRecordset.DataColumns(1)
strPropertyName = vsoDataColumn.GetProperty(visDataColumnPropertyDisplayName)
Debug.Print strPropertyName
vsoDataColumn.SetProperty visDataColumnPropertyDisplayName, strNewName
strPropertyName = vsoDataColumn.GetProperty(visDataColumnPropertyDisplayName)
Debug.Print strPropertyName
End Sub
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.