| Вопрос: События - Можно ли?????? | Добавлено: 06.02.04 17:24 |
Автор вопроса:  SX
|
|
Делаем таблицу в которой будут поля (например) On_click и назв. эл-та упр. В этом поле будет прописан вызов какой-то функции Вопрос Можно ли После загрузки формы шла в табл и проверала что должно произойти и на каком эл-те при нажатии на него (я думаю все что угодно но только не через таймер как? не знаю) Т.о. в явном виде не обрабатывалось событие P.S. VBA-не объектный язык |
| Ответы | Всего ответов: 2 |
|
Номер ответа: 1 Автор ответа: OAN Вопросов: 2 Ответов: 17 |
Профиль | | #1 | Добавлено: 23.02.04 21:03 |
|
Вопрос не совсем ясен. Например, для запуска функции по событию нажатия на контрол можно добавить такой код в Form_Load:
dim c as control dim rs as recordset for each c in me.form set rs= currentdb.openrecordset("SELECT * FROM [Таблица_с_описанием_функций] WHERE [Имя_Контрола]=" & c.Name,dbOpenSnapshot, dbReadOnly) c.OnClick = "=" & rs![Имя_функции_при_нажатии] next
OnClick можно заменить на любое другое событие. "Имя_функции_при_нажатии" - содержит строковое значение функции (именно функции, не процедуры), включая круглые скобки. Не забуть про "=" перед названием функции. |
||
|
Номер ответа: 2 Автор ответа: OANВопросов: 2 Ответов: 17 |
Профиль | | #2 | Добавлено: 23.02.04 21:04 |
|
Вопрос не совсем ясен. Например, для запуска функции по событию нажатия на контрол можно добавить такой код в Form_Load:
dim c as control dim rs as recordset for each c in me.form.controls set rs= currentdb.openrecordset("SELECT * FROM [Таблица_с_описанием_функций] WHERE [Имя_Контрола]=" & c.Name,dbOpenSnapshot, dbReadOnly) c.OnClick = "=" & rs![Имя_функции_при_нажатии] next
OnClick можно заменить на любое другое событие. "Имя_функции_при_нажатии" - содержит строковое значение функции (именно функции, не процедуры), включая круглые скобки. Не забуть про "=" перед названием функции. |
||
Страница: 1 |