2015-11-21 3 views
-1

Я использую хороший стандарт кодирования в .NET, если я создам так много маленьких форм, которые действуют как окно сообщения или поле ввода для настройки?Создание множества небольших форм в качестве замены для окна сообщения или поля ввода

Я думаю, что это будет трудно поддерживать, если я сделаю это так, но нет никакого способа настроить окно сообщения или поле ввода свободно.

Это поле ввода

enter image description here

И это форма, которую я использую, так как коробка/коробка сообщение модифицированного входного

enter image description here

Я также думаю, что гораздо лучше, если я не буду создавать форму только для этой цели, но у меня нет возможности полностью настроить окно сообщения или поле ввода, чтобы сделать это так. С другой стороны, я обеспокоен тем, что если я создам более 10 таких маленьких форм, если мне будет трудно поддерживать их в будущем.

+0

Вам просто нужно имя для 'Add Teller' ?? –

+0

@ Vivek.S, я также немного путаюсь в вопросе моего вопроса, поэтому я пересмотрел его. Посмотрите и сообщите мне, смогу ли я что-нибудь с этим сделать. –

+1

Каков ваш вопрос? Чего вы пытаетесь достичь? Эти вопросы мне кажутся неясными. OTOH Если я правильно понял, вы можете перейти на [UserControl] (https://msdn.microsoft.com/en-us/library/aa302342.aspx) –

ответ

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 

 Смежные вопросы

  • Нет связанных вопросов^_^