79. Создайте форму Изменение стоимости, для этого создайте пустую форму, с помощью инструмента Пустая форма в группе Формы на вкладке Создание.
80. Разместите на форме Поле со списком, для выбора Издательства, используя Поле со спискомиз группы Элементы управления на вкладке Инструменты конструктора форм/Конструктор.
81. В диалоговом окне Создание полей со списком установите переключатель Объект «поле со списком» будет использовать значения из таблицы или запроса. В следующем окне диалога Создание полей со списком выберите из списка Таблица:Книги. В следующем окне диалога Создание полей со списком перенесите из списка Доступные поля в список Выбранные поля поле Издательство. Отсортируйте по возрастанию список издательств, используя следующее окно диалога.
82. Используя Окно свойств, на закладке Другие задайте следующее значение свойству Имя – ПолеСоСпискомИздательство.
83. В Окне свойств на закладке Макет установите такие значения свойств Количество столбцов – 1, Ширина столбцов – 2,5 см.
84. В Окне свойств перейдите на вкладку Данные выберите свойство Источник строк и нажмите кнопку с троеточием. В нижней части открывшегося окна Построитель запросов удалите столбец Инв№.
85. Выберите ∑ Итоги в группе Показать или Скрыть на вкладке Работа с запросами/Конструктор. В появившейся строке Групповые операции для поля Издательство установите Группировка.
86. Разместите на форме Поле со списком, для выбора Года издания, используя Поле со спискомиз группы Элементы управления на вкладке Инструменты конструктора форм/Конструктор.
87. В диалоговом окне Создание полей со списком установите переключатель Объект «поле со списком» будет использовать значения из таблицы или запроса. В следующем окне диалога Создание полей со списком выберите из списка Таблица:Книги. В следующем окне диалога Создание полей со списком перенесите из списка Доступные поля в список Выбранные поля поля Год и Издательство. Используя Окно свойств, на закладке Другие задайте следующее значение свойству Имя – ПолеСоСпискомГод.
88. В Окне свойств на закладке Макет установите такие значения свойств Количество столбцов – 2, Ширина столбцов – 2,5 см;0 см.
89. В Окне свойств перейдите на вкладку Данные выберите свойство Источник строк и нажмите кнопку с троеточием. В нижней части открывшегося окна Построитель запросов удалите столбец Инв№.
90. Выберите ∑ Итоги в группе Показать или Скрыть на вкладке Работа с запросами/Конструктор. В появившейся строке Групповые операции для поля Год выберите Группировка, а для поля Издательство – Условие. В строке Условие отбора для поля Издательство, используя Построитель (группа Настройка запроса на вкладке Работа с запросами/Конструктор) задайте следующее значение – [Forms]![Изменение стоимости]![ПолеСоСпискомИздательство].
91. Вставьте Поле для ввода Наценки. С помощью Окна свойств установите значения для следующих свойств: на вкладке Другие Имя – Наценка, на вкладке Макет Формат поля – Процентный.
92. Вставьте кнопку для вызова на выполнение запроса Изменение стоимости. Для этого выберите инструмент Кнопка из группы Элементы управления на вкладке Инструменты конструктора форм/Конструктор.
93. В диалоговом окне Создание кнопок в списке Категории выберите Разное, а в списке Действия выберите Выполнить запрос. В следующем диалоговом окне Создание кнопок в списке выберите запрос Изменение стоимости. В следующем окне выберите переключателем Текст и введите Изменить стоимость.
94. В Окне свойств перейдите на вкладку События. Нажмите кнопку с троеточием в строке Нажатие кнопки.
95. В окне конструктора макросов в столбцу Макрокоманда в свободной строке выберите из списка Закрыть. В нижней части окна задайте Аргументы макрокоманды: Тип объекта – Форма, Имя объекта – Изменение стоимости.
96. В заголовок формы вставьте подпись Изменение стоимости. Для этого выберите Заголовок в группе Элементы управления на вкладке Инструменты конструктора форм/Конструктор. После этого на форме появиться разделы Заголовок формы и Примечание формы. Раздел Заголовок формы будет содержать подпись с именем формы.
Рисунок 40. Форма Изменение стоимости
97. Для корректной работы необходимо внести изменения в запрос Изменение стоимости. Зайдите в конструктор запроса Изменение стоимости. В строке Обновление для поля Стоимость измените формулу на – [Стоимость]*([Forms]![Изменение стоимости]![Наценка]+100)/100. В строке Условие отбора для поля Год задайте – [Forms]![Изменение стоимости]![ПолеСоСпискомГод], для поля Издательство – [Forms]![Изменение стоимости]![ПолеСоСпискомИздательство].
98. Откройте форму Книги в режиме конструктора и разместите на ней кнопку для открытия формы Изменение стоимости. Для этого выберите инструмент Кнопка из группы Элементы управления на вкладке Инструменты конструктора форм/Конструктор.В диалоговом окне Создание кнопок в списке Категории выберите Работа с формой, а в списке Действия выберите Открыть форму. В следующем диалоговом окне Создание кнопок в списке выберите форму Изменение стоимости. В следующем окне выберите переключателем Текст и введите Изменить стоимость.
