Page 97 - 4788

Тепер зберегти новий проект і нову форму. Як вам
відомо, Visual Basic вимагає, щоб кожна форма була
збережена у виді власного файлу. Проте, форму можуть
використовувати кілька проектів. Перш ніж зберегти форму
Form2, переконайтеся, що вона є активна, чи виділена.
8. У меню File (Файл) клацнути на команді Save As
(Зберегти як) для Form2. З'явиться діалогове вікно Save File
As (Зберегти файл як).
9. Зберегти форму Form2 під ім'ям My.frm.
Друга форма буде збережена на диску і зареєстрована у
вікні Project (Проект). Ви можете переключатися між
формами за допомогою мишею виділивши ім’я форми у вікні
Project (Проект) або меню View Object (Об'єкт).
10. Клацнути на Form1, потім клацнути на команді Save
As (Зберегти як) для збереження форми Form1. Введіть ім'я
MyWordListfrm, потім натиснути Enter.
11. У меню File (Файл) клацнути на команді Save Project
As (Зберегти проект як), потім зберегти проект під ім'ям
Myltalian2.vbp. Тепер модифікувати процедуру
Text1_DblClick для відображення нової форми.
Доступ до другої форми в процедурі
1. Клацнути на першій формі, потім двічі клацнути на
об'єкті List1 у формі.
У вікні Code буде відображений текст процедури
обробки переривання
List1_DblClick. У цій процедурі існує структура
умовного вибору Select Case, що використовує функцію
MsgBox, для відображення значення виділеного італійського
слова. Ця структура визначає обране слово зі списку і
привласнює змінні Def значення, що відповідає перекладу
цього слова. При бажанні придивіться уважніше до структури
з умовою.
2. Прокрутити вниз вікно Code з текстом процедури.
З'явиться наступний рядок з використанням функції MsgBox
MsgBox (Def),, List1 .Text
3. Вилучити функцію MsgBox і ввести замість неї
наступні оператори:
Load Form2
Form2. Label1= List1.Text

95