VB.NET操作Word經(jīng)驗(yàn)總結(jié)
要想作為一個優(yōu)秀的編程人員,不得不每天都進(jìn)行學(xué)習(xí),來增加自己的知識庫,以免被技術(shù)所淘汰。那么對于VB.NET的學(xué)習(xí),同樣如此,不能有一刻的停歇。那么今天就為大家?guī)砹薞B.NET操作Word的一些經(jīng)驗(yàn),以幫助大家學(xué)習(xí)。
VB.NET操作Word之1,在project\references 中加入microsoft word 9.0 object library
VB.NET操作Word之2, 啟動word
- Dim wApp As Word.Application
- Set wApp = New Word.Application
- wApp.Visible = True
關(guān)閉word
- wApp.Quit
- Set wApp = Nothing
VB.NET操作Word之3, 打開文件
- Set wDoc = Documents.Add (新建)
- ActiveDocument.SaveAs Text1.Text (保存)
- Set wDoc = Documents.Open(FileName:=Text1.Text) (打開指定文件)
以上的Documents 和 ActiveDocument 均是word object 中的已實(shí)例化了的對象,即不用set obj=new obj即可以使用的對象. 就像vb中的app、debug、err等對象,
文件打開之后,獲取光標(biāo)所在位置mySelection即可給文件添加各種數(shù)據(jù)(文本,圖像,表格等等,)
VB.NET操作Word之4,插入文本
- Dim mySelection As Word.Selection
- Set mySelection = Documents.Application.Selection
注意上面的這兩行代碼,只要有這兩行代碼,就可以使用所有的word中的宏操作。以下的代碼就是從宏中拷過來的。
- With mySelection
- .InsertAfter Text1.Text & vbCrLf
- .Font.Name = "楷體_GB2312"
- .Font.Size = 16
- .ParagraphFormat.Alignment = 1
- End With
這里有必要提到宏(macro)在word編程的重要性,幾乎所有的word操作,只要你能夠通過word可以實(shí)現(xiàn),就可以編程實(shí)現(xiàn)
VB.NET操作Word之5,插入圖像
- Documents.Application.Selection.InlineShapes.
AddPicture text1.text
VB.NET操作Word之6,插入表格
因?yàn)閑xcel中處理表格的能力要比word的處理能力要強(qiáng),所以可以在excel中生成了表格之后再復(fù)制到word當(dāng)中
【編輯推薦】