1

我有一个我制作的 DLL，它是一个自定义按钮和一个常规表单。要让按钮显示其属性（它只会在设计器中显示为常规按钮），用户必须输入

Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
    CustomButton1.Initialize(Width, Height, ButtonText)
End Sub

但是，我想要一个设置参数，以便用户可以执行以下操作：

CustomButton1.Initialize(Textlocation.Top)

比如创建消息框并设置类型时做了什么：

MsgBox("MessageBoxText", MsgBoxStyle.Critical)

我该怎么做呢？

4

2 回答 2

0

您可以重载该方法。假设你有这样的事情：

Public Sub Initialize(width As Integer, height As Integer, buttonText As String)
    ' Or however it’s declared
End Sub

在它下面声明：

Public Sub Initialize(location As TextLocation)
    Select Case location
        Case TextLocation.Top
            Me.Initialize(appropriate presets)
        …
    End Select
End Sub

就是这样！

于 2013-07-01T13:17:43.977 回答
0

你想要一个枚举：

Enum TextLocation
    Top
    Bottom
    ...
End Enum
于 2013-07-01T13:23:29.287 回答