Считывание аргументов из формы

 

Раньше, в этой главе, вы видели макросы, которые могут искать записи, печатать отчеты и отправлять данные по электронной почте. Во всех этих случаях аргументы макросов были фиксированными значениями — другими словами, вы их вводили явно и они никогда не менялись. В разд. "Поиск записи "ранее в этой главе вы познакомились с макросом, который находил текст "hay". Несмотря на удобство этого макроса, его нельзя применить для поиска другого текста. Если нужно найти другой текст, придется создать целиком новый макрос.

Рис. 15.20. Вместо поиска слова "hay" в этом примере ищется любой нужный вам текст. В чем хитрость? Вы задаете текст для поиска в поле ввода в верхней части формы

 

Для создания более гибких макросов вместо фиксированного значения можно использовать выражение. Раньше вы неоднократно применяли выражения (см. примеры с запросами в разд. "Вычисляемые поля" главы 7, с отчетами в разд. "Выражения" главы 11 и с формами в разд. "Выполнение вычислений в выражениях"главы 13), поэтому у вас не будет проблем при

 

формировании базовых выражений, объединяющих текст, добавляющих числа и использующих функции Access. Нo при создании макроса полезнее всего выражения, извлекающие значение из формы. Вам нужно знать только имя элемента управления.

Для знакомства с этим процессом в действии можно просмотреть пример с фильтрацией, приведенный ранее, и создать форму поиска, подобную показанной на рис. 15.20.

Для создания данного примера следует начать с добавления элемента управления Поле, необходимого для поиска. Вот как это делается.

1.          Откройте форму в режиме Конструктора.

2.          Выберите на ленте Инструменты конструктора форм | Конструктор > Элементы

управления > Поле (Form Tools | Design > Controls > Text Box) и нарисуйте элемент Поле на форме.

3.          После этого выделите его и затем в Окне свойств выберите вкладку Другие.

4.          В верхней части вкладки Другие измените свойство Имя на что-то более интуитивно понятное, например, SearchText (ИскомыйТекст).

 

 

Примечание

Не всегда нужно создавать новый элемент управления. Макросы могут считывать значения из любого элемента управления, находящегося на форме, включая те, которые присоединены к записи БД. Но в данном примере нужен способ задания текста, не являющегося частью записи, поэтому для этой цели имеет смысл вставить еще один элемент управления Поле.

 

 

Теперь можно создавать макрос. Вам больше не нужна макрокоманда ОткрытьФорму (OpenForm), которую вы применяли в исходном макросе, поскольку, как вы могли догадаться, программа Access будет запускать данный макрос из уже открытой формы AnimalTypes (виды животных). Поэтому вам нужна, прежде всего, макрокоманда КЭлементуУправления (GoToControl) с аргументом Имя элемента (Control Name), имеющим значение Description (описание).

Вторая макрокоманда — НайтиЗапись (FindRecord). Вместо задания фиксированного текста (="hay") в аргументе Образец поиска (Find What) вам нужно указать элемент управления SearchText с помощью его имени (=SearchText). Если в имени есть пробелы или специальные символы, убедитесь в том, что имя заключено в квадратные скобки (=[SearchText] ).

 

 

Примечание

Если вы ссылаетесь на поле или элемент управления в текущей форме, вам понадобится только имя поля или элемента управления. Но иногда бывает нужно сослаться на элемент управления в другой форме. В этом случае придется применить причудливый синтаксис, обозначающий имя формы и имя элемента управления. Если вы хотите сослаться на элемент с именем SearchText на форме, названной SearchForm, следует написать =Forms!SearchForm!SearchText.

 

 

После того как макрос отшлифован, последний шаг — вставка кнопки в форму AnimalTypes для запуска макроса. Далее приведены необходимые действия.

1.   Выберите на ленте Инструменты конструктора форм | Конструктор > Элементы

управления > Кнопка (Form Tools | Design > Controls > Button) и нарисуйте кнопку на форме.

 

2. Нажмите клавишу <Esc> для отказа от запуска Мастера кнопок.

3. В Окне свойств выберите вкладку События.

4. Щелкните кнопкой мыши направленную вниз стрелку в поле события Нажатие кнопки (On Click) и затем из списка выберите только что созданный макрос.

5. Теперь выберите вкладку Макет и в поле Подпись введите слово Search (Поиск). Этот пояснительный текст появится на кнопке.

Данный шаг завершает пример. Для его проверки перейдите в Режим формы, введите что-нибудь в поле SearchText и щелкните мышью кнопку Search. Вы перейдете сразу к записи, в которой есть искомый текст.

 

 

Вы можете следить за любыми ответами на эту запись через RSS 2.0 ленту. Вы можете оставить ответ, или trackback с вашего собственного сайта.

Оставьте отзыв

XHTML: Вы можете использовать следующие теги: <a href="" title=""> <abbr title=""> <acronym title=""> <b> <blockquote cite=""> <cite> <code> <del datetime=""> <em> <i> <q cite=""> <s> <strike> <strong>

 
Rambler's Top100