ПОНЯТНО О Visual Basic NET (том 3)

       

Создаем несколько объектов-форм из одного класса формы


Создайте проект из двух форм и модуля. На форму 1 поместите кнопку, на форму 2 – три кнопки. Покажем, что из одного класса формы можно порождать несколько объектов-форм, причем эти объекты ведут себя так же, как и объекты, порождаемые из модуля класса в предыдущем разделе. Поскольку работа объектов-форм с переменными и процедурами неотличима от таковой работы прочих объектов, то ее рассматривать я не буду, а займусь более живописной и наглядной работой с цветом фона.

В окна кода введите такой текст:

Модуль:

Module Module1

    Public Форма1 As New Form2

    Public Форма2 As New Form2

End Module

Форма 1:

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        Форма1.Show()

        Форма2.Show()

End Sub

Форма 2:



Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        Me.BackColor = Color.Blue

End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

        Me.BackColor = Color.Red

End Sub

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click

        Форма1.Text = "Форма1"

        Форма1.BackColor = Color.Black

        Форма2.Text = "Форма2"

        Форма2.BackColor = Color.White

End Sub

Запустите проект, нажмите кнопку формы 1, на экран «выскочат» два совершенно одинаковых близнеца-формы о трех кнопках каждый. Даже заголовок у них одинаковый – Form2. При щелчках по первым двум кнопкам близнецов каждый близнец красит себя то в синий, то в красный цвет. Только себя, а не брата. Потому что в коде написано Me. Таким образом близнецы очень скоро перестают быть близнецами.

Третья кнопка показывает, что каждый из объектов может изменять не только себя, но и брата.



Содержание раздела