pb 下拉 数据窗口 模糊查询 关闭不了解决方案

pb 下拉 数据窗口 模糊查询 关闭不了
下面代码是放在editchanged事件里面， 如果没有加this.Modify("prodcode.dddw.showlist = 'yes'") 在prodcode里面输入字符后，下拉数据窗口不能显示， 加了那段代码就可以显示，，，但有个问题 我选择了下拉项 按回车键 或 点下鼠标 下拉不能关闭。怎么才能关闭，


dw_2.accepttext( )
if dwo.name="prodcode" then
this.Modify("prodcode.dddw.showlist = 'yes'")
datawindowchild idw_child3
dw_2.getchild("prodcode",idw_child3)
 idw_child3.settransobject( sqlca)
 
if isnull(data) or data='' then
idw_child3.setfilter("")
idw_child3.filter()
else
 

idw_child3.setfilter("(upper(prodcode) like '%" + upper(data) + "%')")
idw_child3.filter() 
idw_child3.retrieve()
 
end if
end if
------解决方案--------------------
你可以换一种方式

dw_2.accepttext( )
 if dwo.name="prodcode" then
 this.Modify("prodcode.dddw.showlist = 'yes'")
 datawindowchild idw_child3
 dw_2.getchild("prodcode",idw_child3)
  idw_child3.settransobject( sqlca)
  
 if isnull(data) or data='' then
 idw_child3.setfilter("")
 idw_child3.filter()
 else
  

 idw_child3.setfilter("(upper(prodcode) like '%" + upper(data) + "%')")
 idw_child3.filter() 
 idw_child3.retrieve()
  
 end if
 end if