- •Практичні роботи по Visual Basic
- •Практична робота 1 програмування лінійних обчислювальних процесів
- •Теоретичний матеріал. Знайомство с Visual Basic
- •Практична робота 2
- •Оператор 2
- •Практична робота 3 програмування алгоритмів розгалужених обчислювальних процесів з використанням оператору Select Case
- •Теоретичний матеріал. Оператор Select Case
- •Практична робота 4 програмування алгоритмів арифметичних циклічних обчислювальних процесів
- •Теоретичний матеріал. Цикли
- •Оператори
- •Практична робота 5 Стандартні діалогові вікна
- •Стандартні діалогові вікна.
- •Нестандартні діалогові вікна
- •Використання структури Select Case для обробки вхідних значень із поля зі списком
- •List1.AddItem "Германія"
- •Практична робота 6 створення простих програм
- •Практична робота 7 Використання циклів
- •Практична робота 8 Використання таймерів
- •Теоретичний матеріал
- •Створити програму
- •Практична робота 9 Додавання нових форм у програму
- •Теоретичний матеріал
- •Як використовувати форми
- •Оператори керування формами
- •Ім'я форми Show режим
- •Як сховати і вилучити форму
- •Як згорнути форму
- •Робота з декількома формами
- •Об'єкт Властивість Встановлене значення
- •Imagel Stretch True (Істина)
- •Практична робота 10 Робота з масивами чисел
- •Теоретичний матеріал
- •Практична робота 11 побудова графіка функції
- •Теоретичний матеріал
- •Практична робота 12 робота з текстовими зміними
- •Теоретичний матеріал
- •Практична робота 13 робота з двовимірними масивами
- •Практична робота 14 програма тестування
Ім'я форми Show режим
де режим має значення 0 для немодальних форм (використовується за замовчуванням) чи значення 1 для модальних форм. Наприклад, щоб відтворити форму Form2 як немодальну (за замовчуванням), можна використовувати команду Show у такий спосіб:
Form2.Show
За замовчуванням нова форма є немодальною. Щоб відобразити форму Form2 як модальну, варто використовувати оператор: Form2. Show1
Як сховати і вилучити форму
За допомогою команди Hide можна зробити форму невидимою.
Ви можете сховати форму за допомогою команди Hide, а також вилучити форму за допомогою команди Unload. Ці команди є протилежністю команд Show і Load. При приховуванні форми вона не відображається на екрані, але залишається в пам'яті, щоб її можна було використовувати в програмі надалі. (Цей процес аналогічний використанню властивостей Visible (Видимість). При вилучені форми вона знищується з пам'яті. Тим самим звільняється оперативна пам'ять, куди можуть бути завантажені – об'єкти і графіка для форми, але не пам'ять, що використовується процедурами обробки переривань для даної форми. Програмний код завжди, залишається в пам'яті. Ви можете використовувати ключові слова Hide і для приховання і завантаження форми Form2 у такий спосіб:
Form2.Hide
Unload Form2
Оператор Unload вилучає форму з пам'яті.
Як згорнути форму
Ви можете згорнути форму (помістити її на панель задач) чи розгорнути форму (розширити її на весь екран) за допомогою властивості WindowState (Статус вікна). Наприклад, наступний оператор у програмі згорне вікно
форми Form 1:
Form1.WindowState = 1
Щоб розгорнути форму Form1, варто використовувати наступний оператор:
Form1.WindowState =2
Щоб повернути нормальні розміри форми, встановлені за замовчуванням, використовуйте оператор:
Form1.WindowState = О.
Робота з декількома формами
Наступна вправа демонструє, як можна використовувати другу форму для відображення графіки і тексту для програми-словника іноземної мови з ім'ям Italian. Дотепер у програмі використовувалася функція MsgBox для відображення значень слів, але тепер ви модифікуєте її, щоб у ній для відображення інформації використовувалася друга форма.
Запустимо програму
Private Sub Command1_Click()
End
End Sub
Private Sub Form_Load()
List1.AddItem "aprire"
List1.AddItem "ascoltare"
List1.AddItem "bere"
List1.AddItem "cucinare"
List1.AddItem "dormire"
List1.AddItem "pagare"
List1.AddItem "scrivere"
End Sub
Private Sub List1_DblClick()
Select Case List1.ListIndex
Case 0
Def = "відкрити"
Case 1
Def = "слухати"
Case 2
Def = "пити"
Case 3
Def = "готувати"
Case 4
Def = "спати"
Case 5
Def = "платити, оплачувати"
Case 6
Def = "писати"
End Select
MsgBox (Def),, List1.Text
End Sub
Тепер ви можете замінити функцію MsgBox додатковою формою, що буде використовуватися для відображення інформації.
1. У меню Project (Проект) клацнути на команді Add Form(Додати форму). З'явиться діалогове вікно Add Form (Додавання форми) у який на вкладці New (Нова) відображено шість шаблонів форм.
2. Клацнути на кнопці Open (Відкрити), щоб відкрити порожню форму в проекті. Порожня форма з ім'ям Form2 з'явиться в програмному оточенні.
3. Зменшити розміри другої форми до невеликого прямокутного діалогового вікна. Варто зменшити розміри саме вікна Form2, а не вікна Project1, у якому знаходиться форма.
4. Встановити компоненту Image (Зображення) на панелі інструментів, потім створити середніх розмірів рамку для зображення в лівій частині форми. Це поле буде використовуватися для відображення малюнка італійського прапора.
5. Встановити компоненту Label (Поле мітки) у середині форми.
6. Встановити компоненту TextBox (Текстове поле), потім необхідно створити велике текстове поле нижче поля виведення в середині форми.
7. Встановити компоненту CommandButton (Командна кнопка), потім необхідно створити командну кнопку в правій частині форми. Встановити для вашої нової форми наступні властивості: