Visio) (Application.FormatResultEx 方法

根據格式圖片將字串或數字格式化成為字串；使用指定的單位來進行縮放及格式化。 若為日期或時間字串，亦可選擇設定該字串的語言及行事曆類型。

語法

運算式。FormatResultEx (StringOrNumber， UnitsIn， UnitsOut， Format， LangID， CalendarID)

expression 代表 Application 物件的變數。

參數

名稱 必要/選用 資料類型 描述
StringOrNumber 必要 Variant 要格式化的字串或數字；可以傳遞為字串、浮點數或整數。
UnitsIn 必要 Variant 歸類至 StringOrNumber 所用的度量單位。
UnitsOut 必要 Variant 表示結果所用的度量單位。
Format 必要 字串 結果字串外觀的圖片。
LangID 選用 Long 用於結果字串的語言。
CalendarID 選用 Long 用於結果字串的行事曆。 預設值為西曆， visCalWestern。

傳回值

字串

註解

如果是以字串的形式傳遞，則 StringOrNumber 可能是儲存格的公式或預期的公式，或是以字串表示之儲存格的結果或預期結果。 FormatResultEx 方法會評估此字串，並格式化所產生的結果。 由於此字串是在特定儲存格的公式內容之外進行評估，所以如果此字串有包含任何儲存格參考，則 FormatResultEx 方法會傳回錯誤。

StringOrNumber 可能的值包括：

  • 1.7
  • 3
  • "2.5"
  • "4.1 cm"
  • "12 ft - 17 in + (12 cm / SQRT(7))"

當 UnitsIn 為 visDate 時，您可以將數值傳遞給 StringOrNumber 中的 DATETIME 函數。 您傳遞之值的整數部分應代表自 1899 年 12 月 30 日起的天數，而小數部分應代表自午夜起一天的分數。 例如，38135.50 代表 2004 年 5 月 28 日中午。

UnitsIn 和 UnitsOut 引數可以是字串，例如 “inches”、“inch”、“in.” 或 “i”。 字串可用於所有支援的 Microsoft Visio 單位，例如公分、公尺、英哩等等。 您也可以在 VisUnitCodes 中使用 Visio 型別程式庫所宣告的任何單位常數。 有效單位的清單也會包含在 [關於測量單位] 中。

如果 StringOrNumber 是字串，則 UnitsIn 會指定如何解譯評估結果，而且只會在結果為純量時使用。 例如，運算式 "4 * 5 cm" 評估為 20 公分，這不是純量，因此會忽略 UnitsIn 。 運算式 "4 * 5" 評估為 20，這是純量，並會使用指定的 UnitsIn 來解譯。

UnitsOut 引數會指定傳回字串的表示單位。 如果您希望結果以與評估運算式相同的單位來表示，請傳遞 “NOCAST” 或 visNoCast。

Format 是一個字串，會指定由 FormatResultEx 方法所產生的範本或字串的圖片。 如需詳細資訊，請參閱 FORMAT 函數。 以下列出一些可能的情況：

  • # - 輸出單一數字，但如果它是前置或後置 0，則不會輸出。

  • 0 - 輸出單一數字，即使它是前置或後置 0。

  • . - 十進位預留位置。

  • , - 千分位分隔符號。

  • "text" or 'text' - 依原樣輸出包含的文字。

  • \c - 輸出字元 c。

當 UnitsIn 為 visDate 時， 格式 應該是自訂的 Microsoft Visio 展開表單日期/時間格式之一，其格式為 “{{date/time format picture}}”。 您可以在 Visio 中 [資料格式] 對話方塊的 [自訂格式] 方塊中檢視這些格式， (選取圖形，然後在 [插入] 索引標籤上選擇 [欄位]。在 [類別] 清單中，選擇 [日期/時間]，然後選擇 [資料格式) ]。

LangID 引數為選用。 如果您未指定值，Visio 會使用目前的系統語言。 如果您傳遞值， LangID 引數應該是 Windows 用來編碼不同語言版本的其中一個標準識別碼。 例如，1033 是英文 (美國) 的語言識別碼。 若要查看可能的語言識別碼清單，請參閱語言 識別碼常數和字串。

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

常數 值 描述
visCalWestern 0 西方
visCal阿拉伯文回曆文 1 阿拉伯回曆
visCalHebrewLunar 2 希伯來陰曆
visCal中文台灣 3 中華民國曆
visCalJapaneseEmperor 4 日本天皇曆
visCalThai佛教 5 泰曆
visCal韓文丹希 6 朝鮮檀紀曆
visCalSakaEra 7 塞迦曆
visCalTranslit英文 8 英文音譯
visCalTranslitFrench 9 法文音譯

範例

下列範例示範如何使用 FormatResultEx 屬性以希臘文格式化日期，並將它顯示為圖形文字。

Public Sub FormatResultEx_Example 
 
 Dim vsoShape As Visio.Shape 
 Dim strDate As String 
 
 Set vsoShape = ActivePage.DrawOval (3, 5, 5, 9) 
 strDate = Application.FormatResultEx (37663.50, visDate, "", "{{dd MMMM yyyy}}", 1032, 0) 
 
 vsoShape.Text = strDate 
 
End Sub

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。

  • Last updated on