' 関係を作成します。 Dim dr As New Infragistics.Web.UI.DataSourceControls.DataRelation() ' 関係する親のビューを指定します。 dr.ParentDataViewID = "SqlDataSource_View1" ' 関係に使用するための親列を指定します。 dr.ParentColumns = New String() {"RegionID"} ' 関係する子のビューを指定します。 dr.ChildDataViewID = "SqlDataSource_View2" ' 関係に使用するための子列を指定します。 dr.ChildColumns = New String() {"RegionID"} ' WebHierarchicalDataSource に関係を追加します。 Me.WebHierarchicalDataSource1.DataRelations.Add(dr)