Page 83 - 4450
P. 83

Тепер  зберегти  новий  проект  і  нову  форму.  Як  вам
                            відомо,  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  і  ввести  замість  неї  такі
                            оператори:


                                                           81
   78   79   80   81   82   83   84   85   86   87   88