关于制作报表的2个问题(设计水晶报表满足奇怪样式，用VB对Excel中某列的样式控制)

Question

1.有2个field，"日期"，"数量"，要做成以下样式的报表
_________________________________________
日期   数量    日期   数量   日期    数量
_________________________________________
1-7     100    1-11    200    1-15    90
1-8     150    1-12    250    1-16    10
1-9     90     1-13    100    1-17    70
1-10    80     1-14     22    1-18    100
象上面这种奇怪的表，请问怎么做法（用水晶报表9)，一般的报表都是记录一直排下去的，但是客户要象上面一样，记录排满一定数量（上例是4个)后，要在旁边继续排，分3份(或多份)，请问有什么好的办法呢？（我现在只能用Excel去做，预先画好，然后循环写记录，用程序来控制写到一定数量后转到旁边继续写）2.用VB操作Excel的时候，要我Recordset写到Excel中，可以用循环，也可以用CopyFromRecordset方法，但问题是我用copyfromrecordset方法写入Excel后，日期型字段的值自动编程yyyy-mm-dd，但是我的数据是有分和秒的，就是要变成yyyy-mm-dd hh:mm:ss才行，但是我在Excel里设置好后，一调用copyFromRecordset就恢复默认的yyyy-mm-dd样式了，现在想在调用该函数后再用程序去set对应那一列的样式（比如"A1"列)，请问应该怎么做，调用什么函数去set它的样式为yyyy-mm-dd hh:mm:ss呢？虽然用循环去逐个单元格写就不会出现这种情况，但是循环比CopyFromRecordset函数慢很多比较急，请高手指点

Answer 1

告诉你一个办法:首先把记录集的数据分成几个记录集,按照格式,再集合成一个记录集如:
日期   数量    
________________
1-7     100    
1-8     150    
1-9     90     
1-10    80     
假设一页为两行,则可把这一个记录集分为
日期   数量    日期   数量    
________________________________
1-7     100    1-9     90 
1-8     150    1-10    80 
然后,用水晶报表文本定义的方式做好报表的样式,再使其datasource属性指向这一个自己改造之后的记录集,哪么就可以达到这一种效果了.
    

Answer 2

建一个临时表，格式如下
_________________________________________
日期   数量   日期   数量  日期   数量 
_________________________________________再象你往excel里写记录一样，把记录写到这个表里面，设计报表的时候也照着这个格式设计，最后连数据源就连到这个临时表，就好了。