Visio) (Characters.AddFieldEx 方法

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

語法

運算式。AddFieldEx (類別、 代碼、 格式、 LangID、 CalendarID)

運算式 代表 Characters 物件的變數。

參數

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

傳回值

無

註解

類別、程式碼和格式的常數值分別由 Visio 類型程式庫在 VisFieldCategories、VisFieldCodes 和 VisFieldFormats 中宣告。

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

CalendarID 引數應該是下列其中一個值，這些值會在 Visio 型別程式庫的 VisCellVals 中宣告。 預設值為 visCalWestern，會將日曆設為「西曆」。

常數 值 描述
visCalWestern 0 西方
visCal阿拉伯文回曆文 1 阿拉伯回曆
visCalHebrewLunar 2 希伯來陰曆
visCal中文台灣 3 中華民國曆
visCalJapaneseEmperor 4 日本天皇曆
visCalThai佛教 5 泰曆
visCal韓文丹希 6 朝鮮檀紀曆
visCalSakaEra 7 塞迦曆
visCalTranslit英文 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 支援與意見反應。

  • 上次更新時間：