全部显示

DatasheetFontHeight 属性

       

使用 DatasheetFontHeight 属性可以指定“数据表”视图中显示和打印字段名称和数据的字体的值大小。Integer 型,可读/写。

expression.DatasheetFontHeight

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

说明

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

可以通过从“格式”(数据表)工具栏上的“字号”框中选择字体大小,设置该属性。

也可以通过在“格式”菜单上单击“字体”,在“字体”对话框中的“字号”框设置该属性。

对于 DatasheetFontHeight 属性,所指定的字号必须对由 DatasheetFontName 属性所指定的字体有效。例如,MS Sans Serif 字体有效的字号只有 8、10、12、14、18 和 24 磅。

可以通过在“工具”菜单上单击“选项”,使用“选项”对话框的“数据表”选项卡中“默认字体”下的设置,设置默认的 DatasheetFontHeight 属性。

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

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

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

示例

以下示例将“产品”表在“数据表”视图的字体设置为 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

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

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