全部显示

DatasheetFontWeight 属性

       

使用 DatasheetFontWeight 属性可以指定在“数据表”视图中显示字段名称和数据的字体的粗细。Integer 型,可读/写。

expression.DatasheetFontWeight

expression   必需。返回“Applies To”列表中的一个对象的表达式。

说明

DatasheetFontWeight 属性应用于“数据表”视图中的所有字段,以及“数据表”视图中的窗体的控件

该属性仅在 Microsoft Access 数据库 (.mdb) 中使用 Visual Basic 时才可用。

在 Visual Basic 中,DatasheetFontWeight 属性设置使用以下 Integer 值。

设置 说明
100
200 特细
300
400 (默认)正常
500 中等
600 半粗
700 加粗
800 特粗
900

以下设置信信息应用于 Access 数据库 (.mdb) 和 Access 项目 (.adp):

说明

下列表中包含了在 ADO Properties 集合中不存在的属性,除非使用了“格式(数据表)”工具栏来设置它们,或者使用 CreateProperty 可以在 Access 数据库中添加这些属性并将其追加到 DAO Properties 集合中。

DatasheetFontItalic* DatasheetForeColor*
DatasheetFontHeight* DatasheetBackColor
DatasheetFontName* DatasheetGridlinesColor
DatasheetFontUnderline* DatasheetGridlinesBehavior
DatasheetFontWeight* DatasheetCellsEffect

注意   当添加或设置任何带有星号的属性时,Microsoft Access 自动将所有带星号的属性添加到数据库的 Properties 集合中。

示例

以下示例将“Products”表在“数据表”视图的字体设置为 MS Serif,字号设置为 10 磅,字体粗细设置为中等 (500)。

为设置这些属性,该示例使用 SetTableProperty 过程,该过程在 DatasheetFontItalicDatasheetFontUnderline 属性示例中显示。

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

下一示例对“数据表”视图中打开的“Products”窗体进行与上例相同的更改。

Forms!Products.DatasheetFontName = "MS Serif"
Forms!Products.DatasheetFontHeight = 10
Forms!Products.DatasheetFontWeight = 500