我用删除按钮删除某一条记录时，删除后表格变成空白，不能继续输入数据。只有关掉以后才显示以前完整的表格，但那条记录却实成功地删除了，可每次都要退出表单以后才能重新输入数据。我对表单做了刷新，可仍然没用。
我的删除代码如下：
if messagebox("确实要删除该条记录吗?",1+32,"信息")=1
select 表名
delete
pack
thisform.grid1.refresh
thisform.refresh
thisform.grid1.setfocus
else
thisform.grid1.setfocus
endif
thisform.refresh
请教各位高手了。