HierarchicalFlexGrid控件

　　　　访问HierarchicalFlexGrid控件
　　　　要在VisualBasic中安装并访问HierarchicalFlexGrid控件，请使用以下步骤。
　　　　要安装和访问HierarchicalFlexGrid控件
　　　　1.在“工程”菜单中，选择“部件”。出现“部件”对话框。
　　　　2.在“控件”选项卡中，选择“MicrosoftHierarchicalFlexGridControl6.0”，然后单击“确定”。MSHFlexGrid控件被添加到VisualBasic工具箱中。
　　　　3.在VisualBasic工具箱中，单击MSHFlexGrid控件，然后将其拖到一个VisualBasic窗体上。
　　　　　-或者-
　　　　　在VisualBasic工具箱上，双击MSHFlexGrid控件，将其添加到窗体上。

　　　　将数据绑定到HierarchicalFlexGrid
　　　　在开始使用它的功能之前，必须先将数据绑定到HierarchicalFlexGrid。要将数据绑定到控件，可以使用VisualBasic新的DataBindingManager，或者通过编程实现。
　　　　在将HierarchicalFlexGrid绑定到数据源之后，HierarchicalFlexGrid在设计时屏幕显示是一个空白列和一个空白行。字段和带区信息不是自动提取的（要获得此类信息，请参阅取得结构信息）。如果HierarchicalFlexGrid在没有字段和带区信息的情况下运行，那么在显示数据的时候将使用缺省的属性设置。就是说，如果HierarchicalFlexGrid被绑定到一个分层结构的Command，那么显示出的数据带区将是水平排列的，每个带区中包含一列，分别对应于Recordset中的每一个字段。
　　　　绑定到数据源的HierarchicalFlexGrid

　　　　使用VisualBasicDataBindingManager将数据绑定到HierarchicalFlexGrid
　　　　本节说明如何使用VisualBasicDataBindingManager将数据绑定到HierarchicalFlexGrid。DataBindingManager提供了一种便于进行数据绑定的用户界面。
　　　　使用VisualBasicDataBindingManager设置DataSource
　　　　1.为HierarchicalFlexGrid创建数据源。数据源可以是DataEnvironment对象或者ActiveXDataControl，或者是一种新的VisualBasic功能。在本例中，将数据源创建为DataEnvironment对象。
　　　　2.在VisualBasic工具箱上，单击MSHFlexGrid控件，然后将其拖到一个VisualBasic窗体上。
　　　　　-或者-
　　　　　在VisualBasic工具箱上，双击MSHFlexGrid控件将其拖到一个VisualBasic窗体上。
　　　　3.在VisualBasic“属性”窗口中，将DataSource属性设置为包含了希望被绑定到HierarchicalFlexGrid的Command对象的DataEnvironment对象。
　　　　警告如果DataSource被重新设置，HierarchicalFlexGrid单元格中的所有用户定义的、修改过的数据都将被丢失。4.在VisualBasic“属性”窗口中，将DataMember属性设置为DataEnvironment中的一个Command对象。如果希望在HierarchicalFlexGrid中查看分层结构的数据，那么必须指定Command分层结构中最顶部的父Command对象作为DataMember。
　　　　5.要查看HierarchicalFlexGrid中的数据，请在“运行”菜单中选择“开始”。
　　　　　-或者-
　　　　　按下F5键。

　　　　以编程方式将数据绑定到HierarchicalFlexGrid
　　　　本节描述如何以编程方式将数据绑定到HierarchicalFlexGrid。要以编程方式设置DataSource
　　　　1.在VisualBasic工具箱中，双击MSHFlexGrid控件，将其放在一个VisualBasic窗体上。
　　　　2.右击该HierarchicalFlexGrid，然后从快捷菜单中选择“查看代码”。出现“代码编辑器”窗口。
　　　　3.在Form_Load事件中，添加代码来创建一个ADORecordset并将其赋予HierarchicalFlexGrid。该代码将在下面的分步骤中提供。
　　　　注意要以编程方式设置数据源，工程中必须要有指向MicrosoftActiveXDataObjects的引用：在“工程”菜单中，选择“引用”，然后选择“MicrosoftActiveXDataObjects2.0Library”。
　　　　插入下列代码，创建一个ADOConnection和Recordset，请根据实际情况替换其中的注释（例如，将<myDataSource>替换为数据源的实际名称）：
　　　　DIMCnAsNewConnection,RsAsNewRecordset

　　　　'你需要将<myDataSource>替换为你的系统
　　　　'中的一个有效的DSN。
　　　　Cn.ConnectionString="DSN=<myDataSource>"

　　　　'使用下列代码用于SHAPECommands
　　　　Cn.Provider="MSDataShape"
　　　　Cn.CursorLocation=adUseNone

　　　　'第二种办法，对于SQLCommands可使用下列代码
　　　　Cn.CursorLocation=adUseNone
　　　　Cn.Open
　　　　'需要为上面创建的Connection的Recordsets指定
　　　　'有效的数据源

　　　　Rs.Source="<validSQLSELECTcommand>"
　　　　'现在将Command与Connection关联
　　　　'起来并执行它们。
　　　　SetRs.ActiveConnection=Cn
　　　　Rs.Open

　　　　插入下面的代码，将Rs中打开的Recordset赋予HierarchicalFlexGrid：
　　　　SetMSHFlexGrid1.DataSource=Rs
　　　　4.要查看HierarchicalFlexGrid中的数据，请在“运行”菜单中选择“开始”。
　　　　　-或者-
　　　　　按下F5键。