Question

我的目标：

表单字段（在MS Access中），有一些下拉选项。如果想要的值不在查找表中，则用户应该能够通过键入来添加它。

假设查找表有行：A，B，C，D。用户想要“E”，它还不存在。理想情况下，他们“覆盖”并输入“E”，然后将其添加到查找表中以供将来输入。

我的google-fu在这方面失败了。我应该使用这个术语吗？什么是好方法？（到目前为止，我一直在玩组合框及其向导）。

感谢您的任何建议！

Answer 1

啊哈，在这里解决了我自己：

Access 2007

在Access中使用新属性   2007：


在设计视图中打开表单。

右键单击组合，然后选择“属性”。

在“属性”框的“数据”选项卡上，设置“允许值列表”   编辑为是，并列出项目编辑   表格到要使用的表格的名称   用于将项目添加到列表中。

当您使用此表单时，您可以   现在右键单击组合，然后选择   编辑列表项。

还有旧版Access的建议。

Answer 2

您可以尝试以下代码：

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

   Dim strSql     As String
   If MsgBox(NewData & " not in list, add?", _
      vbYesNo + vbQuestion) = vbYes Then
      strSql = "insert into tblStudents (name) values(" & NewData & ")"
      CurrentDb.Execute strSql
      Response = acDataErrAdded
   End If

End Sub

注意我使用了学生的表名和Sname的字段名。所以就将表名和字段更改为您使用的任何内容。

MS Access中可编辑，可附加的ComboBox（？）

2 个答案: