主题：[求助]自定义录入界面四遇到的报错问题

参考：

http://www.foxtable.com/help/topics/0428.htm

狡猾一下：

e.Form.DropDownBox.CloseDropdown(False)
Dim r As Row = Tables("客户").AddNew()
Dim cnt As Integer = Tables("客户").Rows.Count
Forms("客户编辑").Open()
if  cnt = Tables("客户").Rows.Count

     r.Save()
     e.Form.DropDownBox.Value = r("客户ID")
end if