getchildproperty.format

来自「客户关系管理系统ASP.NET+VB.NET编程完整程序！」· FORMAT 代码 · 共 14 行

		Public Property {1}() as {0}
			Get 
				Dim childRows() As DataRow = Me.row.GetChildRows("{3}{4}") 
				If childRows.Length > 0 Then
					_{1} = New {0}(MyBase.DataContext, childRows(0))
				End If
				return _{1}
			End Get
			Set (ByVal Value As {0}) 
				Value.row.SetParentRow(Me.row, MyBase.DataSet.Relations("{3}{4}"))
			End Set
		End Property