- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- 请教关于自定义界面之四增加客户返回时出错。 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=32582)
-- 发布时间：2013/5/4 14:59:00
-- 请教关于自定义界面之四增加客户返回时出错。
此主题相关图片如下：自定义录入界面之四.png
此主题相关图片如下：增加客户后关闭客户档案窗口返回时提示出错.png
根据帮助文件中“自定义界面之四”设计了一个下拉窗口的【增加客户】按钮，但是在增加客户后关闭客户档案窗口返回时提示出错，如上图。
提示出错位置的代码如下：
e.Form.DropDownBox.CloseDropdown(False)
Dim r As Row = Tables("KHDA").AddNew()
Forms("客户档案").Show()
r.Save()
e.Form.DropDownBox.Value = r("KHBM")
求解。
-- 发布时间：2013/5/4 15:01:00
--
例子发出来.有其他问题导致的
-- 发布时间：2013/5/4 15:03:00
--
请使用上述代码之前，先在客户表建立一个“客户编辑”窗口，此窗口的设计就不再啰嗦了，记得将这个窗口的类型设置为模式窗口就行。
需要注意的是，上面的代码CloseDropDown方法使用了参数False，这样关闭下拉窗口后，DropdownClosed事件的e参数Selected等于False，这样就只是简单地关闭窗口，不会向下拉列表框写入值。
-- 发布时间：2013/5/4 17:31:00
--
楼主能否做个例子发上来，我对这个问题有点兴趣
-- 发布时间：2013/5/4 17:33:00
--
这个问题已经解决了吧.