if empty(thisform.TEXT1.value)=.f.  
    a=messagebox('确定要添加记录吗？',32+4,'系统提示')
    if a=11
        sele yhw
        INSERT INTO yhw(RQ【取的是系统日期】,JHH,TYR,DZ,DJ,PM,PZCZ,PZCS,SHR,ZCDD,BZ) ;
         VALUES(alltrim(thisform.text1.value),alltrim(thisform.text2.value),alltrim(thisform.text3.value),;
        alltrim(thisform.text4.value),alltrim(【绑定的是表字段】.value),thisform.text6.value,;
        alltrim(thisform.text7.value),val(thisform.text8.value),alltrim(thisform.text9.value),;
        alltrim(【绑定的是表字段】.value),alltrim(thisform.text11.value))
        messagebox('保存记录成功！',64,'系统提示')
    endif
else
    messagebox('请输入计划号！',16,'系统提示')
endif

 ThisForm.Refresh
以上代码是我在录入表单的保存命令的代码，单击保存后，没有错误提示，但yhw表内却没有一条记录保存，不知道是什么原因，请指教。
谢谢了!

问题不在这里，原来是a=6，也不会保存记录，不知道问题出在哪？
如果加use打开表，会出现文件已经打开的错误。

还是不行！！！！！！！！！！！