Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Access
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 29.01.2013, 11:37   #1
Jimmy Lenox
Пользователь
 
Регистрация: 03.10.2012
Сообщений: 32
По умолчанию Подстановка значений

Здравствуйте, уважаемые форумчане!
Вот какой вопрос. Есть простая база: форма, которая берет данные из дочерних таблиц (Покупатели и Товары) и вносит коды в главную сводную таблицу (Сводная).
Форма сделана так, что один покупатель может приобрести несколько товаров (пока два). Значения выбираются из выпадающих списков из дочерней таблицы. Плюс на форму добавлено текстовое поле из дочерней таблицы, которое подтягивает значение Описания из связанной дочерней таблицы.
В случае с первым полем все отлично работает. Выбираем Товар1, Описание подтягивается. А вот со полем Товары2 – такое не срабатывает. Значение Описание берется из поля Товар1. Как сделать, чтобы каждое из полей Описания показывало соответствующее значение?..
Простите за туманное изложение проблемы ,)
Screenshot.jpg
Заранее спасибо!..
База в приложении.
Вложения
Тип файла: rar Test-23-01.rar (25.2 Кб, 16 просмотров)
Jimmy Lenox вне форума Ответить с цитированием
Старый 29.01.2013, 12:43   #2
Emmelman
Пользователь
 
Регистрация: 27.11.2012
Сообщений: 84
По умолчанию

Test-23-01.rar
Вот,все теперь работает,нормально выбирает в каждое поле
Emmelman вне форума Ответить с цитированием
Старый 30.01.2013, 13:29   #3
Jimmy Lenox
Пользователь
 
Регистрация: 03.10.2012
Сообщений: 32
По умолчанию

Цитата:
Сообщение от Emmelman Посмотреть сообщение
Вложение 57373
Вот, все теперь работает, нормально выбирает в каждое поле
Большое спасибо!
А вы не могли бы немного пояснить код? Дело в том, что я планирую использовать такой прием и в других формах.
Заранее спасибо!
Jimmy Lenox вне форума Ответить с цитированием
Старый 30.01.2013, 14:59   #4
Emmelman
Пользователь
 
Регистрация: 27.11.2012
Сообщений: 84
По умолчанию

Да все предельно просто, хотя может выглядеть массивно - для удобства отображения сделал вам запрос маленький, подключил его к комбо-боксу( в RowSource, можно и программно прописать, но так кода меньше,если же вам понадобится могу выложить код).

Далее создается событие(event)AfterUpdate - в котором мы открываем рекордсет с той таблицы,которая нам нужна-"Товары",вроде бы.

И уже с помощью метода .Find сравниваем то,что мы выбрали в комбо-боксе с тем,что у нас есть в таблице,находим совпадение.

В конце вытаскиваем из совпавшей строки значение столбца "Описание" и подставляем его в поле Text
Emmelman вне форума Ответить с цитированием
Старый 30.01.2013, 15:07   #5
Jimmy Lenox
Пользователь
 
Регистрация: 03.10.2012
Сообщений: 32
По умолчанию

Большое спасибо, будем разбираться!
Jimmy Lenox вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Подстановка значений из таблице Ardarik SQL, базы данных 15 29.01.2013 09:52
Подстановка значений diman260979 Microsoft Office Excel 1 01.12.2011 11:49
Подстановка значений по условию Александр Неважно Microsoft Office Excel 4 08.04.2011 12:51
Подстановка значений 1-го, 2-го и т.д. вхождения MaxxVer Microsoft Office Excel 9 03.12.2009 06:31
Подстановка значений в MS Access Vit@L БД в Delphi 12 04.09.2009 16:24