我错在啥地方？
请教高手：我调用下面程序后，出现一对话框一闪而过，未实现打印功能。请问：这是怎么回事？应如何解决？谢谢！
nianzy=Thisform.text2.Value &&为打印报表年月设专用全局变量
yuezy=Thisform.text3.Value
Select * From ysy Into Table zsy &&sydy表仅有汉字，没有数值
Select zsy
jls=Reccount( )
Select * From tsydy Into Table zsydy &&sydy表不仅有汉字，而且有数值
Select zsydy
Dele All
Pack
xh=1
hb1=1
bh1=4
bh2=21
For xh=1 To jls
hb1=xh
bh1=bh1+1
bh2=bh2+1
xm=Eval('thisform.combo'+Ltrim(Str(hb1))+'.'+'value')
yj=Eval('thisform.text'+Ltrim(Str(bh1))+'.'+'value')
lj=Eval('thisform.text'+Ltrim(Str(bh2))+'.'+'value')
Appe Blank
Repl 项目 With xm 本月数 With yj 本年累计数 With lj
Endfor
Flush
bddks=0 &&表单打开‘个’或‘次’数
Report Form 损益表3.frx TO PRINTER
[解决办法]
本帖最后由 apple_8180 于 2013-03-08 10:17:32 编辑 在
Report Form 损益表3.frx TO PRINTER
之前加一句
Browse
看一下 zsydy 表有没有数据。
另外，如果 损益表3.frx 数据环境中有表，请去掉，因为你是要打印 zsydy 的内容。
还有 损益表3.frx 域控件中的字段名前面不要加表名。
[解决办法]
use zsydy
Report Form 损益表3.frx TO PRINTER
两次提醒，检查数据源
