各位老师: 我用了以下命令进行查找操作: do case case thisform.combo1.value="名称" mc=Alltrim(thisform.text1.value) select * from jsdj where jsdj.名称=mc into cursor lsb thisform.grid1.recordsource="lsb" case thisform.combo1.value="来源" ly=Alltrim(thisform.text1.value) select * from jsdj where jsdj.来源=ly into cursor lsb thisform.grid1.recordsource="lsb" case thisform.combo1.value="编号" bh=Alltrim(thisform.text1.value) select * from jsdj where jsdj.编号=bh into cursor lsb thisform.grid1.recordsource="lsb" 为将查找结果输出到打印机,我在表单中又建立了一个输出按钮和一个组合框COMBO2(COMBO2用来选择要输出到打印机的字段),在COMBO2下拉例表中字段分以下几项: 名称; 来源; 编号; 名称、来源; 名称、编号; 来源、编号; 在输出按钮中写了以下代码: sys(1037) keyboard="{ctrl+f10}" sys(1037) keyboard="{ctrl+f10}" do case case thisform.combo2.value="名称" list fields 名称 to prin noconsole endcase
do case case thisform.combo2.value="来源" list fields 来源 to prin noconsole endcase
do case case thisform.combo2.value="备注" list fields 备注 to prin noconsole endcase do case case thisform.combo2.value="名称、来源" list fields 名称,来源 to prin noconsole endcase
do case case thisform.combo2.value="名称、备注" list fields 名称,备注 to prin noconsole endcase
do case case thisform.combo2.value="来源、备注" list fields 来源,备注 to prin noconsole endcase 但是在输出时出现两个问题: 1、在输出单个字段如名称时一切正常,但是在输出两个字段时如名称、备注时,打印机先将名称字段打印在一张纸上,然后再将名称、备注字段打印在另一张纸上。 2、如果需要输出的字段有很多,我要随机选择输出的字段该怎样设置控件呢?例如有名称、来源、备注、工资、奖金、应发工资、实发工资、福利、编号等多个字段,如果第一次我想输出工资、奖金、编号三个字段,第二次我要输出应发工资、实发工资、福利、名称四个字段,以后每次输出的字段都是随机生成的,无法预先在COMBO2中生成可以选择的字段,那样该怎样去做呢? 求各位老师赐教!