代码如下：
use 表名 exclusive
mb=messagebox("确定要删除吗？",1+64,"提示")
if mb==1
delete from rskp where dh=thisform.text1.value
pack
messagebox("删除成功",64,"提示")
endif
go top
thisform.refresh
运行后显示文件正在使用，无法删除。
挂起后显示"use 表名 exclusive"有错误，怎么办？