Imports System.ComponentModel
Imports System
Imports System.Web
Imports System.Web.UI
Imports System.Web.UI.WebControls
<ParseChildren(True)> Public Class SuperSimpleRepeater : Inherits WebControls.WebControl : Implements INamingContainer
Private _repeatCount As Integer
Private _itemTemplate As ITemplate
Public Property RepeateCount()
Get
Return _repeatCount
End Get
Set(ByVal Value)
Value = _repeatCount
End Set
End Property
<TemplateContainer(GetType(SuperSimpleRepeater))> Public Property ItemTemplate() As ITemplate
Get
Return _itemTemplate
End Get
Set(ByVal Value As ITemplate)
_itemTemplate = Value
End Set
End Property
Protected Overrides Sub CreateChildControls()
Controls.Clear()
Dim i As Integer
'For i = 1 To 10 Step 1
Dim container As New Panel
_itemTemplate.InstantiateIn(container)
Controls.Add(container)
'Next i
End Sub
End Class
博客展示了SuperSimpleRepeater类的实现代码,该类继承自WebControls.WebControl并实现INamingContainer接口。代码中定义了重复计数和项模板属性,还重写了CreateChildControls方法来创建子控件,涉及System相关命名空间的引用。
1万+





