创建许多小表单作为消息框或输入框的替代

时间:2015-11-21 05:04:27

标签: vb.net forms messagebox inputbox

如果我要创建如此多的小型表单(如自定义消息框或输入框),我是否在.NET中练习良好的编码标准?

我认为如果我这样做会很难维护它,但是没有办法自由地定制消息框或输入框。

这是一个输入框

enter image description here

这是我正在使用的表单,就像修改后的输入框/消息框

一样

enter image description here

我还认为如果我不为此目的创建表单会好得多,但我没有办法完全自定义消息框或输入框以使其像那样。另一方面,我担心如果我创建超过10个那么小的形式,如果我将来很难维护它。

1 个答案:

答案 0 :(得分:1)

这是一个简短的示例,说明如何在运行时添加UserControl。 AddCtrl是你的添加UserControl。 UpdateCtrl是您编辑的UserControl。 您仍然需要使用AddHandler附加事件处理程序。

Private Enum FormMode
    Adding
    Updating
End Enum

Private _formModeState As FormMode

Private Sub setupForm()

    'test adding
    _formModeState = FormMode.Adding
    setupInput(_formModeState)

    'test updating
    _formModeState = FormMode.Updating
    setupInput(_formModeState)

End Sub

Private Sub setupInput(thisFormMode As FormMode)
    Select Case thisFormMode
        Case FormMode.Adding
            Dim uc As New AddCtrl
            Me.Controls.Add(uc)
        Case FormMode.Updating
            Dim uc As New UpdateCtrl
            Me.Controls.Add(uc)
    End Select
End Sub