2010-6-23 Report File Output功能追加

来源:互联网 发布:淘宝话梅护肤是正品吗 编辑:程序博客网 时间:2024/06/06 11:25

昨天下午本来就因为调查跨域(Crossing Domain)传值的问题而暂时中断了Ruby on Rails。
而今天上午跨域的问题还没弄完,又半途因为以前做的一个VBA的程序功能追加的紧急对应而陷入了中断的中断。。
我提出的预算是4个小时。而实际上,从11点着手,在中午12点前就大致完成了。
很简单的一个功能,就是在原来文件输出的基础上,加入循环,输出多个工作表。
下午调试修改。然后发现了以前的一个bug。
用6月份的报表读入数据后输出时,由于数据项总是为31,而6月份的数据只有30条,所以取第31条数据时就发生错误。
难道我以前测试是用天数31天的月表报测试的??汗颜,测试不足。。。
用到的方法如下:
dayOfMonth = Day(DateSerial(CInt(year), CInt(Format(month, "0")) + 1, 0))
year和month为字符串类型,需要用CInt转换成整形,并且month为“06”形式的,需要用Format函数除去前头的0。
CInt函数居然不能直接把“06”转换成6,出乎意料。
到此完成。
经验证,修正意见无。好玩的是leader点着文件名为“Book23”的输出文件说,真有意思的名字啊。
我小汗了一下,说因为程序中没有指定文件名,所以是Excel默认的名字,不断递增。
呃。。以前问过然后说输出文件名不需要指定才会这样的嘛,嗯,从这数字上看,我搞完这个功能的时候一共测试了22次!

接下来继续跨域~

原创粉丝点击