Заглавная страница Избранные статьи Случайная статья Познавательные статьи Новые добавления Обратная связь FAQ Написать работу КАТЕГОРИИ: АрхеологияБиология Генетика География Информатика История Логика Маркетинг Математика Менеджмент Механика Педагогика Религия Социология Технологии Физика Философия Финансы Химия Экология ТОП 10 на сайте Приготовление дезинфицирующих растворов различной концентрацииТехника нижней прямой подачи мяча. Франко-прусская война (причины и последствия) Организация работы процедурного кабинета Смысловое и механическое запоминание, их место и роль в усвоении знаний Коммуникативные барьеры и пути их преодоления Обработка изделий медицинского назначения многократного применения Образцы текста публицистического стиля Четыре типа изменения баланса Задачи с ответами для Всероссийской олимпиады по праву Мы поможем в написании ваших работ! ЗНАЕТЕ ЛИ ВЫ?
Влияние общества на человека
Приготовление дезинфицирующих растворов различной концентрации Практические работы по географии для 6 класса Организация работы процедурного кабинета Изменения в неживой природе осенью Уборка процедурного кабинета Сольфеджио. Все правила по сольфеджио Балочные системы. Определение реакций опор и моментов защемления |
Обозначение измененной записиСодержание книги
Поиск на нашем сайте
Редактирование записи — двухэтапный процесс. Сначала вы изменяете одно или несколько значений полей, что переводит запись в режим редактирования. Затем вы закрываете форму или переходите к другой записи, что фиксирует внесенные вами изменения. Или вы нажимаете клавишу <Esc> для отмены изменений и затем возвращаетесь к первоначальным значениям. Если вы пользуетесь панелью Запись (Record Selection) (при условии, что в свойстве Кнопки перехода (Record Selectors) установлено значение Да, стандартный вариант), программа Access показывает переход в режим редактирования, заменяя крошечную стрелку в верхнем левом углу формы маленькой пиктограммой карандаша. Эта пиктограмма — полезный индикатор того, что в вашей форме что-то изменено, и нужно решать, принимать ли эти изменения. Но новички программы Access, как и профессионалы, легко могут не заметить крошечную пиктограмму карандаша. Именно поэтому большинство пользователей предпочитают более явное свидетельство внесенных изменений, такое как отображение сообщения на форме или изменение цвета фона. В следующем примере демонстрируется этот подход. Результат показан на рис. 16.8. Для создания этого примера необходимо начать с построения подходящей формы. Возьмите обычную форму и добавьте элемент управления Подпись в раздел Примечание формы. Задайте для подписи приемлемое имя, например, InfoMessage (информационное сообщение), изменив значение свойства Имя в Окне свойств. Теперь можно начать писать программный код.
Примечание Имена элементов управления важны. Они используются для ссылок на объекты в программном коде. Когда вы читаете фрагмент кода, никто, даже вы, не догадается, что обозначает имя Labеl44.
Прежде чем добавить ваш код к форме, необходимо определить следующее. ■ Когда запустится ваш код? Иными словами, нужно указать событие, которое должно его запускать. После того как вы дали ответ на этот вопрос, можно создавать корректную процедуру. ■ Что должен делать ваш код? Иначе говоря, следует решить, какие объекты использовать и какие свойства изменять. Когда ответ найден, можно писать код в вашей процедуре. В данном примере необходимо реагировать на событие формы Изменение данных (On Dirty). Оно возникает, когда запись изменяется любым способом и форма переключается в режим редактирования. Если изменяются несколько значений, событие Изменение данных (On Dirty) возникает только для первого изменения. После этого форма уже находится в режиме редактирования.
Примечание У каждого отдельного элемента управления есть собственное событие Изменение данных (On Dirty), которое происходит, когда кто-то в первый раз изменяет определенный элемент. Не стоит обращать внимание на эти события. Вам нужно использовать событие формы Изменение данных (On Dirty), таким образом вы поймаете все возможные изменения. Рис. 16.8. Вверху; на первый взгляд форма кажется обычной. Внизу: если откорректировано какое-либо значение, цвет фона изменяется и в нижней части отображается текстовое сообщение Далее приведена процедура, необходимая для реагирования на событие вашей формы Изменение данных (On Dirty): Private Sub Forrn_Dirty(Cancel As Integer) End Sub
Примечание Эта процедура выглядит несколько иначе, чем виденные вами ранее процедуры, т. к. она включает поддержку отмены действий. Сейчас не обращайте внимания на этот параметр — вы узнаете о нем все в конце разд. "Принятие решений" главы 17.
Данную процедуру можно вручную внести в существующий модуль (если только использовать для вашей процедуры то же самое имя) или добавить его с помощью Окна свойств (просто выбрать Форма в списке Окна свойств, затем указать событие Изменение данных, далее в поле события выбрать из списка Процедура обработки событий и щелкнуть мышью кнопку с многоточием). Далее следует самая увлекательная часть — написание программного кода. Сначала вам нужен оператор, изменяющий цвет фона формы. У объекта Form нет свойства BackColor (цвет фона), зато такое свойство есть у объектов, представляющих отдельные разделы формы (Details (область данных), FormFooter (примечание формы) и FormHeader (заголовок формы)). Таким образом, можно применить следующий программный код: Detail.BackColor = vbRed Необходимо также задать текст сообщения в элементе управления Подпись3: InfoMessage.Caption = "Вы изменили данную запись. " & _ "Если перейдете к другой записи, ваши изменения будут внесены. " & _ "Для отмены изменений нажмите клавишу Esc." Поместите два оператора в процедуру Form_Dirty и все готово.
Практические занятия для опытных пользователей. Получение нужного цвета Если задавать цвет только с помощью ключевых слов, таких как vbRed, vbWhite и vbYellow, вы обделите себя. Существует множество пастельных тонов и волнующих оттенков, только и ждущих применения в вашем коде на языке Visual Basic. К сожалению, для задания этих цветов нельзя использовать ключевые слова. Вместо них придется применять числовые коды цветов. Чаще всего вы не будете знать правильного числового кода для цвета, который хотите использовать. Но эту проблему можно решить с помощью удобной функции RGB, включенной в язык Visual Basic (как и функция MsgBox, которая применялась раньше). Функция RGB принимает три отдельных числа, представляющих красную, зеленую и синюю составляющие цвета, и преобразует их в код цвета, который можно использовать для задания свойств ForeColor или BackColor. 3 На рис. 16.8 текст сообщения выводится на английском языке. Вы, разумеется, можете тоже выводить текст на английском. — Ред. Далее приведен пример, использующий описанный метод, для применения оттенка светлого оранжево-розового цвета: Detail.BackColor = RGB(266, 160, 122) Этот оператор выполняется в два этапа. Сначала программа Access выполняет функцию RGB для создания кода цвета. Затем она заносит код цвета в свойство BackColor. На первый взгляд преимущество применения функции RGB может показаться не столь очевидным, поскольку она требует указания трех отдельных чисел. На самом деле RGB-обозначение цвета — общепринятый стандарт, применяемый в Web-пространстве и в большинстве Windows-приложений. Найти цвет можно даже в указателе цвета программы Access, а затем определить нужные RGB-компоненты, выполнив следующие действия. 1. Откройте форму в Конструкторе. 2. Выберите элемент управления и затем в Окне свойств щелкните кнопкой мыши поле Цвет текста (ForeColor) или Цвет фона (BackColor). 3. Щелкните мышью кнопку с многоточием (...) в поле цвета для перехода в окно быстрого выбора цвета, в котором отображаются некоторые распространенные и недавно использовавшиеся цветовые варианты. 4. Выберите кнопку Другие цвета (More Colors) для отображения полного набора цветов. 5. Щелкните кнопкой мыши вкладку Спектр (Custom). 6. Выберите цвет, как показано на рис. 16.9. 7. Запишите RGB-значения. Их можно использовать в вашем программном коде. 8. Щелкните мышью кнопку Отмена (Cancel) для возврата в программу Access.
У формы в этот момент обнаруживается дефект. Когда выполняется первое изменение, появляется подпись и меняется цвет фона, как и должно быть. Однако, после того как вы зафиксировали изменение, перейдя к другой записи, сообщение и цвет фона сохраняются. Полученный результат, очевидно, — не то, что вам нужно. Для устранения ошибки необходимо отреагировать на другое событие: событие формы После обновления (After Update). Оно возникает после того, как программа Access успешно зафиксирует изменение в БД. Далее приведен код, необходимый для возврата обычного внешнего вида формы: Private Sub Form_AfterUpdate () Detail.BackColor = vbWhite InfoMessage.Caption = "" End Sub
Примечание He следует использовать событие До обновления (Before Update), поскольку оно возникает как раз перед фиксацией изменений. В этот момент вы не знаете, найдет ли программа Access некорректные данные, отобразит ли сообщение об ошибке и помешает ли обновлению (а в этом случае красный цвет фона следует сохранить). Рис. 16.9. Для выбора цвета щелкните кнопкой мыши в цветовой сетке. (Перекрестье указывает вашу текущую позицию.) Затем используйте вертикальный ползунок для регулировки яркости цвета. Вы увидите, что по мере изменения цвета будут меняться значения Красный (Red), Зеленый (Green) и Синий (Blue)
Пример все еще не закончен. Помимо фиксации изменений пользователь может также нажать клавишу <Esc> для их отмены. На эту возможность тоже следует отреагировать и применить тот же код для возврата к обычному состоянию формы. В данном случае используется событие Отмена (On Undo): Private Sub Form_Undo () Detail.BackColor = vbWhite InfoMessage.Caption = "" End Sub
Этот шаг завершает пример. Для того чтобы увидеть все три процедуры вместе и испытать их в действии, загрузите из Интернета пример БД для данной главы (в разд. "Примеры" во введении объясняется, как обращаться с примерами БД).
Часто задаваемый вопрос.
|
|||||||
Последнее изменение этой страницы: 2016-08-14; просмотров: 146; Нарушение авторского права страницы; Мы поможем в написании вашей работы! infopedia.su Все материалы представленные на сайте исключительно с целью ознакомления читателями и не преследуют коммерческих целей или нарушение авторских прав. Обратная связь - 3.145.10.49 (0.008 с.) |