我的情况很简单,用户会看到客户的下拉菜单(组合框),如果客户需要填写表格,数据库中不存在,用户可以点击“添加客户”按钮打开弹出窗体,用于输入客户详细信息并将新条目插入到customers表中 .
我现在正在挑选,但是,如果用户现在想要选择新输入的客户,他们必须从组合框重新选择客户,该组合框现在将显示一个新条目,有没有办法自动使组合框默认为弹出窗体上新插入的客户是否有“On Close”事件?
这是我已经拥有的“关闭”代码刷新客户组合框以添加新条目,是否有任何我可以添加的内容使得默认为新客户输入的框?
Private Sub Form_Close()
If CurrentProject.AllForms("edit appointments").IsLoaded Then
Forms![edit appointments]!customerCombo.Requery
End If
If CurrentProject.AllForms("edit purchases").IsLoaded Then
Forms![edit purchases]!customerCombo.Requery
End If
End Sub
1 回答
我想到了 .
这将获取“customers”表中的最后一个条目,并将组合框的值设置为字段“ID”中包含的值 .