Оформлення звіту
Тема, мета практичного заняття.
Відобразити алгоритм в звіті.
Практична робота 3. Створення, компіляція й виконання найпростішого програмного проекту.
Мета: Оволодіти навичками в роботі середовища VisualBasic; викликати інтерес до програмування; розвивати пізнавальний інтерес.
Теоретичний матеріал
Для того, щоб помістити на форму потрібний вам елемент, необхідно виконати такі дії: натиснути мишкою на потрібний вам елемент на панелі ліворуч, наприклад, на кнопку (Label). Після натиснення кнопка буде виділеною. Тепер помістіть курсор миші на форму і розтягніть мишкою прямокутник. В результаті цих маніпуляцій на формі з'явиться рамка, що має розміри прямокутника. Якщо знадобиться змінити розміри рамки, то необхідно виділити рамку натисненням лівої кнопки і розтягнути рамку за маркери, розташовані на вершинах кнопки. Перемістити рамку в інше місце можна звичайним перетягуванням. Необхідно відмітити, що не усі елементи управління мають розміри, наприклад, Timer. Такі елементи не видно в процесі роботи додатка, але вони виконують певні функції.
Щоб змінити властивості елементу управління необхідно виділити його і змінити потрібну властивість у вікні Properties. Давайте, приміром, поміняємо заголовок форми. Натисніть ліву кнопку миші в будь-яке місце форми і знайдіть у вікні Properties властивість Caption. Змініть його, наприклад, на " Моя перша програма". Заголовок мінятиметься у міру введення тексту.
Тепер запустимо програму. Для цього кликніть на кнопку Start, розташовану на панелі інструментів. Перед вами з'явиться вікно вашої програми! Причому можна його пересувати, міняти розміри.
Для зберігання проекту натисніть на кнопку Save Project.
Послідовність виконання роботи
Програма 1. "Привіт всім!!"!
Для знайомства з примітивами мови VB напишемо програму "Привіт усім!!"!. Програма складатиметься з текстового вікна, в якому при натисненні кнопки ТЕКСТ відображуватиметься напис "Привіт усім!!"!. При натисненні кнопки ОЧИСТИТИ ТЕКСТ напис зникне і при натисненні кнопки Exit відбудеться вихід з програми (рис. 3.1). Програма виглядатиме так:
ТЕКСТ
(Command1)
ОЧИСТИТЬ ТЕКСТ
(Command2)
ВЫХОД
(Command3)
Рисунок 3.1
Для створення такої форми ств оримо текстове вікно. Для цього на панелі інструментів виберемо елемент TextBox, і помістимо його на форму. У властивостях елементу TextBox виберемо Text і очистимо його. У властивості BackColor змінимо колір на синій. А у властивості Font встановимо бажаний розмір і шрифт. Тепер створимо три командні кнопки з написами в Caption для Command1 - Текст, для Command2 - Очистити текст, для Command3 - Вихід. У властивостях Font також встановимо бажаний шрифт і розмір для написів на кнопках.
1. Двічі кликніть на кнопці Вихід і введіть наступний програмний код:
Private Sub Command1_Click()
Text1.Text = "Привет всем!!!"
End Sub
Зверніть увагу, що 1 і 3 рядки у вас вже є і вам необхідно ввести тільки 2 рядок.
2. Двічі кликніть на кнопці Очистити і введіть наступний програмний код:
Private Sub Command2_Click()
Text1.Text = " "
End Sub
3. Двічі кликніть на кнопці Вихід і введіть наступний програмний код:
Private Sub Command3_Click()
End
End Sub
Запустіть програму (F5) і перевірте її роботоздатність.
Програма 2. Структури з використанням Select Case. Програма дає можливість при виборі країни виводити назву самої країни і на її мові "Привіт програміст"
Створіть таку форму, як показано на рисунку 3.2
Выход
(Command1)
Добро пожаловать
в программу (Label1)
Название страны
(Label2)
Рисунок 3.2
Примітка: Перше, друге, четверте і п'яте вікна - мітки (Label1 - Label4). Третє вікно - кнопка ListBox1. Колір написів в Label4 - червоний. З правого боку - вікно Вихід (командна кнопка - Command1).
2. Двічі клацніть за формою. У вікні Code з'явиться процедура Form_Load.
Введіть наступний текст:
Private Sub Form_Load()
List1.AddItem "England"
List1.AddItem "Germany"
List1.AddItem "Spain"
List1.AddItem "Italy"
List1.AddItem "Россия"
End Sub
Для завантаження значень в полі із списком використовується команда AddItem. Знайдіть процедуру List_Click. Введіть наступне:
Private Sub List1_Click()
Label3.Caption = List1.Text
Select Case List1.ListIndex
Case 0
Label4.Caption = "Hello, Programmer!"
Case 1
Label4.Caption = "Hello, Programmierer!"
Case 2
Label4.Caption = "Hello, Programador!"
Case 3
Label4.Caption = "Hello, Programmator!"
Case 4
Label4.Caption = "Здравствуй, программист!"
End Select
End Sub
3. Двічі клацніть по кнопці Вихід і введіть програмний код - End.
Запустіть програму. Програма відображуватиме вітання на мові кожної з країн.
Програма 3. З використанням Select Case, яка називається "Розклад завдань".
Створіть форму, як показано на рисунку 3.3
Рисунок 3.3
Створемо три мітки. У першій мітці у властивостях пишемо "Розклад занять", в другій - "Введіть день тижня", а третю залишаємо порожньою. Створемо List1 і командну кнопку з написом "Кінець"!. Під Command1 записуємо процедуру:
Private Sub Command1_Click()
End
End Sub
Двічі натискаємо на формі і записуємо наступну процедуру:
Private Sub Form_Load()
List1.AddItem "понедельник"
List1.AddItem "вторник"
List1.AddItem "среда"
List1.AddItem "четверг"
List1.AddItem "пятница"
List1.AddItem "суббота"
List1.AddItem "воскресенье"
End Sub
Двічі клацніть на List1 і введіть наступну програму:
Private Sub List1_Click()
Label2.Caption = List1.Text
Select Case List1.ListIndex
Case 0
Label3.Caption = "математика, физика, информатика"
Case 1
Label3.Caption = "история, ин.язык, физ-ра"
Case 2
Label3.Caption = "химия, физика, менеджмент"
Case 3
Label3.Caption = "биология, экономика"
Case 4
Label3.Caption = "экология, геометрия"
Case 5
Label3.Caption = "военная кафедра"
Case 6
Label3.Caption = "отдых"
End Select
End Sub
Запустіть програму і виберіть дні тижня. Внизу з'явиться розклад на цей день.
Звіт
1. Відобразити рисунок вікна проекту.
2. Записати програму