回顾性地填充访问表单字段

时间:2017-02-17 16:39:10

标签: vba access

我有一个访问数据库,我被要求添加一个字段到(KeyStage)。此字段将从已知并已填充的NCY字段中自动填充。这个代码是;

{{1}}

如果我将它放入GotFocus子中,它可以正常工作。问题是我已经有2000条记录,除非我通过每条记录,否则我无法将KeyStage字段自动填充。我尝试将它放在一个onLoad子表单中,但是也没用。任何人都可以建议我如何处理这个问题?

提前感谢您的帮助。

1 个答案:

答案 0 :(得分:0)

您将需要对表中尚未更新的记录执行UPDATE语句。这样的事情可能会起作用:

UPDATE MyTable AS T

SET T.KeyStage =
    Iif(T.NationalCurriculumYear = 0, "Early Years",
    Iif(T.NationalCurriculumYear >=  1 And T.NationalCurriculumYear <  3, "KS1", 
    Iif(T.NationalCurriculumYear >=  3 And T.NationalCurriculumYear <  7, "KS2", 
    Iif(T.NationalCurriculumYear >=  7 And T.NationalCurriculumYear < 10, "KS3", 
    Iif(T.NationalCurriculumYear >= 10 And T.NationalCurriculumYear < 12, "KS4", "Left School")))))

WHERE T.KeyStage Is Null