Characters.AddFieldEx 方法 (Visio)

將 Characters 物件所代表的文字取代為您指定之類別、程式代碼、格式、語言識別碼和行事曆標識元的新字位。

語法

表達式。AddFieldEx (Category、 Code、 Format、 LangID、 CalendarID)

表達 代表 Characters 物件的變數。

參數

名稱	必要/選用	資料類型	描述
類別	必要項目	VisFieldCategories	新欄位的類別。
代碼	必要項目	VisFieldCodes	新欄位的代碼。
Format	必要項目	VisFieldFormats	新欄位的格式。
LangID	選用	Long	要用於新欄位的語言。
CalendarID	選用	Long	新欄位所要使用的日曆

傳回值

無

註解

Category、Code 和 Format 的常數值分別由 Visio 類型庫在 VisFieldCategories、VisFieldCodes 和 VisFieldFormats 中宣告。

LangID 自變數應該是 Windows 用來編碼不同語言版本的標準標識碼之一。 例如，Microsoft Visio 美國版本的語言識別碼為 &H0409。 若要查看可能的語言識別碼之清單，請在 MSDN 上的 Microsoft Platform SDK 中搜尋 "VERSIONINFO"。

CalendarID 自變數應該是下列其中一個值，這些值是在 Visio 類型連結庫的 VisCellVals 中宣告。 預設值為 visCalWestern，會將日曆設為「西曆」。

常數	值	描述
visCalWestern	0	西方
visCalArabicHijri	1	阿拉伯回曆
visCalHebrewLunar	2	希伯來陰曆
visCalChineseTaiwan	3	中華民國曆
visCalJapaneseEmperor	4	日本天皇曆
visCalThaiBuddhism	5	泰曆
visCalKoreanDanki	6	朝鮮檀紀曆
visCalSakaEra	7	塞迦曆
visCalTranslitEnglish	8	英文音譯
visCalTranslitFrench	9	法文音譯

使用 AddFieldEx 方法就類似於按一下 [插入] 索引標籤上的 [欄位]，然後在文字中插入下列任何欄位類別：

• 日期/時間

• 文件資訊

• 幾何

• 物件資訊

• 頁面資訊

若要新增自定義公式字段，請使用 AddCustomField 或 AddCustomFieldU 方法。 當您未傳遞值 (或傳遞選擇性 LangID 和 CalendarID 自變數的預設值) 時， AddFieldEx 的運作方式與 AddField 完全相同。

範例

下列 Microsoft Visual Basic for Applications (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 支援與意見反應。