Dim view As New Infragistics.Web.UI.DataSourceControls.DataView() ' 親のビューを追加します。 view.DataSourceID = Me.SqlDataSource1.ID view.ID = "Parent_DataSource_View1" Me.WebHierarchicalDataSource1.DataViews.Add(view) ' 子のビュー 1 を追加します。 view = New Infragistics.Web.UI.DataSourceControls.DataView() view.DataSourceID = Me.SqlDataSource2.ID view.ID = "Child_DataSource_View1" Me.WebHierarchicalDataSource1.DataViews.Add(view) ' 子のビュー 2 を追加します。 view = New Infragistics.Web.UI.DataSourceControls.DataView() view.DataSourceID = Me.SqlDataSource3.ID view.ID = "Child_DataSource_View2" Me.WebHierarchicalDataSource1.DataViews.Add(view) ' 最初の子の関係を親に追加します。 Dim dr As New Infragistics.Web.UI.DataSourceControls.DataRelation() dr.ParentDataViewID = "Parent_DataSource_View1" dr.ParentColumns = New String() {"RegionID"} dr.ChildDataViewID = "Child_DataSource_View1" dr.ChildColumns = New String() {"RegionID"} Me.WebHierarchicalDataSource1.DataRelations.Add(dr) ' 二番目の子の関係を親に追加します。 dr = New Infragistics.Web.UI.DataSourceControls.DataRelation() dr.ParentDataViewID = "Parent_DataSource_View1" dr.ParentColumns = New String() {"RegionID"} dr.ChildDataViewID = "Child_DataSource_View2" dr.ChildColumns = New String() {"RegionID"} Me.WebHierarchicalDataSource1.DataRelations.Add(dr)