السلام عليكم.
بصراحة لم تظهر المشكلة عندي..لكن طالما انك تظهر اسم صاحب الهوية المسجلة مسبقا فلاتحتاج ان تظهر بياناته ي النموذج وانما الانتقال لادخال رقم هوية اخرى
استبدل جملة الكود السابقة بالتالي
Undo
'DoCmd.FindRecord X
Me.card.Value = ""
Me.card.SetFocus
Else: Exit Sub: End If
DoCmd.RefreshRecord