win7  vfp9.0   文件夹AAAA放在桌面上

姓名.dbf   成绩.dbf    成绩1.DBF(用于存放查询结果)

表单查询中combo2 关联 姓名.dbf 的姓名    text1要求输入学号 才能正确查询成绩

表单查询 command1  click:
CLOSE ALL  
USE c:\users\administrator\desktop\aaaa\成绩1.dbf EXCLUSIVE
DELETE ALL
PACK

USE c:\users\administrator\desktop\aaaa\成绩1.dbf
append from c:\users\administrator\desktop\aaaa\成绩.dbf  for 成绩.姓名=ALLTRIM() AND 成绩.学号=ALLTRIM(thisform.text1.VALUE)

THISFORM.RELEASE

可能是用了CLOSE ALL   关闭了所有表，总是出错。请老师教我怎么写command1  click:才能达到查询效果
 

首先解决文件存放的路径，楼主这样存放文件，很容易出现问题。要单独为这些文件建立相应的文件夹

首先将三个数据表添加到表单的数据环境中
其次为你这些文件新建一个文件夹，将这些文件都存放在新建的文件中
默认路径为当前文件夹

command1  click 代码
SELECT 成绩1
ZAP
XH = ALLTRIM(THISFORM.TEXT1.VALUE)
INSERT INTO 成绩1 SELECT * FROM 成绩 WHERE ALLTRIM(学号) == XH
THISFORM.RELEASE

表数据不要放桌面，表数据与程序放在一个文件夹中
代码中不要用绝对路径，要相对的

谢谢。平时不是这样做的。只是举了个例子，给老师造成不便非常抱歉。

append from c:\users\administrator\desktop\aaaa\成绩.dbf  for 成绩.姓名=ALLTRIM() AND 成绩.学号=ALLTRIM(thisform.text1.VALUE)

成绩.姓名 和成绩.学号     "成绩." 去掉