Vb.net 如何在设计时在用户控件中显示文本字符串？

我正在创建一个用户控件，它包含一个面板以及4个字符串和整数属性。我希望在设计期间在用户控件中显示属性的文本。我该怎么做？我很难找到例子。

奇怪的问题，通常的问题是隐藏属性。让它看起来像这样：

Imports System.ComponentModel

Public Class UserControl1

    Private mAardvark As Integer

    <DefaultValue(0)> _
    Public Property Aardvark() As Integer
        Get
            Return mAardvark
        End Get
        Set(ByVal value As Integer)
            mAardvark = value
        End Set
    End Property
End Class

导入System.ComponentModel
公共类UserControl1
作为整数的私有mAardvark
_
公共属性Aardvark（）为整数
得到
返回马尔德瓦克
结束
设置（ByVal值为整数）
mAardvark=值
端集
端属性
末级

艾米，很难说清楚你到底在找什么

当用户控件中有属性时，可以在“设计”视图的“属性”窗口中查看和编辑这些属性

因此，如果在属性窗口中选择nobugz answer，您将能够为属性Aardvark设置一个值

您所要求的是希望在文本框中查看属性的值吗

如果是这种情况，您需要确保从属性返回的值是一个值，即不是空！并且该属性是在类似Load的事件中设置的

---

此外，在设计时，usercontrol视图不会绘制值，如果将控件放到窗体上，您将能够在文本框中看到属性的值。

我不太确定您的要求，但我假设您希望在设计时在控件中显示属性文本，并在运行时将其隐藏

如果是这种情况，则需要在属性值更改时更新Label.Text值

我假设您的控件包含一个名为lblPageNum的标签和一个属性PageNum

Public Class TheUserControl

Private myPageNum As String

Public Property PageNum() As String
    Get
        PageNum = myPageNum
    End Get
    Set(ByVal value As String)
        myPageNum = value
        ' This is where we set the value of the label at design-time
        lblPageNum.Text = myPageNum
    End Set
End Property

Public Sub New()

    ' This call is required by the Windows Form Designer.
    InitializeComponent()

    ' Add any initialization after the InitializeComponent() call.

End Sub

Private Sub UserControl1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
    If Me.DesignMode Then
        Me.lblPageNum.Visible = True
    Else
        Me.lblPageNum.Visible = False
    End If
End Sub 

---

下课后，我觉得自己很笨。下面是代码。如果是设计模式，则Me.lblPageNum.Visible=True，否则Me.lblPageNum.Visible=False结束如果