о'кейо…, котор я получаю вы пытаетесь сделать.
1) Находится показ поля удостоверения личности на sub форме? Если так, дайте, то что коробка текста имя txtID… после этого изменяет Кодего как показан ниже
2) Поле удостоверения личности численный? Или текст?
Приватное Sub Form_Current ()
Me.Parent.Form.Filter = «[удостоверение личности] =» & удостоверение личности Me.txt 'если удостоверение личности численный
«Me.Parent.Form.Filter = «[удостоверение личности] =» & удостоверение личности Chr (34) & Me.txt & Chr (34)» если удостоверением личности будет текст
Me.Parent.Form.FilterOn = True
Подводная лодка конца
mx