format

功能：返回 Variant (String)

其中含有一個表達式，它是根據格式表達式中的指令來格式化的。

Format(expression[, format[, firstdayofweek[, firstweekofyear]]])

expression 必要參數。任何有效的表達式。

format 可選參數。有效的命名錶達式或用户自定義格式表達式。

firstdayofweek 可選參數。常數，表示一星期的第一天。

firstweekofyear 可選參數。常數，表示一年的第一週。

firstdayofweek 參數有下面設置：

常數 值 説明

vbUseSystem　0 使用 NLS API 設置。

VbSunday 1 星期日（缺省）

vbMonday　2 星期一

vbTuesday　3 星期二

vbWednesday　4　星期三

vbThursday　5　星期四

vbFriday 6 星期五

vbSaturday 7 星期六

firstweekofyear 參數有下面設置：

常數 值 説明

vbUseSystem 0 使用 NLS API 設置。

vbFirstJan1　1 從包含一月一日的那一週開始（缺省）。

vbFirstFourDays　2 從本年第一週開始，而此周至少有四天在本年中。

VbFirstFullWeek 3 從本年第一週開始，而此周完全在本年中。

數字 使用預先定義的命名數值格式或創建用户自定義數值格式。 日期和時間 使用預先定義的命名日期/時間格式或創建用户自定義日期/時間格式。 日期和時間序數 使用日期和時間格式或數值格式。 字符串 創建自定義的字符串格式。

如果在格式化數字時沒有指定 format，Format 會提供與 Str 函數類似的功能，儘管它是國際化的。然而，以 Format 作用在正數上不會保留正負號空間，而以 Str 的話則會。

如果要格式化一個沒有本地化的數值字符串，應該使用一個用户自定義的數值格式，以保證得到需要的外觀。

注意

如果 Calendar 屬性設置是Gregorian ，並且format 指定了日期格式，那麼，提供的 expression 必須是Gregorian 。如果Visual Basic Calendar 屬性設置是 Hijri，則提供的的 expression 必須是Hijri 。如果日曆是Gregorian，則 format 表達式的意義沒有改變。

如果日曆是Hijri ，則所有的日期格式符號（例如，dddd, mmmm, yyyy ）有相同的意義，這些意義只應用於Hijri 日曆。格式符號保持英文，用於文本顯示的符號（例如，AM 和PM ）顯示與該符號有關的字符串（英文或阿拉伯數字）。當日歷是Hijri 時，一些符號的範圍會改變。

MyTime 及 MyDate 在開發環境下，使用系統的短日期設置顯示出來的。

Dim MyTime, MyDate, MyStr

MyTime = #17:04:23#

MyDate = #January 27, 1993#

' 以系統設置的長時間格式返回當前系統時間。

MyStr = Format(Time, "Long Time")

' 以系統設置的長日期格式返回當前系統日期。

MyStr = Format(Date, "Long Date")

MyStr = Format(MyTime, "h:m:s") ' 返回 "17:4:23"。

MyStr = Format(MyTime, "hh:mm:ss AMPM") ' 返回 "05:04:23 PM"。

MyStr = Format(MyDate, "dddd, mmm d yyyy") ' 返回 "Wednesday, Jan 27 1993"。

' 如果沒有指定格式，則返回字符串。

MyStr = Format(23) ' 返回 "23"。

' 用户自定義的格式。

MyStr = Format(5459.4, "##,##0.00") ' 返回 "5,459.40"。

MyStr = Format(334。9, "###0.00") ' 返回 "334.90"。

MyStr = Format(5, "0.00%") ' 返回 "500.00%"。

MyStr = Format("HELLO", "＜") ' 返回 "hello"。

MyStr = Format("This is it", "＞") ' 返回 "THIS IS IT"。