用VB控制EXCEL生成报表