MSHFlexGrid 层次打印

最新推荐文章于 2025-05-20 18:44:14 发布

netcellsoft

最新推荐文章于 2025-05-20 18:44:14 发布

阅读量713

点赞数

文章标签： string

本文链接：https://blog.csdn.net/netcellsoft/article/details/3875647

版权

本文介绍了如何利用MSHFlexGrid控件展示层次结构记录集，通过数据环境设计器或ADO Data Control的Shape命令来创建层次结构记录。示例中展示了如何设置ConnectionString和Shape命令，以及如何将DataSource属性关联，以实现层次数据的显示。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

MSHFlexGrid 控件的一个主要特性是它能显示层次结构记录集—以层次结构方式显示的关系表。创建层次结构记录集的最容易的方法是使用数据环境设计器并把 MSHFlexGrid 控件的 DataSource 属性赋给数据环境。您也可以用 Shape 命令作为 ADO Data Control 的 RecordSource 在代码中创建层次结构记录，如下面的示例:

' 创建 ConnectionString.
Dim strCn As String
strCn = "Provider=MSDataShape.1;Data Source=Nwind;" & _
"Connect Timeout=15;Data Provider=MSDASQL"

' 创建 Shape 命令.
Dim strSh As String
strSh = "SHAPE {SELECT * FROM `Customers`} AS Customers " & _
"APPEND ({SELECT * FROM `Orders`} AS Orders RELATE " & _
"CustomerID TO CustomerID) AS Orders"

' 把 ConnectionString 赋给 ADO Data Control 的
' ConnectionString 属性, Shape 命令以及
' 控件的 RecordSource 属性.
With Adodc1
.ConnectionString = strCn
.RecordSource = strSh
End With
' 把 HflexGrid 控件的 DataSource 属性设置到
' ADO Data 控件。
Set HFlexGrid1.DataSource = Adodc1