カスタムデザイナー

カスタムデザイナーを使って、コンテキストメニューからプロパティの設定画面を表示する方法です。サンプルではメッセージボックスを表示しているだけですが。

Imports System.Web.UI.Design
Imports System.ComponentModel.Design
Imports System.Windows.Forms

Public Class TDesign : Inherits ControlDesigner
    Public Overrides ReadOnly Property Verbs() As DesignerVerbCollection
        Get
            Dim objEvent As New EventHandler(AddressOf Me.onVerb)
            Dim objVerb As New DesignerVerb("テスト(&T)...", objEvent)
            Dim objVerbsCollection As New DesignerVerbCollection
            objVerbsCollection.Add(objVerb)
            Return objVerbsCollection
        End Get
    End Property

    Private Sub onVerb(ByVal sender As Object, ByVal e As EventArgs)
        MessageBox.Show("ここで簡単設定画面を表示する．")
    End Sub
End Class