Question

请问VB.NET中 自定义控件 新增属性时如何设定为其他对象？

开发环境：VS2008+VB.NET+.NET 2.0

新增了一个自定义控件，需要在控件中新增一个属性，此属性为其他对象如label、textbox。

Property pLabel() As Label
Get
Return Me.ViewState("pLabel")
End Get
Set(ByVal value As pLabel)
Me.ViewState("PGridView") = value
End Set
End Property

此时可以看到属性，但是一赋值为label1，就报错！

请问如何操作？多谢！
能否给一个稍微完整点的DEMO，主要的问题是不知道如何在设计阶段如何赋值？

多谢！

Answer 1

Dim _pLabel As Label
Property pLabel() As Label
Get
Return _pLabel
End Get
Set(ByVal value As Label)
_pLabel = value
End Set
End Property

Answer 2

Dim
_pLabel
As
Label
Property
pLabel()
As
Label
Get
Return
_pLabel
End
Get
Set(ByVal
value
As
Label)
_pLabel
=
value
End
Set
End
Property