显示层次结构记录集(代码)

来源:百度文库 编辑:神马文学网 时间:2024/04/28 04:41:18

显示层次结构记录集(代码)

[日期:2009-09-23] 来源:  作者: [字体:大 中 小]

 

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

' 创建 ConnectionString.Dim strCn As StringstrCn = "Provider=MSDataShape.1;Data Source=Nwind;" & _"Connect Timeout=15;Data Provider=MSDASQL"' 创建 Shape 命令.Dim strSh As StringstrSh = "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 = strShEnd With'  HflexGrid 控件的 DataSource 属性设置到 ' ADO Data 控件。Set HFlexGrid1.DataSource = Adodc1B