谢谢。懂一些了。有个问题还想问下:用户手工输入在下拉组合框中没有的字段,我想提示没有、返回重新输入。代码如下,但不论输入什么总是可找到,不得其解?请楼主们帮帮。
SELECT 3
SET ORDER TO 小区名称
cxqmc=ALLTRIM(this.Value)
seek cxqmc
if found()
*ATC("cxqmc",this.RowSource)=0
* AND !EMPTY(cxqmc)
thisform.text2.visible=.t.
thisform.text3.visible=.t.
thisform.text4.visible=.t.
thisform.text5.visible=.t.
else
messagebox('无此小区,OK!',0+64)
ENDIF
*messagebox('数据查询完毕,OK!',0+64)
*thisform.release
thisform.olecontrol1.visible=.f.
thisform.refresh