如何使用 "Not in list" 填充 table 的查找

Question

Table 1：我的一般信息table

• 组织：一个 lookup/relationship 字段，默认为 "N/A" 但从...
中提取值

Table 2：组织列表

• 没有 ID 字段，只有按添加顺序排列的组织名称

我的数据输入表单有一个用于组织的组合框，我希望在我添加以前未添加的组织时更新它。我知道我应该使用 "Not in List" 事件，但我不知道如何使用此事件更新组织列表。我该怎么做？

Answer 1

确保组合框的 Limit To List 属性 设置为 Yes。

添加 On Not In List 事件以在出现新值时将值插入源 table：

Private Sub MyComboBox_NotInList(NewData As String, Response As Integer)

    With DoCmd
        .SetWarnings False
        .RunSQL "INSERT INTO [Organization List](Organizations) VALUES ('" & NewData & "')"
        Response = acDataErrAdded
        .SetWarnings True
    End With

End Sub

编辑...差点忘了...在我回答之前，您尝试了什么？ :)

编辑 2...给出的示例是针对字符串值的。如果 New Data 是数值，则从 New Data 的任一侧删除 ' （但如果它是组织名称，则可能不是）。

编辑 3... INSERT SQL 只是将数据放入 table 的一种方法。您可能更喜欢 RecordSet.Add 和 .Update 方法。