如何用VBA在报表的非绑定文本框内加入数据？

darknesseye

我在设计报表时，因为原表的字段会改变。所以需要用VBA将数据加入到报表的非绑定文本框中。现在报表的页眉，页脚都已做好。但主体却只显示原表的第一条记录。（原表中有5条记录）下面是 主体_format 事件中代码。

If Not rst.EOF Then

    set rst=currentDB.QueryDefs("biao1").OpenRecordset

    Me.材料名称 = Nz(rst("材料名称"))      

   

End If

结果是打印出的报表只有一条记录，怎样让报表显示全部记录？请版主指教。最好能帮我写一下关键的代码，谢谢。

[此贴子已经被作者于2004-12-27 14:41:30编辑过]

cg1

你可以在报表主体的 FORMAT 事件中赋值，但是 ACCESS 不擅长制作字段不固定的报表，建议你使用 EXCEL 来作为报表输出



关于此主题请参考：

    如何制作复杂报表——利用Excel输出复杂报表《报表》

    http://access911.net/index.asp?u1=a&u2=73FAB41E14DC