Sele生成临时表后自动跳出来,却不能在表格里正常显示。
想生成临时表后在绑定的表格里显示。可是程序运行时生成临时表后就自动跳出,我并没有Borw,一按主菜单就消失,可是表格里什么也没有,只有我设计的表头。我是新手,请高手老师指教。谢谢先。具体一点:是一个校产管理的程序,从源表xcglk生成临时表lsxcglk.
select * from xcglk where 种类="&xclb" into cursor lsxcglk
thisform.grid1.recordsourcetype=4
thisform.grid1.recordsource="lsxcglk"
thisform.grid1.columncount=10
thisform.grid1.Column1.Header1.caption="类别"
thisform.grid1.Column1.Controlsource="类别"
thisform.grid1.Column2.Header1.caption="编号"
thisform.grid1.Column2.Controlsource="编号"
if xclb="图书"
thisform.grid1.Column3.Header1.caption="书名"
thisform.grid1.Column4.Header1.caption="作者"
else
thisform.grid1.Column3.Header1.caption="名称"
thisform.grid1.Column4.Header1.caption="制造商"
endif
thisform.grid1.Column3.Controlsource="名称"
thisform.grid1.Column4.Controlsource="制造商"
thisform.grid1.Column5.Header1.caption="来源"
thisform.grid1.Column5.Controlsource="来源"
thisform.grid1.Column6.Header1.caption="价格"
thisform.grid1.Column6.Controlsource="价格"
thisform.grid1.Column7.Header1.caption="入校日期"
thisform.grid1.Column7.Controlsource="入校日期"
thisform.grid1.Column8.Header1.caption="存放科室"
thisform.grid1.Column8.Controlsource="存放科室"
thisform.grid1.Column9.Header1.caption="橱柜号"
thisform.grid1.Column9.Controlsource="橱柜号"
thisform.grid1.Column10.Header1.caption="是否借出"
thisform.grid1.Column10.Controlsource="是否借出"
thisform.refresh
thisform.grid1.refresh
怎样调试还是那样,在vfp6和vfp9中的效果一样。
[ 本帖最后由 风_1969 于 2011-10-8 16:14 编辑 ]