thisform.refresh
xh=alltrim(thisform.text1.value)
xm=alltrim(thisform.text2.value)
select 学生个人信息表
go top
set filter to xh=alltrim(学号) .and. xm=alltrim(姓名)
if found()==.f.
 messagebox("查无此人",16,"失败")
 else
 browse
 endif
thisform.refresh
代码如上，为什么每次查询都会弹出“查无此人”呢？不管学学号和姓名对不对得上！！！如果代码是下面的话又会出现查找到空白表thisform.refresh
xh=alltrim(thisform.text1.value)
xm=alltrim(thisform.text2.value)
select 学生个人信息表
go top
set filter to xh=alltrim(学号) .and. xm=alltrim(姓名)
 browse
 thisform.refresh
求指点

我修改了一下代码如下就可以了，谢谢
thisform.refresh
xh=alltrim(thisform.text1.value)
xm=alltrim(thisform.text2.value)
select 学生个人信息表
go top
set filter to xh=alltrim(学号) .and. xm=alltrim(姓名)
go top
if eof()=.t.
 messagebox("查无此人",16,"失败")
 else
 browse
 endif
thisform.refresh
我还有个问题就是我每次运行表单时，原来的文本框却都还有之前输入的数据，如何让我每次运行表单时都刷新一遍变成空的文本框呢？thisform.refresh
这句代码都没有用的么？

我text1有值啊就是xh,text2也有值是xm,不过刷新后没有重新把他们的值清空所以还是之前的数据，按照楼下的在最后加上赋空值就好了，谢谢你们啦

在最后加了那两句可以了，谢谢咯

这个语句我还不是很懂运用，不过要查询成绩存储在一个临时表中并能输出打印可以用这个语句么？是不是都要转成报表才能输出打印呢？

恩恩，谢谢了！