敬请指点！！！

[yfyeah]

我才开始学FOXPRO，现在做查询模块老是出错。请各位大虾指点，不甚感谢！！
这是我在查询表单里写的代码：SELECT * from main;
where 发货时间=alltrim(thisform.combo1.displayvalue);
order by main.运单号;
into cursor lindeping
IF eof()
GO bottom
cmessage="货运管理系统"
ctext="对不起，没有此日期，请确认！"
cdialogue=0+32+1024
MESSAGEBOX(ctext,cdialogue,cmessage)
ELSE
DO form aaskinfo
thisform.release
ENDIF
在查询结果中写的代码是：
local i,p,k
this.columncount=lp
for i=1 to lp
p="this.column"+alltrim(str(i))
k=&p
k.controlsource=lsz[i]
k.header1.caption=lsz[i]
endfor

thisform.refresh
系统说我在p="this.column"+alltrim(str(i))这一句函数出错，请大家赐教！

[流星尔]

p="columns"+alltrim(str(i))
thisform.grid1.&p..header1.caption=lsz[i]
thisform.grid1.&p..header1.controlsource=lsz[i]

[流星尔]

或者用你自己的
p="thisform.grid1.column"+allt(str(i))
k=&p
k.header1.caption=lsz[i]
k.controlsource=lsz[i]

你的错误在于this.column1。而你当前的对象并不是grid。应该是thisform.grid1.column1

[流星尔]

或者用你自己的
p="thisform.grid1.column"+allt(str(i))
k=&p
k.header1.caption=lsz[i]
k.controlsource=lsz[i]

你的错误在于this.column1。而你当前的对象并不是grid。应该是thisform.grid1.column1

[zhjame]

楼上的说得对，对象错了。