Format 屬性

此頁沒有內(nèi)容條目
內(nèi)容

expandtri全部顯示

可以使用 Format 屬性自定義數(shù)字、日期、時間和文本的顯示方式。String 型,可讀/寫。

expression.Format

expression     必需。返回“應用于”列表中的一個對象的表達式。

說明

可以使用預定義的格式,或者可以使用格式符號創(chuàng)建自定義格式。

Format 對不同的數(shù)據(jù)類型使用不同的設置。有關(guān)特定數(shù)據(jù)類型的信息,請參見以下主題:

?“時間/日期”數(shù)據(jù)類型

 

?“數(shù)字”和“貨幣”數(shù)據(jù)類型

 

?“文本”和“備注”數(shù)據(jù)類型

 

?“是/否”數(shù)據(jù)類型

對于控件,可以在控件的屬性表中設置該屬性。對于字段,可以在表“設計”視圖(“字段屬性”節(jié)中)或“查詢”窗口的“設計”視圖中(“字段屬性”的屬性表中)設置該該屬性。也可以使用Visual Basic。

注釋  在 Visual Basic 中,可輸入對應預定義格式的子符串表達式或者輸入自定義格式。

Format 屬性只影響數(shù)據(jù)的顯示方式,不影響數(shù)據(jù)的存儲方式。

Microsoft Access 為“時間/日期”、“數(shù)字”和“貨幣”、“文本”和“備注”和“是/否”數(shù)據(jù)類型提供預定義格式。預定義格式與國家/地區(qū)設置(通過雙擊 Windows“控制面板”中的“區(qū)域設置”設定)有關(guān)。Microsoft Access 顯示對應于所選國家/地區(qū)的格式。例如,如果在“常規(guī)”選項卡中選取“英語(美國)”,則 1234.56 的“貨幣”格式是 $1,234.56,如果在“常規(guī)”選項卡中選取“英語(英國)”,該數(shù)字將顯示為 £1,234.56。

如果在表“設計”字視圖中設置字段的 Format 屬性,Microsoft Access 使用該格式在數(shù)據(jù)表中顯示數(shù)據(jù)。對窗體和報表上的新控件也應用字段的 Format 屬性。

在任意數(shù)據(jù)類型的自定義格式中都可以使用以下符號:

符號

意義

空格

將空格顯示為原義字符。

"ABC"

將雙引號內(nèi)的字符顯示為原義字符。

!

實施左對齊而不是右對齊。

*

用下一個字符填滿可用的空格。

\

將下一個字符顯示為原義字符。也可以通過在左右放置雙引號的方式將其顯示為原義字符。

[color]

在方括號之間用指定顏色顯示已設置了格式的數(shù)據(jù)??捎玫念伾校汉凇⑻m、綠、青、紅、紫紅、黃、白。

 

不能將“數(shù)字”和“貨幣”型的數(shù)據(jù)類型的自定義格式符號與“日期/時間”、“是/否”或“文本”和“備注”格式符號混合使用。

如果在數(shù)據(jù)上定義了輸入掩碼同時又設置了 Format 屬性,在顯示數(shù)據(jù)時,Format 屬性將優(yōu)先,而忽略輸入掩碼。例如,如果在表“設計”視圖中創(chuàng)建了“密碼”輸入掩碼,同時又為字段設置了 Format 屬性,則無論是在表或在窗體上的控件中,數(shù)據(jù)都將根據(jù) Format 屬性來顯示,而“密碼”輸入掩碼則被忽略。

示例

以下三個示例通過使用預定義的格式來設置 Format 屬性:

Me!Date.Format = "Medium Date"

Me!Time.Format = "Long Time"

Me!Registered.Format = "Yes/No"

以下示例通過使用自定義格式來設置 Format 屬性。這個格式所顯示的日期為:Jan 1995。

Forms!Employees!HireDate.Format = "mmm yyyy"

以下示例展示了一個 Visual Basic 函數(shù),這個函數(shù)使用 Currency 格式來設置數(shù)字型數(shù)據(jù)的格式,并將整個文本數(shù)據(jù)變?yōu)榇髮?。該函?shù)在一個名為 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