End Sub. 8. Пpoвepьтe, как работает проект

8. Пpoвepьтe, как работает проект.

9. Сохраните проект в папке ЛАБ12 под именем Лр12_Зад1 _Фамилия.

Замечание Главный недостаток созданного вами проекта состоит в том, что ваша записная книжка существует на сеанс работы. При каждом новом запуске программы придется вводить все данные заново. Этот недостаток можно устранить, познакомившись с возможностью сохранения данных в файлах.

Ограничение объема записной книжки связано с тем, что вывод информации производится на форму. Для вывода большого объема информации можно использовать текстовое поле. Какие свойства текстового поля нужно для этого установить, Вы должны знать. Однако для этой цели можно использовать новый объект — ListView (Обзор списка).

10. Дополнить проект возможностью вывода списка всех друзей, родившихся в заданном месяце.

Рекомендация. Для выделения номера месяца из даты используйте функцию Mid:

Мid(Друзья(j).BirthDay, 4, 2)