Цена = nz(DLookup("Цена", "Имя_таблицы", "Код_Товара = " & nz(Forms("ГлавнаяФорма")!ПодчиненнаяФорма!Цена,0)),0)