訪問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鍵。
