Question

如何将vf6.0中的报表添加到表单中，利用表单中的代码控制报表的打印内容？

我现在建个一个表单，里面有个表格，用来显示每个班学生的成绩，通过一个Combo控件来选择班级,然后表格就显示相应班级的学生成绩，在表单中的数据环境中包含了每个班级的数据表和一个存储班级编号和班级名称的数据表。combo1的controlsource是存储班级信息的数据表，表格Grid1的Recordsource为学生成绩表。如何通过选择Combo1的班级名称，使Grid1显示相应班级的学生成绩？？
现在在建立一个报表，用来打印每个班级学生的成绩等信息。如何设计一个报表，通过控件的设置和编写代码来打印不同班级的学生信息?报表如何添加到表单中？通过表单的相应控件，来显示报表预览界面然后打印数据？其中表单的数据环境中有每个班级的学生信息表，而报表的数据环境中也包含了每个班级的学生信息表！如何解决数据工作期冲突的问题？？比如表单中有个command1，通过点击然后弹出报表的预览界面！但是出现“表已打开的...”错误提示！是不是一个表在一个数据环境中打开了，就不能在另一个数据环境中再次打开？是不是需要去掉exclusive属性？怎么设置excursion这个属性？在什么情况下设置?

Answer 1

你可以在表单的初始化中打开成绩表，再拷贝出一个临时同结构一个班的数据表temp.dbf
在表单的combo1中加入名班名，初始选中刚才临时表中的班名
在combo1的interactivechange中写入代码:
bj=allt(thisform.combo1.value)
thisform.grid1.recordsource=[]
sele temp
dele all
pack
appe from 成绩表
dele all for allt(班名)<>bj
pack
thisform.grid1.recorsource=[temp]

在报表本班资料时，建立一个依于成绩表的报表，报表时加条件for allt(班名)=allt(thisform.combo1.value)