Розшифровка програми

Можливо, фрагмент програми з попереднього прикладу здався вам абсолютно незрозумілим - не варто засмучуватися. Сенс багатьох операторів проясниться в наступних главах цієї книги. Та все ж давайте коротко розглянемо цей фрагмент, щоб ви хоч би приблизно уявляли собі, що в нім відбувається.

Перший рядок (Static Counter As Integer) наказує Visual Basic створити змінну з ім'ям Counter. Ключове слово Static говорить про те, що значення Counter запам'ятовуватиметься при кожному виклику процедури. Це дозволяє використовувати Counter для підрахунку створюваних форм.

У другому рядку (Dim frm As New frmChild) зустрічається оператор Dim. Зазвичай він визначає розмірність масиву, але в даному випадку описує змінну з ім'ям frm, яка створюється на основі форми frmChild. Ключове слово New повідомляє Visual Basic про те, що йдеться про нову форму, а не про одну з форм, створених в цій процедурі.

Оскільки значення змінної Counter запам'ятовується між викликами процедури, його можна збільшити наступним рядком:

Counter = Counter + 1

Наприклад, якщо значення Counter дорівнювало 3, то оператор присвоїть їй поточне значення «3 плюс 1», тобто 4. Раз змінна Counter оголошена з ключовим словом Static, нове значення буде збережено, так що при наступному виклику процедури змінної Counter буде присвоєно значення 5, потім - 6 і т. д. Наступний оператор (frmCaption = «Дочірня форма MDI» & Counter) замінює вміст властивості Caption рядком, який складається з тексту «Дочірня форма MDI» і номера, що зберігається в змінній Counter. Наприклад, властивість Caption в другій формі матиме значення «Дочірня форма MDI 2». Останній рядок, так би мовити, вдихає життя у форму. Вона наказує Visual Basic відобразити форму на екрані. Оскільки ми вже розглядали процес створення форми, ви знаєте, що робота нової форми починається з події Load. Після завантаження форма активізується і відображується на екрані.