DatasheetFontWeight 屬性
內(nèi)容
使用 DatasheetFontWeight 屬性可以指定在“數(shù)據(jù)表”視圖中顯示字段名稱和數(shù)據(jù)的字體的粗細(xì)。Integer 型，可讀/寫(xiě)。
expression.DatasheetFontWeight
expression 必需。返回“應(yīng)用于”列表中的一個(gè)對(duì)象的表達(dá)式。
說(shuō)明
DatasheetFontWeight 屬性應(yīng)用于“數(shù)據(jù)表”視圖中的所有字段，以及“數(shù)據(jù)表”視圖中的窗體的控件。
該屬性僅在 Microsoft Access 數(shù)據(jù)庫(kù) (.mdb) 中使用 Visual Basic 時(shí)才可用。
在 Visual Basic 中，DatasheetFontWeight 屬性設(shè)置使用以下 Integer 值。
設(shè)置 |
說(shuō)明 |
100 |
淡 |
200 |
特細(xì) |
300 |
細(xì) |
400 |
（默認(rèn)）正常 |
500 |
中等 |
600 |
半粗 |
700 |
加粗 |
800 |
特粗 |
900 |
濃 |
以下設(shè)置信信息應(yīng)用于 Access 數(shù)據(jù)庫(kù) (.mdb) 和 Access 項(xiàng)目 (.adp)：
| ? | 可以在“數(shù)據(jù)表”視圖中單擊“格式”菜單上的“字體”，在“字體”對(duì)話框中將該屬性設(shè)置為“正?！焙汀凹哟帧?。在“字體”對(duì)話框中的“字型”框中，只有“常用”（相當(dāng)于“正常”）和“加粗”兩種字體粗細(xì)設(shè)置。 |
| ? | 另一種僅設(shè)置“常用”和“加粗”的方法是在“格式（數(shù)據(jù)表）”工具欄上單擊“加粗”。 |
| ? | 可以通過(guò)在“工具”菜單上單擊“選項(xiàng)”，使用“選項(xiàng)”對(duì)話框的“數(shù)據(jù)表”選項(xiàng)卡中“默認(rèn)字體”下的設(shè)置，設(shè)置默認(rèn)的 DatasheetFontWeight 屬性。 |
說(shuō)明
下表包含了 DAO Properties 集合中的部分屬性，這些屬性在用戶使用“格式（數(shù)據(jù)表）”工具欄來(lái)對(duì)其進(jìn)行設(shè)置，或使用 CreateProperty 方法在 Access 數(shù)據(jù)庫(kù)中添加這些屬性并將其追加到 DAO Properties 集合中之前不存在。
注釋 當(dāng)添加或設(shè)置任何帶有星號(hào)的屬性時(shí)，Microsoft Access 會(huì)自動(dòng)將所有帶星號(hào)的屬性添加到數(shù)據(jù)庫(kù)的 Properties 集合中。
示例
以下示例將“Products”表在“數(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)的“Products”窗體進(jìn)行與上例相同的更改。
Forms!Products.DatasheetFontName = "MS Serif"
Forms!Products.DatasheetFontHeight = 10
Forms!Products.DatasheetFontWeight = 500