vfp删除命令

来源:百度知道 编辑:UC知道 时间:2024/06/19 10:38:41
在浏览时单击上一条时确定要删除当条记录怎么弄,删完后对应的表格没有了空白的怎么回事求
use 学生选课情况表
n=messagebox("确定要删除此条记录吗",4+32,"删除")
if n=6
dele
pack
endif

thisform.refresh还是苫布了急

dele
pack
是删除记录后再清除记录,假如原来有100个学生的记录,现在只有99个学生记录了。
不是删除记录的内容,保留空白记录!

pack放在form destroy事件下

haiyou set deleted on

如果非要PACK的话

就这样

n=messagebox("确定要删除此条记录吗",4+32,"删除")
if n=6
dele
thisform.grid1.recordsource='' &&将表格的数据源设为空
pack
thisform.grid1.recordsource='表名' &&将表格的数据源设为相应表
thisform.grid1.Refresh() &&将表格刷新

endif

thisform.refresh