vb.net用户控件问题 2
我初次接触vb.net,想写一个用户控件,我给用户控件定义了两个属性_Text1和_Text2可是这两个属性在调用时赋值不能马上显示,要运行时才能显示;而且动态赋值也没有...
我初次接触vb.net,想写一个用户控件,我给用户控件定义了两个属性_Text1和_Text2可是这两个属性在调用时赋值不能马上显示,要运行时才能显示;而且动态赋值也没有立即显示。不知道是什么原因,请大侠帮帮忙,如何给用户控件添加属性,这属性能在调用设置时,在动态赋值时都能及时显示,
我的代码很简单,就是新建用户控件添加两个标签控件,代码如下:
这个代码在设置时给_Text1或_Text2赋值不能立刻显示在控件中,在运行时能显示。但是在运行时给_Text1或_Text2赋值也不能显示。
Public Class UserControl2
#Region "变量"
Dim Text_1 As String = "text1"
Dim Text_2 As String = "text2"
#End Region
#Region "属性"
'控件文本
Public Property _Text1() As String
Get
Return Text_1
End Get
Set(ByVal value As String)
Text_1 = value
End Set
End Property
Public Property _Text2() As String
Get
Return Text_2
End Get
Set(ByVal value As String)
Text_2 = value
End Set
End Property
#End Region
Private Sub UserControl2_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
Me.Label1.Text = Text_1
Me.Label2.Text = Text_2
End Sub
End Class 展开
我的代码很简单,就是新建用户控件添加两个标签控件,代码如下:
这个代码在设置时给_Text1或_Text2赋值不能立刻显示在控件中,在运行时能显示。但是在运行时给_Text1或_Text2赋值也不能显示。
Public Class UserControl2
#Region "变量"
Dim Text_1 As String = "text1"
Dim Text_2 As String = "text2"
#End Region
#Region "属性"
'控件文本
Public Property _Text1() As String
Get
Return Text_1
End Get
Set(ByVal value As String)
Text_1 = value
End Set
End Property
Public Property _Text2() As String
Get
Return Text_2
End Get
Set(ByVal value As String)
Text_2 = value
End Set
End Property
#End Region
Private Sub UserControl2_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
Me.Label1.Text = Text_1
Me.Label2.Text = Text_2
End Sub
End Class 展开
1个回答
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询