我根据你的思路我改了下程序现在可以了，也给你看看我程序
IF EOF('xscjb')
    RETURN
ENDIF
if messagebox("您确定要删除当前的学生成绩么？",1+64+256,"提示")=1
    use xscjb
    zap in xscjb
    PACK
    GO BOTTOM in xscjb
    close table
    use 学生成绩表
    DELETE FROM 学生成绩表 WHERE 课程号==allt(thisform.text1.value) and 姓名==allt(thisform.text2.value)
    PACK
    thisform.Refresh
endif
非感谢谢你的帮助

use xscjb  &&为什么在此打开这表，这表作用是什么？
  zap in xscjb
  PACK &&这句没用的
  GO BOTTOM in xscjb &&这句没用的
  close table &&这是关闭所有表了，不可取。至于需关闭那些表，你心中应有数。
   use 学生成绩表 &&不应这样打开表，这样打开表有可能自动关闭其它的表。应这样打开： use 学生成绩表 in 0
DELETE FROM 学生成绩表 WHERE 课程号==allt(thisform.text1.value) and 姓名==allt(thisform.text2.value)  &&你不是说要根据查询结果，删除指定的记录吗。但你这不是呀。





[ 本帖最后由 kiff 于 2013-4-1 14:45 编辑 ]

恩恩，不过那个close table还是想用下的，我怕操作对其他的表所以！！！ZAP已经删除了那个PACK是不用要了得，use不是可以指定当前操作的对象么？

use 学生成绩表 in 0
再这样 指定当前工作区,就不怕了
 select 学生成绩表  &&指定当前工作区

恩恩，那我改下！因为我之前用select经常提示说找不到变量的，所以很少用这个，还有这个VFP是不是在XP下不好运行啊，我们宿舍的XP系统都插不入图片，只能通过word插入图片，可是图片插入后又不能变比填充！另一个宿舍的一人用WIN7的他的就可以直接插入图片，也可以变比填充

VFP 在XP 运行,    我没遇到你的问题。不知你说的图片，是指用在哪的。

用在学生信息表里面啊，是通用型的，可是同样的操作在WIN7上就能操作的，现在我的表中都没有照片弄得，添加照片的按钮也没得弄！

你是用如下命令 保存图片的吗
APPEND GENERAL 图片字段 FROM "路径\图片文件.jpg"

我不是用命令添加照片的，就说我在学生信息表中双击那个照片字段不是弹出一个空白页么，后面点击菜单上的编辑——插入对象——由文件创建——浏览……，就是从这里插入不了！怎么回事呢？