程序如下：
 SELECT ybqyrq
   USE
   USE D:/jyqy/ybqyrq
   locate for alltrim(rtrim(ybqyrq.姓名))==''
     do while found()
     dele
     CONTINUE
     enddo
     thisform.LockScreen= .T.
     pack
     
   thisform.grid1.ColumnCount =-1
   thisform.grid1.RecordSourceType = 1
   thisform.grid1.RecordSource ='ybqyrq'
   thisform.LockScreen= .F.
   thisform.Refresh

[此贴子已经被作者于2019-10-25 11:02编辑过]

感谢各位老师的指导，我先试下，不懂再问，谢谢！

老师你好，我是在表单里添加了一个表格用于录入信息，表格设置了向下光标键可用，末行回车换行，hearder的字体及大小，列数列宽等，数据环境表ybqyrq，表初始时只有一条空记录（无空记录表格不可用），录入时空姓名是无效记录，跳空行录入也是无效记录，需要删除。如果用ZAP会弹出一个确认对话框，可否设置不弹出？另外，appen from应该是从其它地方取数据过来存储啊？

谢谢老师，按照您的方法问题改决了！