將WDApp.wdParagraph直接修改成數(shù)值4,也就是變成 Unit:=4 試試看!
網(wǎng)站設(shè)計(jì)制作、成都網(wǎng)站建設(shè)的關(guān)注點(diǎn)不是能為您做些什么網(wǎng)站,而是怎么做網(wǎng)站,有沒(méi)有做好網(wǎng)站,給創(chuàng)新互聯(lián)一個(gè)展示的機(jī)會(huì)來(lái)證明自己,這并不會(huì)花費(fèi)您太多時(shí)間,或許會(huì)給您帶來(lái)新的靈感和驚喜。面向用戶友好,注重用戶體驗(yàn),一切以用戶為中心。
同時(shí)將后面的:Alignment:=WDAPP.wdAlignTabRight改成:Alignment:=2,
將Leader:=WDAPP.wdTabLeaderDashes改成: Leader:=2
如果今后遇到這種問(wèn)題,直接打開(kāi)Word,然后
sub xx()
msgbox wdParagraph
end sub
就可以得到wdParagraph的真實(shí)值。
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
System.IO.Directory.CreateDirectory("C:\我的文件夾") '創(chuàng)建目錄,路徑就自己改吧,如果路徑存在,就沒(méi)必要?jiǎng)?chuàng)建了
System.IO.File.Create("C:\我的文件夾\我的文件.doc") '在指定目錄下創(chuàng)建word文檔
End Sub
不清楚報(bào)錯(cuò)信息,只能給以下提示:
1、工程--引用,選Microsoft Word 11.0 Object Library
2、聲明并賦值word程序相關(guān)變量,注意步驟不能亂。
Dim appObj As New Word.Application '新建一個(gè)word程序?qū)ο?/p>
Dim docObj As Word.Document '聲明文檔對(duì)象,也可以用new新建
Dim strFile As String = "D:\MyDocu.doc"
docObj = appObj.Documents.Open(strFile, False, False, False, "", "", False, "", "", , False, False, False) '打開(kāi)文檔
docObj.Activate()'激活文檔
.......
With docObj
.Save()
.Close()
End With
docObj = Nothing
appObj = Nothing
注意:聲明word對(duì)象和文檔對(duì)象,應(yīng)該提示錯(cuò)誤,你只需要點(diǎn)擊“示警”圖標(biāo),在展打的選項(xiàng)里選第1項(xiàng)導(dǎo)入就可以了。
當(dāng)前名稱:vb.net寫(xiě)word VBNET教程
本文路徑:http://chinadenli.net/article42/hgdghc.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供網(wǎng)站策劃、建站公司、網(wǎng)站維護(hù)、定制網(wǎng)站、虛擬主機(jī)、移動(dòng)網(wǎng)站建設(shè)
聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請(qǐng)盡快告知,我們將會(huì)在第一時(shí)間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場(chǎng),如需處理請(qǐng)聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時(shí)需注明來(lái)源: 創(chuàng)新互聯(lián)