|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
29.01.2011, 15:06 | #1 |
Пользователь
Регистрация: 18.04.2010
Сообщений: 37
|
Создание формы поиска
В общем проблема в следующем, существует запрос на выборку со списком материально-отвественных лиц(МОЛ) по подразделениям. Нужно создать форму поиска МОЛ в заданном подразделении.Моя проблема в том что не знаю как на VBA обращаться к объектам на форме, как с ними работать. До этого был только опыт работы с VBA в Эксель. Заранее спасибо
|
29.01.2011, 15:25 | #2 |
!=
Участник клуба
Регистрация: 08.09.2008
Сообщений: 1,751
|
если мне не изменяет склероз то Me.имя_компонента
|
29.01.2011, 15:29 | #3 |
Пользователь
Регистрация: 18.04.2010
Сообщений: 37
|
Me.имя_компонента
Я так понимаю это обращение к компоненту на текущей форме, так? а как к примеру реализовать вставку данных из таблицы? если можете укажите ссылки на статьи, через два дня надо сдать работу, а программирования в аксесс не было. |
29.01.2011, 15:52 | #4 |
!=
Участник клуба
Регистрация: 08.09.2008
Сообщений: 1,751
|
Да я сам всё делал по справке) Информации практически больше нигде нигде не брал, так что ссылки могу дать только найдя их в гугле)) Организовать добавление можно, только я с ходу ответить не смогу) вот если бы в delphi.
В общем извините(( Сейчас ктонибудь из знатоков VBA придут и помогут) |
30.01.2011, 02:49 | #5 |
Пользователь
Регистрация: 18.04.2010
Сообщений: 37
|
В Delphi я тоже немного поуверенней,там с компонентами все ясно как день...А вот здесь много непонятного,можно ли вообще напрямую работать из формы с таблицей и запросом,Или только через подчиненную форму
|
30.01.2011, 05:11 | #6 |
Пользователь
Регистрация: 18.04.2010
Сообщений: 37
|
Private Sub Выключатель1_Click()
Dim fio As String Me.ПолеСоСписком9.SetFocus FD = Me.Поле2.Text If FD = "" Then Exit Sub ' если пользователь нажал кнопку ОТМЕНА - отказ от поиска fio = "SELECT [Поиск МОЛ подразделения].ФИО FROM [Поиск МОЛ подразделения] GROUP BY [Поиск МОЛ подразделения].Наименование " Me.Поле4.Text = fio End Sub Я понимаю что это выглядит глупо наверное... |
31.01.2011, 07:57 | #7 |
Форумчанин
Регистрация: 05.07.2009
Сообщений: 209
|
Вот пример поиска материала по заданным параметрам. У меня на форме есть поле со списком, который содержит огромный перечень материалов. Для удобства поиска позиции в списке я на форме создала кнопку поиска, которая открывает новое окошка. Там в поле ввожу любой текст, и далее по нажатию кнопки "Найти" осуществляется поиск материалов, в названиях которых этот текст содержится. Затем форма для поиска закрывается и на основной форме раскрывается список с материалами, где выводятся только найденные позиции:
Код:
Может Вам этот пример пригодится. |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Преобразование префиксной формы в постфиксную (дерево поиска, рекурсия) | FYBVFPFYBC | Помощь студентам | 0 | 12.12.2010 05:50 |
Создание поиска | sid1868 | БД в Delphi | 6 | 21.10.2010 15:07 |
создание поиска | Cone | Microsoft Office Excel | 5 | 05.08.2010 22:05 |
подгрузка файлов после заполнения формы поиска | mamant1 | JavaScript, Ajax | 0 | 05.06.2010 04:12 |
Не могу открыть файлы из формы поиска | lexaltd | Общие вопросы Delphi | 5 | 31.07.2008 17:21 |