2)在插入相應的內容時,我使用的是一個比較笨的方法,但是對于這個不規則的表格來說卻可能是最有效的方法:計算出該表格中共有多個個段落,然后通過語句在所有應插入內容的段落中插入內容。也懶得自己數了,定義了一個整型變量paraCount,將其賦值為WordDoc.Paragraphs.Count,最后用一個消息框顯示出來,得到該表格有38個段落,最后注釋掉以上代碼:)
3)接下來的工作就是數數了,數到一個該插入內容的段落,就寫一段代碼插入相應的內容。比如:“值班時間”(表頭)是第6段,接在后面該填入內容的空白段落就是第7段,于是寫代碼在第7段中插入實際內容。
最后,想說的是一個在操作Word 2000時很有用的幫助文件,VBAWRD9.CHM,里面詳細介紹了Word 2000中使用的VBA,里面介紹了很多有用的對象、屬性和方法,還有一些VB代碼作為示例,很容易可以想到對應的Delphi代碼。這個文件在Office 2000的安裝盤里面可以找到,具體路徑忘記了,煩請搜索:)
//單擊“導出到Word文檔”按鈕事件處理程序
procedure TfrmDetails.btnExportClick(Sender: TObject);
var
延伸閱讀
文章來源于領測軟件測試網 http://www.kjueaiud.com/