Получите внешние данные из таблиц базы данных. Адрес можно скопировать
отсюда:
Файл - Внешние данные - Импорт
Выбрать базу Таблицы.mdb
В появившемся окне «Импорт объектов» выбрать вкладку Таблицы
В списке таблиц выбрать таблицы Фамилия и Предприятия и нажать ОК
Создать две формы Фамилия и Предприятия
соответственно с помощью средства Автоформа - Форма
Откройте форму Фамилия в режиме Конструктор
Выделите надпись Код и поле Код так, как это показано на рисунке и удалите их.
Аналогично выделите пару надпись+поле Фамилия, а в окне свойств установите свойство
От левого края 0,2см.
Точно также в окне свойств установите значение свойства Ширина
в 2,6 см.
Преобразуйте аналогичным образом все остальные элементы, чтобы они выглядели так:
Выделите все надписи на форме (они находятся в области заголовка формы)
и отформатируйте Выравнивание текста в них По центру,
точно также отформатируйте начертание шрифта - Полужирное:
Отразите в окне свойств свойства формы. Для этого достаточно кликнуть на
точку пересечения вертикальной и горизонтальной линеек в левом верхнем углу
формы.
Выставьте указанные свойства формы так, как это показано на рисунке
Аналогично отформатируйте элементы на форме Предприятия
Создайте новую форму в режиме Конструктора и бросьте на неё элемент управления
Вкладка:
Вкладка2 пока не нужна и ее следует удалить:
Задайте подпись для вкладки - слово Пофамильно:
Закройте
окно свойств. Из окна базы данных мышью перетащите форму Фамилия
на поле вкладки Пофамильно, которое при наведении указателя с
перетаскиваемым объектом приобретает заливку чёрного цвета:
Надпись Фамилия нужно удалить.
Перепозиционируйте подчиненную форму так, чтобы она занимала всё
свободное рабочее пространство вкладки и при этом осталось место сверху для
размещения там выпадающего списка. Найдите на панели инструментов кнопку
Поле со списком и бросьте его на освободившееся вверху место:
При помещении поля со списком на форму запускается Мастер Создание
полей со списком. Этот мастер помогает создавать выпадающие списки в
полуавтоматическом режиме на основе данных в существующих таблицах или в
запросах. Создаваемый список должен выводить список фамилий, а такого
запроса или таблицы в базе нет. Поэтому от услуг мастера придется
отказаться. Нажмите кнопку Отмена.
Надпись ПолеСоСпискомХ (Х - число, может быть быть любым)
нужно заменить на Фамилия. Текст надписи выровнять по правому
краю. Для надписи и списка задайте размер шрифта 10.
В окне свойств Поля со списком на вкладке Данные в строке Источник строк нажать кнопку с точками:
В появившемся Конструкторе запросов создайте запрос,
выводящий список фамилий. Не забудьте о том, что в таблице Фамилии
есть однофамильцы, поэтому здесь без групповых операций не обойтись. Создав
запрос и просмотрев результаты его работы (убедитесь, что нет повторяющихся
записей!) закройте окно мастера. На вопрос о подтверждении сохранения
изменений инструкции SQL сохранении свойства ответьте утвердительно (кнопка
Да). Перейдите в режим просмотра и убедитесь в том, что
выпадающий список работает. При необходимости подкорректируйте размер поля
Сохраните форму под именем Общая и перейдите в режим
Конструктора. Выделите внедренный объект - Подчиненная форма - и в окне свойств
настройте основные и подчиненные поля:
Теперь при просмотре формы в подчиненной форме записей не будет. Их
отображением управляет выпадающий список.
Чтобы облегчить свою задачу при создании второй вкладки - По улицам
- чтобы не повторять все шаги заново нужно просто скопировать уже готовую
вкладку Пофамильно и перенастроить свойства ее копии.
На получившейся копии вкладки подчиненная форма отображается пустым внедренным
объектом - это нормально. Для этой вкладки в окне свойств (группа свойств Макет) задайте
подпись По улицам.
Для выпадающего списка нужно изменить Данные - Источник
строк. В появившемся окне конструктора запросов создайте новый запрос,
формирующий список улиц.
Аналогично п.21 для вкладки По улицам измените связь между главной
и подчиненной формами: Основное поле - ПолеСоСпискомY (Y - любое число),
Подчиненное поле - Улица
Измените надпись Фамилия на Улица
Действуя абсолютно по такой же схеме создайте еще одну одну копию
вкладки. Здесь нужно изменить:
для самой вкладки: Макет - > Подпись:Предприятия;
для выпадающего списка: Данные - > Источник строк: сформировать запрос на получение списка
предприятий;
для прикреплённой к списку надписи: Макет - > Подпись:Предприятие:;
для внедрённого объекта Подчинённая форма:
Данные - > Объект-источник: Предприятия;
Данные - > Подчинённые поля: Предприятие;
Данные - > Основные поля: ПолеСоСпискомZ (Z - любое число)