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 に答える