Access: значения из подчиненной формы.

[Faust]

Есть у меня в подчиненной форме комбобокс. Так вот, когда обращаюсь к нему из SQL запроса в виде:

Код: Выделить всё

Forms!имя_подчиненной_формы!имя_комбобокса

Access предлагает ввести параметр с таким именем. Когда же обращаюсь как

Код: Выделить всё

Forms!имя_главной_формы!имя_подчиненной_формы!имя_комбобокса

, то выдает NULL-значение (даже когда в комбобоксе значение выбрано).
Это баг или фича? И как все-таки обратиться к полю из подчиненной формы в SQL-запросе?

[Al Khamid]

По

[Андрей Панфилов]

У меня похожая проблема в следующем.
Есть подчиненная форма третьего уровня вложенности. Т.е. Главная форма -> ПФорма1 -> ПФорма2 -> ПФорма3. На этой форме есть кнопка вызова справочника (дополнительная форма ДФорма на основе TreeView). Двойное нажатие на поле ДФормы обрабатывается условным макросом, условие - Null в соответствующем поле ПФормы3. Если не Null то нужно перейти на новую запись ПФормы3 и последовательно перенести в нее значения из ДФормы. Без подчиненности все это работало "на-ура".
А с подчиненностью никак немогу перейти на новую запись в ПФорма3... Перепробовал почти все рекомендации, что нарыл в Инете... Т.е. Forms!Главная форма!ПФорма1!ПФорма2!ПФорма3.Form (обращение к самой форме), Forms!Главная форма!ПФорма1!ПФорма2!ПФорма3 (обращение к контролу формы).
Все время ругается что обращаюсь к закрытому объекту...
Как правильно сделать? Встречал совет объявить доступную переменную в глобальном модуле, но поскольку в VB не очень шарю, никак не въеду как это сделать...

[Al Khamid]

По

[Андрей Панфилов]

Вот вся процедура:

Код: Выделить всё

Private Sub Модель_DblClick(Cancel As Integer)
   
    If (Eval("[Forms]![Новый набор спецификации]![Системы в ТКП].[Form]![Коэффициенты1].[Form]![Спецификация].[Form]![Модель] Is Not Null")) Then
        Forms![Новый набор спецификации]![Системы в ТКП].Form!Коэффициенты1.Form!Спецификация.SetFocus
        DoCmd.GoToRecord , "", acNewRec
    End If
    Forms![Новый набор спецификации]![Системы в ТКП].Form!Коэффициенты1.Form!Спецификация.Form!Модель = Forms!tvwStrID![Прайс по категориям].Form!Модель
    Forms![Новый набор спецификации]![Системы в ТКП].Form!Коэффициенты1.Form!Спецификация.Form!Group = Forms!tvwStrID![Прайс по категориям].Form!Group
    Forms![Новый набор спецификации]![Системы в ТКП].Form!Коэффициенты1.Form!Спецификация.Form!Код = Forms!tvwStrID![Прайс по категориям].Form!Код
    Forms![Новый набор спецификации]![Системы в ТКП].Form!Коэффициенты1.Form!Спецификация.Form!Цена = Forms!tvwStrID![Прайс по категориям].Form!Цена
    Forms![Новый набор спецификации]![Системы в ТКП].Form!Коэффициенты1.Form!Спецификация.Form!ЗП = Forms!tvwStrID![Прайс по категориям].Form!ЗП
    Forms![Новый набор спецификации]![Системы в ТКП].Form!Коэффициенты1.Form!Спецификация.Form!УдТрудоемк = Forms!tvwStrID![Прайс по категориям].Form!Трудоемкость
    Forms![Новый набор спецификации]![Системы в ТКП].Form!Коэффициенты1.Form!Спецификация.SetFocus
    Forms![Новый набор спецификации]![Системы в ТКП].Form!Коэффициенты1.Form!Спецификация.Form!Модель.SetFocus
End Sub


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