Dim dr As New Infragistics.Web.UI.DataSourceControls.DataRelation() ' 関係する親のビューを指定します。 dr.ParentDataViewID = "SqlDataSource_View1" ' 2 つの列を使用して複合キーを指定します。 dr.ParentColumns = New String() {"FirstName", "LastName"} ' 関係する子のビューを指定します。 dr.ChildDataViewID = "SqlDataSource_View2" ' 子データ ソースで複合キーを指定します。 dr.ChildColumns = New String() {"FirstName", "LastName"} ' WebHierarchicalDataSource に関係を追加します。 Me.WebHierarchicalDataSource1.DataRelations.Add(dr)