许多winforms UserControls的共享基类？

Question

当我找到答案时，感觉就像我要踢自己一样。我希望一些用户控件共享一些属性（如 ID）和事件（即它们都会引发相同的事件）。我尝试创建一个 BaseClass UserControl，然后在我的 UserControls 上尝试 Inherits BaseClass。但是，我得到了错误：

为 Class Viewer 指定的基类“BaseClass”不能是 不同于其其他之一的基类UserControl 部分类型。

我在这里错过了什么？

编辑：为清楚起见，添加一些代码。希望这能说明我希望它如何工作：

Public Class BaseUserControl
    Inherits UserControl

    Public Property ID
    Public Event ItemSelected()

End Class

Public Class Browser
    Inherits BaseUserControl

    Private Sub ButtonPressed() Handles Button1.click

        RaiseEvent ItemSelected()

    End Sub
End Class

Public Class NavBar
    Inherits BaseUserControl

    Private Sub EnterKeyDown() Handles TextBox1.KeyDown

        RaiseEvent ItemSelected()

    End Sub
End Class

Public Class Main

    Dim WithEvents browser As Browser With {.id = 12}
    Dim WithEvents navbar As NavBar With {.id = 624}

    Public Sub New()

        Me.controls.add(browser)
        Me.controls.add(navbar)

    End Sub

    Private Sub SelectionInBrowser() Handles brower.ItemSelected
        'Do amazing stuff
    End Sub

    Private Sub SelectionInNavBar() Handles navbar.ItemSelected
        'Do amazing stuff
    End Sub

End Class

Answer 1

您必须将基类创建为UserControl。例如。将其命名为BaseUserControl。编译它。然后右键单击项目或项目中的文件夹，然后单击Add > New Item。然后选择左侧的Windows Forms，然后选择Inherited User Control (Windows Forms)。给它一个名字，然后点击 Add 按钮。现在将打开一个对话框，您可以在其中选择您的BaseUserControl。然后单击确定。 Visual Studio 为您提供了一些魔法。例如。它覆盖了设计器生成的代码中的Dispose。您可以手动完成，但像这样您可以免费获得它。

您可以在BaseUserControl 上放置控件。它们将被继承并在派生用户控件中可见。

请注意，您必须将基本用户控件中的控件修饰符更改为Protected、Proteced Friend 或Public，以使它们能够在继承的用户控件中进行修改。

---

继承示例。在BaseUserControl 中，我放置了两个按钮Button1 和Button2 并让它们Protected 使它们在派生类中可见。然后我双击Button1。这将创建一个 Button1_Click 事件处理程序。我把它的签名改成了

Public Class BaseUserControl
    Protected Overridable Sub Button1_Click(sender As Object, e As EventArgs) _
        Handles Button1.Click

        MessageBox.Show($"Hello from {NameOf(BaseUserControl)}.{NameOf(Button1_Click)}")
    End Sub
End Class

即，设为Protected Overridable。这不是绝对必要的，但它允许您在后代中覆盖它。

保存并编译，然后打开MyUserControl，其中两个按钮可见。点击Button2，它还没有点击事件处理程序来创建一个。

Public Class MyUserControl
    Private Sub Button2_Click(sender As Object, e As EventArgs) _
        Handles Button2.Click

        MessageBox.Show($"Hello from {NameOf(MyUserControl)}.{NameOf(Button2_Click)}")
    End Sub

    Protected Overrides Sub Button1_Click(sender As Object, e As EventArgs)
        MyBase.Button1_Click(sender, e)
        MessageBox.Show($"Hello from {NameOf(MyUserControl)}.{NameOf(Button1_Click)}")
    End Sub
End Class

如您所见，我也确实覆盖了Button1_Click。 MyBase.Button1_Click(sender, e) 从 BaseUserControl 调用原始实现。

然后我将MyUserControl 放在表单上并启动应用程序。点击Button1首先显示：

来自 BaseUserControl.Button1_Click 的问候

在关闭第一个消息框后点击OK

来自 MyUserControl.Button1_Click 的问候

点击Button2 显示：

来自 MyUserControl.Button2_Click 的问候