Метод Characters.AddFieldEx (Visio)
Заменяет текст, представленный объектом Characters , новым полем указанной категории, кода, формата, идентификатора языка и идентификатора календаря.
Синтаксис
expression. AddFieldEx (Category, Code, Format, LangID, CalendarID)
Выражение Переменная, представляющая объект Characters .
Параметры
| Имя | Обязательный или необязательный | Тип данных | Описание |
|---|---|---|---|
| Категория | Обязательный | VisFieldCategories | Категория для нового поля. |
| Code | Обязательный | VisFieldCodes | Код для нового поля. |
| Format | Обязательный | VisFieldFormats | Формат нового поля. |
| LangID | Необязательный | Long | Язык, используемый для нового поля. |
| CalendarID | Необязательный | Long | Календарь, используемый для нового поля. |
Возвращаемое значение
Отсутствует
Примечания
Значения констант для Category, Code и Format объявляются библиотекой типов Visio в VisFieldCategories, VisFieldCodes и VisFieldFormats соответственно.
Аргумент LangID должен быть одним из стандартных идентификаторов, используемых Windows для кодирования различных языковых версий. Например, идентификатор языка &H0409 для версии Microsoft Visio для США. Чтобы просмотреть список возможных идентификаторов языков, выполните поиск по запросу VERSIONINFO в пакете SDK microsoft Platform на сайте MSDN.
Аргумент CalendarID должен быть одним из следующих значений, объявленных в VisCellVals в библиотеке типов Visio. Значение по умолчанию — visCalWestern, которое задает для календаря западный календарь.
| Константа | Значение | Описание |
|---|---|---|
| visCalWestern | 0 | Западной |
| visCalArabicHijri | 1 | Арабский хидзири |
| visCalHebrewLunar | 2 | Иврит лунный |
| visCalChineseTaiwan | 3 | Календарь Тайваня |
| visCalJapaneseEmperor | 4 | Царствование японского императора |
| visCalThaiBuddhism | 5 | Тайский буддийский |
| visCalKoreanDanki | 6 | Корейский Danki |
| visCalSakaEra | 7 | Эра Сака |
| visCalTranslitEnglish | 8 | Транслитерация английского языка |
| visCalTranslitFrench | 9 | Транслитерация французского языка |
Использование метода AddFieldEx аналогично щелчку поля на вкладке Вставка и вставке в текст любой из следующих категорий полей:
Дата и время
Сведения о документе
Геометрия
Сведения об объекте
Сведения о странице
Чтобы добавить настраиваемое поле формулы, используйте метод AddCustomField или AddCustomFieldU . Если вы не передаете значения (или не передаете значения по умолчанию) для необязательных аргументов LangID и CalendarID , AddFieldEx действует точно так же, как AddField.
Пример
В следующем макросе Microsoft Visual Basic для приложений (VBA) показано, как использовать свойство AddFieldEx для форматирования поля даты в фигуре. Он рисует прямоугольник на странице документа, а затем вставляет поле с текущей датой на греческом языке, используя западный календарь.
Public Sub AddFieldEx_Example()
Dim vsoCharacters As Visio.Characters
Dim vsoShape As Visio.Shape
ActiveWindow.DeselectAll
Set vsoShape = Application.ActivePage.DrawRectangle(3, 5, 5, 3)
vsoShape.Text = "Date: "
Set vsoCharacters = vsoShape.Characters
'Set Begin property equal to End property to
'append new text to existing text.
vsoCharacters.Begin = vsoCharacters.End
'Add a field for the current date, in Greek,
'using the Western calendar and the long date format.
vsoCharacters.AddFieldEx visFCatDateTime, visFCodeCurrentDate, visFmtMsoDateLong, 1032, visCalWestern
End Sub
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.