编辑ComboBox在Microsoft Access

Question

我尝试在我的访问表单中添加接近可编辑组合框的内容，用户可以在其中键入他们需要的内容或从可用条目列表中进行选择。我是新手，希望能提供有关如何做到这一点的任何信息。

当我测试下面的代码时没有任何反应。

代码

Private Sub ddlUNS1_NotInList(NewData As String, Response As Integer)
    Dim ctl As Control

    ' Return Control object that points to combo box.
    Set ctl = Me!ddlUNSC1

    If MsgBox("Value is not in list. Add it?", vbOKCancel) = vbOK Then

        MsgBox ("ddlUNSLEVEL NOT LISTED FIRED ")
    Else 
        'ctl.Undo
        MsgBox ("ddlUNSLEVEL  LISTED FIRED ")
    End If
End Sub

Answer 1

有多种选择。可以参考回绑定字段：

Row Source: SELECT DISTINCT AddressType FROM ThisTable
Control Source : AddressType

这用途有限，可能只对短期数据库有用。

您可以使用NotInList and LimitToList 添加新值。