Format 屬性
內(nèi)容
可以使用 Format 屬性自定義數(shù)字、日期、時(shí)間和文本的顯示方式。String 型，可讀/寫。
expression.Format
expression 必需。返回“應(yīng)用于”列表中的一個(gè)對(duì)象的表達(dá)式。
說明
可以使用預(yù)定義的格式，或者可以使用格式符號(hào)創(chuàng)建自定義格式。
Format 對(duì)不同的數(shù)據(jù)類型使用不同的設(shè)置。有關(guān)特定數(shù)據(jù)類型的信息，請(qǐng)參見以下主題：
對(duì)于控件，可以在控件的屬性表中設(shè)置該屬性。對(duì)于字段，可以在表“設(shè)計(jì)”視圖（“字段屬性”節(jié)中）或“查詢”窗口的“設(shè)計(jì)”視圖中（“字段屬性”的屬性表中）設(shè)置該該屬性。也可以使用宏或 Visual Basic。
注釋 在 Visual Basic 中，可輸入對(duì)應(yīng)預(yù)定義格式的子符串表達(dá)式或者輸入自定義格式。
Format 屬性只影響數(shù)據(jù)的顯示方式，不影響數(shù)據(jù)的存儲(chǔ)方式。
Microsoft Access 為“時(shí)間/日期”、“數(shù)字”和“貨幣”、“文本”和“備注”和“是/否”數(shù)據(jù)類型提供預(yù)定義格式。預(yù)定義格式與國(guó)家/地區(qū)設(shè)置（通過雙擊 Windows“控制面板”中的“區(qū)域設(shè)置”設(shè)定）有關(guān)。Microsoft Access 顯示對(duì)應(yīng)于所選國(guó)家/地區(qū)的格式。例如，如果在“常規(guī)”選項(xiàng)卡中選取“英語（美國(guó)）”，則 1234.56 的“貨幣”格式是 $1,234.56，如果在“常規(guī)”選項(xiàng)卡中選取“英語（英國(guó)）”，該數(shù)字將顯示為 ￡1,234.56。
如果在表“設(shè)計(jì)”字視圖中設(shè)置字段的 Format 屬性，Microsoft Access 使用該格式在數(shù)據(jù)表中顯示數(shù)據(jù)。對(duì)窗體和報(bào)表上的新控件也應(yīng)用字段的 Format 屬性。
在任意數(shù)據(jù)類型的自定義格式中都可以使用以下符號(hào)：
符號(hào) |
意義 |
空格 |
將空格顯示為原義字符。 |
"ABC" |
將雙引號(hào)內(nèi)的字符顯示為原義字符。 |
! |
實(shí)施左對(duì)齊而不是右對(duì)齊。 |
* |
用下一個(gè)字符填滿可用的空格。 |
\ |
將下一個(gè)字符顯示為原義字符。也可以通過在左右放置雙引號(hào)的方式將其顯示為原義字符。 |
[color] |
在方括號(hào)之間用指定顏色顯示已設(shè)置了格式的數(shù)據(jù)?？捎玫念伾校汉?、蘭、綠、青、紅、紫紅、黃、白。 |
不能將“數(shù)字”和“貨幣”型的數(shù)據(jù)類型的自定義格式符號(hào)與“日期/時(shí)間”、“是/否”或“文本”和“備注”格式符號(hào)混合使用。
如果在數(shù)據(jù)上定義了輸入掩碼同時(shí)又設(shè)置了 Format 屬性，在顯示數(shù)據(jù)時(shí)，Format 屬性將優(yōu)先，而忽略輸入掩碼。例如，如果在表“設(shè)計(jì)”視圖中創(chuàng)建了“密碼”輸入掩碼，同時(shí)又為字段設(shè)置了 Format 屬性，則無論是在表或在窗體上的控件中，數(shù)據(jù)都將根據(jù) Format 屬性來顯示，而“密碼”輸入掩碼則被忽略。
示例
以下三個(gè)示例通過使用預(yù)定義的格式來設(shè)置 Format 屬性：
Me!Date.Format = "Medium Date"
Me!Time.Format = "Long Time"
Me!Registered.Format = "Yes/No"
以下示例通過使用自定義格式來設(shè)置 Format 屬性。這個(gè)格式所顯示的日期為：Jan 1995。
Forms!Employees!HireDate.Format = "mmm yyyy"
以下示例展示了一個(gè) Visual Basic 函數(shù)，這個(gè)函數(shù)使用 Currency 格式來設(shè)置數(shù)字型數(shù)據(jù)的格式，并將整個(gè)文本數(shù)據(jù)變?yōu)榇髮?。該函?shù)在一個(gè)名為 TaxRefund 的未綁定控件的 OnLostFocus 事件中調(diào)用。
Function FormatValue() As Integer
Dim varEnteredValue As Variant
varEnteredValue = Forms!Survey!TaxRefund.Value
If IsNumeric(varEnteredValue) = True Then
Forms!Survey!TaxRefund.Format = "Currency"
Else
Forms!Survey!TaxRefund.Format = ">"
End If
End Function