组合框新增数据另一种方法
在报销培训教材中，当组合框类别需要新增时，用一个控件打开类别新增窗体来实现！
假如子窗体需有这种功能时，窗体上放一个控件或是双击的方法来打开新增窗体。是不是觉得不是很完美呢！可不可以不用一个控件来单击打开窗体，而是当输入新增的数据时。用一个提示框来实现呢！如果是的话就转到需要的窗体中去。
答案是可以的！
代码如下
1、组合框 数据 限于列表选是
2、在组合框中〔不在列表〕事件中输入以下代码
‘假如想在组合框新添数据时，只要输入不在列表的数据都会出现提示框，点是或是Y进入新增窗体，否和N退出重新选数据
If MsgBox("此**名称未记录", vbYesNo, "是否新增") = vbYes Then
 DoCmd.OpenForm "新增窗体名称", acNormal, , , , acWindowNormal
        End If
3、此方法还可以用在其它方面，如选中组合框其中一个