【正文】 Excel 工作表文件的每一個記錄類型的預(yù)定位置。請注意， Excel 中的術(shù)語是指試算表或工作表的“文件 ”。字符數(shù)組的編碼取決于目前的記錄 （ 例如，從代碼記錄或從字型記錄）。字符數(shù)組不是零終止。 來完 成簡單的文本格式的轉(zhuǎn)化。這就需要進(jìn)行文本篩選，選擇文件，并完成對文本框的輸出。 為了讓生成的 Excel文件更像報表，我們給有內(nèi)容的單元格加上邊框，并調(diào)整數(shù)據(jù)在單元格里的位置，我選擇了居中，這樣看上去會比較好，由于，各數(shù)值的長度不同，輸入到 Excel中就需要對單元格進(jìn)行調(diào)整，在這我讓單元格大小同輸入數(shù)據(jù)相適應(yīng)，這就避免了每次導(dǎo)入數(shù)據(jù)都要更改單元格大小。實際上，窗體正是這樣一種類模塊，在其上可安放控件，也可顯示窗體窗口?？梢栽兕惸K中編寫代碼來建立新對象。 在工作表的第一行加上標(biāo)題 (A1:D1).Value = Array(點名 , X軸坐標(biāo) , Y軸坐標(biāo) , 高程 ) 在表頭做好后，就可以向 Excel里輸入數(shù)據(jù)了，在這里我們可以對數(shù)據(jù)輸出的多少進(jìn)行選擇，采用 Resize事件來完成。如圖 所示： 圖 工程引用圖 添加 Common Dialog 控件 25 新建的工程中是沒有 Common Dialog控件的，需要將 Common Dialog控件添加到工具箱中，添加方法：點擊主菜單“工程”下的“部件”，選中列表框中的“ Microsoft Common Dialog Control ” ，再按“確定”即可在工具箱上看到 Common Dialog控件的圖標(biāo)。數(shù)組始于尺寸（寬度和高度），后面是一列恒定值。在一個 Unicode字符串中可能（但不要求）存儲 RTF 格式的信息和亞洲語音信息。長度被存儲為 8 位值或 16 位值，這取決于當(dāng)前的記錄。 表 44 下面列出了操作碼秩序中的一些記錄類型。 這里是 39H 或 57 個小數(shù)。 表 43 操作碼（ opcode） 2 表示一個整數(shù)紀(jì)錄。因此，單元格 A1 中是第一列和第一行。 BIFF 記錄頭： 表 41 每個 X 代表一個十六進(jìn)制數(shù)字，兩個 X 組成一個字節(jié)。記錄頭是 4byte，前兩位指定記錄類型的代碼（ opcode），后兩位指定記錄長度；記錄體是存儲該記錄的實際數(shù)據(jù)。 Cell 組件的方法、屬性和事件 Cell組件提供上百個編程接口 (方法、屬性、事件 )，通過使用這些方法、屬性、事件，實現(xiàn)報表自定義、報表顯示、打印預(yù)覽、打印圖表、自定義函數(shù)、資源本地化等強大功能，并且能夠完全讀寫 Excel文件，是軟件人員開發(fā)完美軟件的工具。用戶在編輯公式時可以立即求得公式的結(jié)果，如果公式存在循環(huán)引用， Cell會列出產(chǎn)生循環(huán)引用的公式列表。可以設(shè)置頁眉，頁腳，頁邊距，打印預(yù)覽無級縮放，多頁顯示。采用 Cell組件可以極大的減少軟件開發(fā)工作量，改善軟件人機界面，提高軟件質(zhì)量。 利用 Cell組件自身的強大功能，還能完成文本文件與 Excel文件 的互換 。在啟動 Excel程序時要按此順序分別啟動 ， 這 12 樣才能實現(xiàn)對 Excel報表的操作。 Excel對象模型頂層的 Application對象表示 Excel應(yīng)用程序。 自 ， VB中的控件庫 VBX(Visual Basic Extension)由 OCX(LE Control Extension)即所謂的 OLE控件。 1993年 Microsoft公司發(fā)布了 ， ，底層服務(wù)（ COM）由操作系統(tǒng)管理，對于 VB程序員是屏蔽不可見的， VB程序設(shè)計者使用最多的是中 間一層。鏈接對象必須使用對象文件 ， 因為鏈接對象在文件中保存。 嵌入對象保存在 OLE應(yīng)用程序中 ， 其它應(yīng)用程序不能訪問該對象。一個程序可以兼具有服務(wù)器和控制器兩種角色。 (2)OLE控件 ： 小型的組件程序 ， 可嵌入到另外的程序 ， 提供自己的專有功能。 Visual Basic采用了不見編程的思想，在 Visual Basic 中創(chuàng)建的部件，可以自用，也可以再其他開發(fā)環(huán)境中 (如 VC++)使用，還可以引 用其他開發(fā)工具建立的部件，處于具有接口繼承性，所以通過部件編程，在 Visual Basic 中實現(xiàn)了代碼重用。從設(shè)計新型的用戶界面到利用其它應(yīng)用程序的對象；從處理 文字圖象到使用數(shù)據(jù)庫；從開發(fā)個人或小組使用的小工具，到大型企業(yè)應(yīng)用系統(tǒng)，甚至通過 Inter 的遍及全球分布式應(yīng)用程序，都可在 Visual Basic 提供的工具中各取所需。 BIFF 結(jié)構(gòu)的一般結(jié)構(gòu) 表 24 數(shù)據(jù)記錄的最大規(guī)模是有限的， 這 取決于 BIFF 版本。 定義：工作薄流 BIFF5— BIFF8 工作簿文件中存儲的復(fù)合文檔文件包含 一個在根存儲的流 ，這種 流 叫工作薄文件 流 。 BIFF 版本的工作域文件 表 22 顯示 寫入 Excel 版本 的 該文件 格式的 工作 域 文件： 5 Excel版本 BIFF 版本 文件類型 Excel —— —— Excel BIFF 3 工作 域 Excel BIFF 4 合并工作表或 工作域 Excel BIFF 5 工作 域 Excel BIFF 5 工作 域 Excel BIFF 8 工作 域 Excel BIFF 8 工作 域 Excel BIFF 8 工作 域 Excel BIFF 8 工作 域 表 22 文件結(jié)構(gòu) 流 文件 所有文件類型和 BIFF 版本可以存儲在一個簡單的 流文件 中 ，其中大部分都是 以 這種方式 儲存 。 注意差異：工作 薄文件中包含多個工作表，但工作域文件 還包含鏈接在工作表或工作簿文件中存儲的多 個文件。它可能 是 結(jié)合了所有類型的 表格到工作薄，例如圖表工作表，宏工作表，或者 VB 模塊。此外，借助 Excel還可以實現(xiàn)在AutoCAD繪圖軟件的自動展點、標(biāo)注以及數(shù)據(jù)格式的轉(zhuǎn)換等功能。隨著計算機技術(shù) 的發(fā)展，各種測量數(shù)據(jù)處理的專業(yè)軟件應(yīng)運而生，大大提高了數(shù)據(jù)處理的精度和效率。 三種方案分別為： 利用 OLE 技術(shù) 將數(shù)據(jù)導(dǎo)出到 Excel 中，生成 Excel 文件；通過 Cell組件寫數(shù)據(jù)，再通過組件將數(shù)據(jù)轉(zhuǎn)化為 Excel 文件；直接讀 寫 Excel 文件，用純代碼的方式生成 Excel 格式文件。對于我們測量來說，最繁瑣的工作之一就是對數(shù)據(jù)的處理，這就需要將數(shù)據(jù)輸出到 Excel 文件中再處理。 write data through the Cell ponents, and then through the ponent data into Excel file。而 Excel 正能滿足測量數(shù)據(jù)處理的要求 。因此，如何快速有效的將文本文件數(shù)據(jù)讀出寫入到 Excel中，這成了一個問題。 注意差異：工作 表 以及工作簿文件的一部分表格。工作域的一般結(jié)構(gòu)： 圖 23 工作域結(jié)構(gòu) 可提供的文件類型 下圖顯示的文件類型都可以適用在不同的 Excel 版本： 圖 Excel適用圖 4 二進(jìn)制交換文件格式 Excel 文件格式名為 BIFF（二進(jìn)制交 換文件格式）。 復(fù)合文檔文件 （ BIFF5BIFF8） 工作簿文件，通常是幾個表存儲使用復(fù)合文檔的文件格式 (也被稱“ OLE 存儲文件格式”或“微軟 Office 兼容的存儲文件格式 ” )。 定義：工作域流 BIFF3W— BIFF8W 工作文件存儲為流文件。 7 3 程序語言概述 本文將采用 VB 語言來編輯程序，用 VB 語言來進(jìn)行程序的開發(fā)。利用 ActiveX(TM)技術(shù)， VB 可使用如 Microsoft Word、 Microsoft Excel 及其他 Windows 應(yīng)用程序提供的功能，甚至可直接使用 VB 專業(yè)版和企業(yè)版創(chuàng)建的應(yīng)用程序?qū)ο蟆?由于 OLE提供了一種使 Windows應(yīng)用程序之間共享數(shù)據(jù)和程序的機制，而 VB很好的提供了對 OLE的支持，并以 OLE對象作為包容器，從中調(diào)用 OLE服務(wù)器 應(yīng)用程序來顯示及操作 OLE對象。這種包括鏈接和嵌入的數(shù)據(jù)的應(yīng)用程序叫做容器應(yīng)用程序 ,如 Visual Basic ,而對鏈接和嵌入的數(shù)據(jù)提供編輯服務(wù)的程序叫做服務(wù)器應(yīng)用程序 ,如 Excel ,Word 等。 鏈接與嵌入 鏈接對象的數(shù)據(jù)保存在 OLE服務(wù)器創(chuàng)建的文件 中 ， 嵌入對象的數(shù)據(jù)保存在 OLE應(yīng)用程序中。不足之處是應(yīng)用程序的規(guī)模因為保存了 OLE數(shù)據(jù)而增大了。 OLE項目是代表鏈接或嵌入數(shù)據(jù)的 OLE文件中的一部分。 OLE對象是指由支持 OLE技術(shù)的應(yīng)用程序（ OLE服務(wù)器）可提供的數(shù)據(jù)。 使用這種方法有很多的優(yōu)點，如可在程序運行動態(tài)建立或修改 OLE對象；鼠標(biāo)雙擊OLE對象后出現(xiàn)可編輯 OLE對象數(shù)據(jù)的菜單和工具欄。 Worksheets對象表示某個 Excel工作簿中的所有工作表 ， 而 Worksheet對 象表示其中的某個指定的工作表。 (2)在通用對象的聲明過程中定義 Excel對象： Dim xlApp As Dim xlBook As Dim xlSheet As (3)在程序中操作 Excel表常用命令： Set xlApp = CreateObject()’創(chuàng)建 Excel對象 Set xlBook = (文件名 )’打開已經(jīng)存在的 Excel工件簿文件 = True ’設(shè)置 Excel對象可見 (或不可見 ) Set xlSheet = (表名 ) ’設(shè)置活動工作表 (row,col)=值 ’給單元格 (row,col)賦值 ’打印工作表 (True) ’關(guān)閉工作簿 ’結(jié)束 Excel對象 Set xlApp = Nothing ’釋放 xlApp對象 (xlAutoOpen) ’運行 Excel啟動宏 (xiAutoClose) ’運行 Excel關(guān)閉宏 (4)在運用以上 VB命令操作 Excel表時，除非設(shè)置 Excel對象不可見，否則 VB程序可繼續(xù)執(zhí)行其他操作，也能夠關(guān)閉 Excel，同時也可對 Excel進(jìn)行操作。其報表界面美觀，打印輸出 方便，還支持多種語言開發(fā)。支持 html， Asp， VBScript， Java Script等語言。 Excel將選擇區(qū)域與原來反色，這樣對比非常強烈，而 Cell采用特有的顏色算法，使你能清楚的區(qū)分選擇區(qū)域，又使眼睛受到的刺激最小。除了數(shù)值與字符串兩種數(shù)據(jù)類型外， Cell還定義了單元格數(shù)據(jù)類型與區(qū)域數(shù)據(jù)類型，極大地增強了函數(shù)的易用 15 性。 Cell 組件的屬性 下面介紹下 Cell常用的屬性： AllowDragdrop = [True/False] 返回或設(shè)置在 Cell組件中是否能通過鼠標(biāo)對選中的單元格區(qū)域進(jìn)行施放 AllowExtend = [True/False] 設(shè)置、獲得 Cell空間是否能通過鼠標(biāo)在單元格右下角拖動擴展區(qū)域 Readonly = [Ture/False] 設(shè)置 /獲得 Cell控件是否全表只讀 [ = Color] 設(shè)置 /獲得 Cell控件單元格中公式中文的顏 色 [ = Color] 設(shè)置 /獲得 Cell控件中當(dāng)前被選擇單元格的背景顏色 Cell 組件的事件 簡單介紹幾個 Cell組件的事件 ChangeCell(Long Col, Long Row, Lpctstr Text) ChangeCell事件用于在單元格內(nèi)容被改變時觸發(fā)該事件 SelChanged(Long Coll,Long R1, Long C2,Long Row2) Selchanged事件用于在選擇單元格時觸發(fā)該事件 AllowMerge(Long C1,Long R1, Long C2,Long R2, Long FAR*Approve) 17 AllowMerge用于當(dāng)合并單元格時觸發(fā)該事件 AllowDrop(Long Col1, Long Row1, Long Col2, Long Row2, Long DropCol, Long DropRow,Long FAR*Approve) AllowDrop事件用于當(dāng)拖拽單元格結(jié)束時觸發(fā)該事件 AllowEditCell(Long Col, Long Row, Long Far*Approve) AllowEditCell事件用于當(dāng)單元格進(jìn)入編輯狀態(tài)時觸發(fā)該事件 直 接讀寫 Excel 文件 直接讀 寫 Excel 文件這種方法，減少了很多不需要的外界工具。 Excel 文件包含了多種類型的 BIFF 記錄。 BOF(文件開頭 ) 第一條記錄在每一個電子表格總是 BOF 類型（圖 42） 表 42 頭兩個字節(jié)，低字節(jié)安排在前，表明 BOF 是 09h。然而，這并不便于電腦，因為它們不能有效地處理函數(shù)。 ROW 1 對應(yīng)工作表的行 2 ，依此類推。文件沒有必要存在所有類型，但那些都是在同一秩序下存在。 記錄類型：尺寸 描述：電子數(shù)據(jù)表的整體規(guī)?；蚍秶? 記錄單元長度： 8 個字節(jié) 記錄單元字節(jié)結(jié)構(gòu)： 20 注：最后一列和一欄的記錄都大于最高被占領(lǐng)的編號。 表 45 Unicode 字符串（ BIFF8）