Настроить открытую переменную дочерней формы из родительской формы MDI в VB.NET

Question

У меня есть родительская форма MDI, которая может открыть дочернюю форму под названием «Заказ». Формы заказов имеют кнопку, которая позволяет пользователю распечатать заказ. Форма заказа имеет переменный размер печати, определенные в начале:

Public Class Order 

Public psize As String 

    Private Sub button_order_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles process_order.Click 
    ' Code to handle the order and then print, etc 

Теперь родительская форма имеет psize переменную, а, который установлен в значение по умолчанию «A4». Только тогда, когда кто-то нажимает на один из пунктов меню в полосе меню окна Материнского будет это произошло:

psize = "A6" 

По умолчанию, когда родительское окно открывает новую форму заказа, мне нужно, чтобы установить ребенок форма-х psize переменная для собственного psize значение. Что-то вроде этого:

Dim f As Form 
    f = New Order 
    f.MdiParent = Me 
    f.psize = Me.psize ' BUT THIS LINE DOESN'T WORK 
    f.Show() 

Получаем, что f.psize не является участником формы. Я знаю, что передача переменных из родителя и ребенка MDI и из него довольно распространена, но, несмотря на несколько вариантов, которые я видел здесь, он, похоже, не работает. Это неправильный подход?

Answer 1

Причина, по которой свойство недоступно, связано с тем, что вы используете неправильный тип для переменной. База Form тип не определяет это свойство. Скорее, ваш производный Order типа делает. Вы могли бы сделать что-то вроде этого:

Dim f As Order 
f = New Order 
f.MdiParent = Me 
f.psize = Me.psize 
f.Show() 

UPDATE

Как вы сказали в комментариях ниже, что вам действительно нужно сделать, чтобы быть в состоянии разделить динамическую настройку между всеми вашими формами так, что вы можете изменить настройку в любое время и повлиять на все ваши формы, которые уже были отображены. Лучший способ сделать это, было бы создать новый класс, который хранит все ваши общие параметры, например:

Public Class Settings 
    Public PaperSize As String = "A6" 
End Class 

Как вы можете видеть, делая так, вы можете легко централизовать все ваши настройки по умолчанию в вашем класс настроек, что является дополнительным преимуществом. Затем вам нужно изменить общественную собственность в вашей Order формы нового Settings типа, например:

Public Class Order 
    Inherits Form 

    Public Settings As Settings 
End Class 

Затем вам необходимо создать общие параметры объект в форме Родитель MDI, а затем передать его это для каждого из ваших Order форм, как они созданы:

Pubic Class MyParentForm 
    Private _settings As New Settings() 

    Private Sub ShowNewOrderForm() 
     Dim f As New Order() 
     f.MdiParent = Me 
     f.Settings = _settings 
     f.Show() 
    End Sub 

    Private Sub ChangePaperSize(size As String) 
     _settings.PaperSize = size 
    End Sub 
End Class 

Тогда, так как родительская формы и вся дочерние Order формы один и тот же Settings объекта, и изменения, внесенные в этот Settings объект будут видны сразу все формы.

Answer 2

Изменить это:

Dim f As Form 

фактической реализации вашей формы:

Dim f As Order 

или просто ярлык:

Dim f As New Order