
- •Добавление в программу новых форм
- •Способы создания новых форм
- •Программное создание формы и ее элементов
- •Программное создание формы и ее элементов
- •Добавление элементов управления в форму во время выполнения
- •Пример: Создание новых элементов управления Label и Button
- •Пример
- •Пример
- •Наследование форм
- •Наследование форм
- •Наследование форм
- •Создание класса
- •Объявление
- •Создание свойств
- •Создание свойств
- •Пример
- •Пример
- •Пример
- •Пример
- •Результат
- •Использование ключевого слова Inherits
- •Результат
- •Результат
Добавление в программу новых форм
Лекция 5
Способы создания новых форм
•Добавление формы как диалогового окна метод ShowDialog и свойство DialogResult
•Программное создание формы и ее элементов
•Наследование форм (инструмент выбор наследования)
•Создание классов
Программное создание формы и ее элементов
•Объекты объявляются и их экземпляры создаются с помощью ключевых слов Dim и New
'Создаем вторую форму с именем form2
Dim form2 As New Form
form2.Text = «Моя новая форма» form2.FormBorderStyle = FormBorderStyle. FixedDialog
Программное создание формы и ее элементов
'положение формы устанавливается вручную
form2.StartPosition = FormStartPosition.Manual
'Объявляем структуру Rectangle, хранящую размеры формы
Dim Form2Rect As New Rectangle(200, 100, 300,250)
form2.DesktopBounds = Form2Rect form2.ShowDialog()
Добавление элементов управления в форму во время выполнения
•Dim button1 as New Button
•button1.Text = "Нажми меня“ button1.Location = New Point(20, 25)
•form2.Controls.Add(button1)
Пример: Создание новых элементов управления Label и Button
•'Объявляем новую форму и объекты элементов управления
Dim form2 As New Form Dim lblDate As New Label
Dim btnCancel As New Button
• ' Устанавливаем свойства метки
lblDate.Text = "Текущая дата: " & DateString lblDate.Size = New Size(150, 50)
lblDate.Location = New Point(80, 50)
Пример
•' Устанавливаем свойства кнопки btnCancel.Text = «Отмена»
btnCancel. Location = New Point(110, 100)
• ' Устанавливаем свойства формы
form2.Text = "Текущая дата« form2.CancelButton = btnCancel form2.StartPosition = FormStartPosition. CenterScreen
Пример
•'Добавляем новые объекты в коллекцию Controls
form2.Controls.Add(lblDate)
form2.Controls.Add(btnCancel)
•'Отображаем форму как диалоговое окно form2.ShowDialog()
Наследование форм
•Inherits
•System.Windows.Forms.Form
Наследование форм
•1. компиляция - проекта, так как наследовать можно только от тех форм, которые скомпилированы в виде файлов .exe или .dll
•2. Project/ Add NEW ITEM/WINDOW FORM/ Inherited Form
•3. выбрать шаблон Inherited Form (Производная форма)