ник: osmor
Если это подчиненная форма то к полю текущей записи можно обратиться так:
http://hiprog.com/index.php?option=com_content&task=blogcategory&id=119&Itemid=159
Q15
Если это просто запрос, то есть объект Recordset позволяет получить виртуальный набор записей (по заданной таблице, запросу ил строке SQL), а так же перемещаться по записям, получать данные из полей текущей (для рекордсета) строки, изменять значение полей, осуществлять поиск и т.п.
Существует 2 библиотеки содержащих данный объект DAO и ADODB (сокращенно ADO), свойства и методы объекта REcordset обеих библиотек похожи, но все же имеют различия.
В зависимости от версии ACCESS по умолчанию используется та или иная библиотека
в 97 - DAO
в 2000 и выше - ADO
в 2000 и выше библиотека DAO может быть использована не явно, т.е. без явной ссылки на библиотеку (Функция Currentdb()), но доля полноценного использования лучше DAO ccылку.
далее см. Help "Recordset" соответcвующей библиотеки DAO или ADO
В вашем конкретном случае для DAO:
dim db as DAO.Database
dim rst as DAO.Recordset
dim qdf as DAO.QueryDef
set db = currentdb()
set qdf = db.querydefs("Maintenance_Data(FOKKER50)_Query_subform")
set rst = qdf.OpenRecordset()
if rst.recordcount <>0 then
msgbox "четветое поле первой строки = " & rst.fields(3)
else
msgbox "записей нет"
end if
|
Если нужно получить значение поля другой строки то нужно на нее (строку) переместиться используя методы Movenext, MoveFirst,MoveLast, FindFirst (или Find для ADO) и т.д. см Help