有个问题还想问下：用户手工输入在下拉组合框中没有的字段，我想提示没有、返回重新输入。代码如下，但不论输入什么总是可找到，不得其解？请楼主们帮帮。（RowSourceType 为字段，controlSource 为cxqmc）
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

上传有关文件

相关表单：

改成：
    cxqmc=ALLTRIM(this.DisplayValue)

为什么要在双击事件里检查？放到KeyPress事件里更合理：
LPARAMETERS nKeyCode, nShiftAltCtrl
IF nKeyCode=13
    SET ORDER TO 小区名称
    cxqmc=ALLTRIM(this.DisplayValue)
    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
ENDIF

楼主换用下拉列表框不就什么问题都解决了么！

谢谢。明天试试。

下拉列表框好像不能输入新的数值吧。

你不是不让用户自己录入新数据吗？用下拉列表框配合表作数据源，使用时仅能选择其中的记录，可以另建表单对表中的记录进行增、删、修改。

“用户手工输入在下拉组合框中没有的字段，我想提示没有、返回重新输入”，这不就是不允许用户录入新的数据、仅能从已有的数据中选择么？