DatasheetFontHeight 屬性

全部顯示

使用 DatasheetFontHeight 屬性可以指定“數(shù)據(jù)表”視圖中顯示和打印字段名稱(chēng)和數(shù)據(jù)的字體的磅值大小。Integer 型，可讀／寫(xiě)。

expression.DatasheetFontHeight

expression     必需。返回“應(yīng)用于”列表中的一個(gè)對(duì)象的表達(dá)式。

說(shuō)明

該屬性?xún)H在 Microsoft Access 數(shù)據(jù)庫(kù) (.mdb) 中使用 Visual Basic 時(shí)才可用。

可以通過(guò)從“格式（數(shù)據(jù)表）”工具欄上的“字號(hào)”框中選擇字體大小來(lái)設(shè)置該屬性。

 

也可以通過(guò)在“數(shù)據(jù)表”視圖的“格式”菜單上單擊“字體”，在“字體”對(duì)話(huà)框的“字號(hào)”框中設(shè)置該屬性。

對(duì)于 DatasheetFontHeight 屬性，所指定的字號(hào)必須對(duì)由 DatasheetFontName 屬性所指定的字體有效。例如，MS Sans Serif 字體有效的字號(hào)只有 8、10、12、14、18 和 24 磅。

可以通過(guò)在“工具”菜單上單擊“選項(xiàng)”，使用“選項(xiàng)”對(duì)話(huà)框的“數(shù)據(jù)表”選項(xiàng)卡中“默認(rèn)字體”下的設(shè)置，設(shè)置默認(rèn)的 DatasheetFontHeight 屬性。

下表列出了 DAO Properties 集合中的部分屬性。這些屬性在用戶(hù)使用“格式（數(shù)據(jù)表）”工具欄對(duì)其進(jìn)行設(shè)置，或使用 CreateProperty 方法將這些屬性添加到 Access 數(shù)據(jù)庫(kù) (.mdb) 并將其追加到 DAO Properties 集合中之前不存在。

 

注釋  當(dāng)添加或設(shè)置任何帶有星號(hào)的屬性時(shí)，Microsoft Access 都會(huì)自動(dòng)將所有帶星號(hào)的屬性添加到數(shù)據(jù)庫(kù)的 Properties 集合中。

示例

以下示例將“產(chǎn)品”表在“數(shù)據(jù)表”視圖的字體設(shè)置為 MS Serif，字號(hào)設(shè)置為 10 磅，字體粗細(xì)設(shè)置為中等 (500)。

為設(shè)置這些屬性，該示例使用 SetTableProperty 過(guò)程，這一過(guò)程在 DatasheetFontItalic 和 DatasheetFontUnderline 屬性示例中顯示。

Dim dbs As Object, objProducts As Object

Set dbs = CurrentDb

Const DB_Text As Long = 10

Const DB_Integer As Long = 3

Set objProducts = dbs!Products

SetTableProperty objProducts, "DatasheetFontName", DB_Text, "MS Serif"

SetTableProperty objProducts, "DatasheetFontHeight", DB_Integer, 10

SetTableProperty objProducts, "DatasheetFontWeight", DB_Integer, 500

下一示例對(duì)“數(shù)據(jù)表”視圖中打開(kāi)的“產(chǎn)品”窗體進(jìn)行與上例相同的更改。

Forms!Products.DatasheetFontName = "MS Serif"

Forms!Products.DatasheetFontHeight = 10

Forms!Products.DatasheetFontWeight = 500