Access VBA教程:ColumnHeadings属性

使用 ColumnHeadings属性可以指定在交叉表查询中列的显示顺序,或限制显示的列数。例如,在一个显示国家/地区名称的查询中,可能要以特定的顺序进行显示,例如,美国列第一、加拿大第二、英国第三。

设置

以字符串表达式的形式,输入作为交叉表查询列标题字段中的数据,输入顺序与列标题在交叉表查询的数据表中的显示顺序相同,并以逗号(或在 Windows“控制面板”中“区域设置”对话框中选定的分隔符)分隔。下表显示的是在交叉表查询的“数据表”视图中的 ColumnHeadings属性设置示例及相应结果。

设置示例 结果
"季度 1","季度 2","季度 3","季度 4" 显示每一季的列标题。
"墨西哥","加拿大","美国" 显示每一国家/地区的列标题。

可以使用查询的属性表来设置该属性。也可以在“查询”窗口的SQL 视图中设置该属性,或在 Visual Basic 中,使用SQL 语句中的 PIVOT 子句来对其进行设置。

注意   为 ColumnHeadings属性指定的列标题必须与查询设计网格中列标题字段的数值完全符合,否则列中将不显示相应数据。

说明

使用 ColumnHeadings属性可对交叉表查询中列标题外观进行更多的控制。默认情况下,Microsoft Access 将全部数据值作为列标题,按升序顺序显示。例如,如果列标题字段名为月,则默认的列标题显示为四月、八月、十二月、二月等等。使用 ColumnHeadings属性可以将适当设置赋予数据,然后以正确的顺序来显示它们:“一月”、“二月”、“三月”,依次类推。

如果 ColumnHeadings属性设置中含有列标题,即使该字段内没有数据,字段仍将显示在查询的“数据表”视图中。这对于基于交叉表查询的报表尤其有用。例如,有时需要在报表中始终显示相同的列标题。

提示   可以使用 ColumnHeadings属性来限制显示的列数,以便提高某些交叉表查询的速度。

示例

下面的示例在交叉表查询的“数据表”视图中创建四个列标题 (Qtr 1、Qtr 2、Qtr 3、Qtr 4),以显示产品的季度订单。在“查询”窗口的 SQL 视图中输入下列语句:


TRANSFORM Sum(CCur([Order Details].UnitPrice * [Order Details].Quantity * (1-[Discount])/100) * 100)
AS ProductAmount SELECT Products.ProductName FROM Products
INNER JOIN (Orders INNER JOIN [Order Details] ON Orders.OrderID = [Order Details].OrderID)
ON Products.ProductID = [Order Details].ProductID
WHERE (((Orders.ShippedDate) Between #1/1/94# And #12/31/94#))
GROUP BY Products.ProductName PIVOT "Qtr " & DatePart("q",[ShippedDate],1,0);

上页:Access VBA教程:ColumnCount属性 下页:Access VBA教程:ColumnHeads属性

Access VBA教程:ColumnHeadings属性

Access VBA教程:ColumnHeads属性 Access VBA教程:ColumnHidden属性
Access VBA教程:ColumnOrder属性 Access VBA教程:ColumnSpacing属性
Access VBA教程:ColumnWidth属性 Access VBA教程:ColumnWidths属性
Access VBA教程:COMAddIns属性 Access VBA教程:CommandBars属性
Access VBA教程:CommandBeforeExecute属性 Access VBA教程:CommandChecked属性
Access VBA教程:CommandEnabled属性 Access VBA教程:CommandExecute属性
Access VBA教程:CommitOnClose属性 Access VBA教程:CommitOnNavigation属性
Access VBA教程:Connection属性 Access VBA教程:ConnectionString属性
Access VBA教程:ControlBox属性 Access VBA教程:Controls属性
Access VBA教程:ControlSource属性 Access VBA教程:ControlTipText属性
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号