用VB創(chuàng)建Excel報表.txt

1、用VB創(chuàng)建Excel報表作者：張煒在VisualBasic中制作報表通常是用數(shù)據(jù)環(huán)境設(shè)計器(DataEnvironmentDesigner)與數(shù)據(jù)報表設(shè)計器(DataReptDesigner)或者使用第三方產(chǎn)品來完成并通過ActiveX控件輸出.但對于大多數(shù)習(xí)慣于Excel報表的用戶而言用以上兩種方法生成的報表在格式和功能等方面往往不能滿足他們的要求.由于VisualBasic的可擴(kuò)展性使用和融入Office97的特性包括Excel是相

2、當(dāng)方便的Excel可以用作OLE服務(wù)器，向外部輸出某些屬性，方法和事件VisualBasic可以利用這些功能，實現(xiàn)與Excel的集成下面，我們來具體闡述一個用VB來創(chuàng)建Excel報表的例子一Excel對象微軟的Excel對象模型包括了128個不同的對象，從矩形，文本框等簡單的對象到透視表，圖表等復(fù)雜的對象下面我們簡單介紹一下其中最重要，也是用得最多的四個對象1.Application對象Application對象處于Excel對象層次結(jié)

3、構(gòu)的頂層，表示Excel自身的運行環(huán)境2.Wkbook對象Wkbook對象直接地處于Application對象的下層，表示一個Excel工作薄文件3.Wksheet對象Wksheet對象包含于Wkbook對象，表示一個Excel工作表4.Range對象Range對象包含于Wksheet對象，表示Excel工作表中的一個或多個單元格二一個實例１在Excel中做一個模板在用VisualBasic生成Excel報表之前，應(yīng)先按照用戶的要求在E

4、xcel中做好一個模板（文件后綴為.xlt）當(dāng)然，對于那些格式不固定，需要動態(tài)生成的報表，也可在程序中控制其格式本例需要為用戶提供一個工程師工作的評價報告，我們所做的模板Engineer.xlt２在VisualBasic程序中生成Excel報表我們的例子中使用ADO從數(shù)據(jù)庫中獲取工程師工作的有關(guān)信息，然后按照模板Engineer.xlt的格式將數(shù)據(jù)寫入Excel工作表中（１）創(chuàng)建一個新的標(biāo)準(zhǔn)EXE工程文件（２）在窗體frmEnginee

5、r中添加兩個命令按扭，屬性設(shè)置如下：NamecmdOKCaptionOKNamecmdCancelCaptionCancel（３）定義全局變量，并為Fm_Load事件編程.（４）對OK按鈕被擊事件進(jìn)行響應(yīng).（５）對Cancel被擊事件進(jìn)行響應(yīng)３運行程序，生成Excel報表三結(jié)束語通過在VB中使用ADO(ActiveXDataObject)和Excel提供的OLE對象，我們能夠很容易地將數(shù)據(jù)庫中的數(shù)據(jù)輸出到Excel工作表里用Visual