“zxl931”老师您好麻烦一下:我在一个表单中有两个GRID表,分别为GRID1和GRID2且通过关键字(xh和tt两个关键字)建立了关联,GRID1为父表,我通过一个按钮在下列程序中实现删除一个记录功能.
sele ltk(主表)
oopil_1=ltk.xm
yn=MESSAGEBOX("确定删除'"+oopil_1+"'",4+32,"保险管理系统")
if yn=6
xswe_x=xh
dele
thisform.grid1.recordsource=Null 
pack 
thisform.grid1.recordsource='ltk'
thisform.refresh
sele tt
dele all for tt.tt=xswe_x
thisform.grid2.recordsource=Null 
pack 
thisform.grid2.recordsource='tt'
thisform.refresh
endif
sele ltk
thisform.refresh
执行后,两个grid表均是白屏,不知什么原因,请您指教.谢！谢！谢！谢！谢！谢！