Використання командних клавіш

Для виконання багатьох команд як на формі так і між формами можна використовувати командні клавіші.

Будь-яка командна клавіша має основні властивості такі, як Location, Size, Text, AutoSize, Font, ForeColor, TextAlign, BackColor, Backgroundimage. Їх призначення для них таке ж саме як для форм.

Якщо запустити програму, то натиснення лівою клавішею мишки на кнопці супроводжуватиметься візуальним ефектом натиснення клавіші. Якщо властивості Enabled присвоїти значення False, то під час виконання програми клавіша буде недоступною, а якщо це зробити для властивості Visible, то клавіша буде невидимою.

Основна подія для командної клавіші – клацання мишкою.

Наприклад для переходу з форми Form1 на форму Form2 необхідно задати наступний код для кнопки:

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

Form2.Show()

End Sub

Після запуску проекту на виконання і натисненні на кнопку Button1 на екрані з’являться дві форми: Form1 та форма Form2. Для того щоб на екрані відображалася тільки друга форма першу необхідно приховати. Для цього в кодову частину кнопки Button1 (розміщена у формі Form1) необхідно дописати команду:

Me.Hide()

Припинення виконання додатку здійснюється за допомогою команди End або статичним методом Exit класу Form:

Application.Exit()

На етапі розробки є можливість будь-яку форму зробити стартовою, що дозволяє розпочинати роботу з форми, яка проектується. Для цього у вікні Solution Explorer двічі клацнути на My Project. У вікні, що відкриється, на вкладці Application вибираємо ім’я форми, яку бажаємо зробити початковою.

ПОРЯДОК ВИКОНАННЯ РОБОТИ

В процесі самостійної роботи:

1. Вибрати варіант для індивідуального завдання згідно з вказівками викладача.

2. Написати програму для свого індивідуального завдання.

3. Розпочати підготовку звіту по лабораторній роботі.

В навчальній лабораторії:

1. Створити проект з реалізацією свого індивідуального завдання на ПК.

2. Відлагодити програму і одержати контрольні результати.

3. Завершити оформлення звіту.

4. Здати лабораторну роботу викладачу.

Зміст звіту

Звіт по лабораторній роботі повинен містити:

1. Титульний лист.

2. Варіант індивідуального завдання.

3. Текст програми.

ЗРАЗОК ВИКОНАННЯ ЛАБОРАТОРНОЇ РОБОТИ

Завдання

Розробити проект Visual Basic Window Forms Application з назвою «VBlab01». Проект повинен складатися з 2-х форм. Перша форма має містити дві командні кнопки (перехід на форму №2, закриття даної форми), форма №2 повинна мати чотири кнопки (перехід на форму №1, закриття активної форми, третя кнопка невидима і з’являється у випадку натиснення четвертої кнопки форми, третя кнопка робить невидимими кнопки 1, 3 і 4).

Форми та командні кнопки повинні мати назви та кольори (на вибір студента).

Реалізація

Створимо проект з назвою «VBlab01» у Visual Studio 2008/2010: «File/Файл» → «New Project/Новый проект» → «Visual Basic» → «Windows» → «Windows Forms Application», де у полі «Name/Имя» вводимо назву проекту «VBlab01».

Автоматично створився проект з однією формою. Відповідно до завдання, необхідно додати ще 1 форму: у «Solution Explorer» на проекті «VBlab01» правою клавішою миші викликаємо контекстне меню, де вибираємо «Add/Добавить» → «Windows Form…» та вказуємо ім’я форми – «Форма 2».

На першу форму додаємо дві командні кнопки: перша має назву «Перехід», друга – «Вихід». На другу форму також додаємо кнопки: «Перехід», «Вихід», «Кнопка» та «А ось і я!».

Розміри форм та кольори кнопок залишили без змін, а колір форм змінити на LightSteelBlue. У конструкторі форми матимуть наступний вигляд:

Для реалізації переходу при натисненні на кнопку «Перехід» на формі 1, додамо наступний код (двічі клацнувши лівою кнопкою миші по кнопці «Перехід» або по формі відкриваємо вікно з кодом):

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

Me.Hide()

Form2.Show()

End Sub

Код кнопки «Вихід» форми 2 має наступний код:

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

Application.Exit()

End Sub

Наступні фрагменти коду реалізовують дії, які відбуваються при натисненні на кнопки форми 2.

Кнопка «Перехід»:

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

Me.Hide()

Form1.Show()

End Sub

Кнопка «Вихід»:

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

Application.Exit()

End Sub

Кнопка «Кнопка»:

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

Button4.Visible = True

End Sub

Кнопка «А ось і я!»:

Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click

Button1.Visible = False

Button3.Visible = False

Button4.Visible = False

End Sub

Запускаємо проект.