Задача такая: нужно что бы при выборе значения в поле со списком появлялось новое поле со списком и т.д. Как я поняла, осуществляется переход по записям. Объясните как это сделать.
я бы повесил изменение источника данных на получение и потерю фокуса, хотя это приводит к пропаданию с экрана некоторых значений если переходить только по колонке "продукт".
Код: vbnet
1. 2. 3. 4. 5. 6. 7. 8.
Private Sub продукт_GotFocus()
Me.продукт.RowSource = "select кодП,продукт from продукты where тип=" & Me.тип
End Sub
Private Sub продукт_LostFocus()
Me.продукт.RowSource = "select кодП,продукт from продукты"
Me.продукт.Requery
End Sub
Swa111sdku,
я бы повесил изменение источника данных на получение и потерю фокусаСтесняюсь спросить: а для чего?
Для этого?Swa111это приводит к пропаданию с экрана некоторых значений
Swa111,
А ЗАЧЕМ менять что-то в сохраненной записи простому юзеру
(Вам бы понравилось если бы сумма выплат по Вашему кредиту была изменена кем ни попадя,без всяческих согласований-такие изменения может внести только уполномоченное лицо с фиксацией времени и основания этих действий.Лично мое мнение-сохраненные записи должны быть EDIT=false, а в новой записи это поле блокировать до выбора типа-после этого снять блокировку. И еще-просто закройте-откройте форму, навряд-ли все записи будут отражены)
Может я не правильно понял вопрос, но переход к новой записи и открытие списка можно сделать так:
Код: vbnet
1. 2. 3. 4. 5. 6. 7.
Private Sub fld_AfterUpdate()
' после выбора значения в списке
' перейти к новой записи
DoCmd.GoToRecord acDataForm, Me.Name, acNewRec
' открыть список
SendKeys "{F4}"
End Sub
