loca all for 客户名称=alltr(thisform.combo1.value)
if .not.found()
wait "查无此客户！按任意鍵返回。" window at 26,50 time 5
else
thisform.refresh
endif

组合框数据源是某表中的字段：客户名称
为何当随便输入一个不存在的客户，程序没法提示＂查无此客户．．．＂
？？found()值为.t.
指针指向首记录！
为什么？？望大家能帮帮忙！

FOUND（）没问题。
你将你的这句改改！！
locall for alltrim(客房名称)=alltrim(thisform.combo1.value)

不行啊！
在字段前加函数alltr()没有意义！
因为字段＂客户名称＂是被查找对像，为何要加ＡＬＬＴＲ（）函数？
问是关健是alltr(thisform.combo1.value)没有结果！抓取不到输入的值！
如果
？？alltr(thisform.combo1.value)
结果是空串！
所以ＬＯＣＡ后ＦＯＵＮＤ（）值是．Ｔ．
怎么办啊？

combo的属性？？rowsourcetype及rowsource设置的是什么？

他说的是无法抓取输入的值,输入的值在COMBO控件中要用THISFORM.COMBO1.DISPLAYVALUE

版主就我们的版主！谢谢你！

COMBO是绑定的，GRID也是绑定的，而且它们绑定的是同一数据源，这样的查询不是失去了意义了吗?
建议用TEXT输入待查数据，用"SET FILTER TO 条件"来查询数据，这样的话，结果可在GRID中直接看出来。

(1)在表单的初始化部分定义cText为全局变量,将表的内容绑定在GRID1上,TEXT1的INPUTMASK设置成"XXX"(X的个数与客户名称的宽度一致)
(2)在查询命令按钮的CLICK里写
cText=alltr(thisform.text1.value) &&将combo修改为text
loca all for cText$客户名称
if .not.found()
wait "查无此客户！按任意鍵返回。" window at 26,50 time 5
else
SET FILTER TO cText$客户名称
GO TOP
thisform.refresh
endif

重实现方法，轻设计方案的情况还是很严重。

啸凡版主,还是不明白你说的重实现,轻设计是什么意思?