Подформа

БиллГейтс
Дата: 31.08.2005 12:31:17
Форма 
Sub_ListClientsListContracts_Query
Создана с помощью мастера. Вверху находится главная форма,
Источником записей которой является 
ТАБЛИЦА  “ListClients”
Внизу ПОДЧИНЁННАЯ форма, которая  ИМЕНИ НЕ ИМЕЕТ
, а ИСТОЧНИКОМ  СТРОК является ЗАПРОС
QueryListContracts
, созданный на 
основе таблицы ListContracts.

Как извлечь значение из поля NumberContract  в ПОДЧИНЁННОЙ ФОРМЕ ?
NumberContract – ТЕКСТОВОЕ ПОЛЕ длиной 9 знаков
Начинал я так
Forms!Sub_ListClientsListContracts

СПАСИБО
Bagin
Дата: 31.08.2005 12:50:12
аыаы
Дата: 31.08.2005 14:39:17
Так проблема в том, что

БиллГейтс
.... ПОДЧИНЁННАЯ форма, которая ИМЕНИ НЕ ИМЕЕТ
....


Видимо, оно где-то потерялось. Шутка.
Билл! У любого объекта Аксесса есть имя. В данном случае объектом является контрол "подчиненная форма". Поищи как следует.
БиллГейтс
Дата: 31.08.2005 15:50:53
БЛАГОДАРЮ ОБОИХ
Bagin И аыаы


Если кто не знает, то работающий код показан ниже:

Dim m_sWork As String
m_sWork = Forms!Sub_ListClientsListContracts_Query![QueryListContracts подчиненная форма].Form!NumberContract.Value
MsgBox "m_sWork = " & m_sWork

топик ЗАКРЫТ
Владимир Саныч
Дата: 31.08.2005 15:54:09
БиллГейтс
Если кто не знает, то работающий код показан ниже:

Это для кого??? Это ведь названия объектов из ТВОЕЙ задачи.
БиллГейтс
Дата: 31.08.2005 16:24:20
автор
Это для кого??? Это ведь названия объектов из ТВОЕЙ задачи.


Да, это из моей задачи.
Это для подобных мне - я же не знал
как решить, мне подсказали,
СПАСИБО ИМ. Может кому-то пригодится.

Если ты вошёл - НЕ ЗАКРЫВАЙ ВОРОТ
БЫТЬ МОЖЕТ СЛЕДОМ
ЕЩЁ КТО-НИБУДЬ ИДЁТ.
(имею ввиду с хорошими намерениями)

автор
Владимир Саныч

я подумал, что ты в отпуске.
БиллГейтс
Дата: 31.08.2005 16:28:30
Кто правильно перенос строки
сделает ? Слишком длинная она.

автор
m_sWork = Forms!Sub_ListClientsListContracts_Query![QueryListContracts подчиненная форма].Form!NumberContract.Value


Использовал знак почёркивания и & и без & ,
несколько вариантов - не получалось
Владимир Саныч
Дата: 31.08.2005 16:36:31
БиллГейтс
Это для подобных мне

Не будет подобных. Названия объектов у всех свои.

БиллГейтс
Кто правильно перенос строки сделает ?

m_sWork = _
Forms!Sub_ListClientsListContracts_Query![QueryListContracts подчиненная форма].Form!NumberContract.Value

БиллГейтс
Использовал знак почёркивания и & и без & , несколько вариантов - не получалось

Знак & - это операция соединения строк. Со строками можно попробовать так:

m_sWork = _
Forms!Sub_ListClientsListContracts_Query( _
"QueryListContracts подчиненная форма" _
).Form!NumberContract.Value