如何用VB.net控制word中文字的行間距

你可以參考下這篇教程里面的方法C#設(shè)置段落間距，不過需要在你的工程文件中引用Spire.Doc.dll這個類庫，

創(chuàng)新互聯(lián)公司主要從事網(wǎng)頁設(shè)計、PC網(wǎng)站建設(shè)（電腦版網(wǎng)站建設(shè)）、wap網(wǎng)站建設(shè)（手機版網(wǎng)站建設(shè)）、成都響應(yīng)式網(wǎng)站建設(shè)公司、程序開發(fā)、網(wǎng)站優(yōu)化、微網(wǎng)站、小程序設(shè)計等，憑借多年來在互聯(lián)網(wǎng)的打拼，我們在互聯(lián)網(wǎng)網(wǎng)站建設(shè)行業(yè)積累了豐富的網(wǎng)站制作、成都網(wǎng)站建設(shè)、網(wǎng)站設(shè)計、網(wǎng)絡(luò)營銷經(jīng)驗，集策劃、開發(fā)、設(shè)計、營銷、管理等多方位專業(yè)化運作于一體。

vb.net 關(guān)于word 問題請教

從菜單：項目\添加引用，在打開的對話框的.Net頁面中找到：Microsoft.Office.Interop.Word

代碼如下：

Dim w As New Microsoft.Office.Interop.Word.Application

Dim d As Microsoft.Office.Interop.Word.Document = w.Documents.Add '添加一文檔

d.SaveAs("c:\myWord1") '保存為myWord1文件名。

d.Close()

在Com頁面也有Word對象庫的引用，大體一樣吧，只是路徑有所不同。

請教大家怎么用VB.net控制word中文字的行間

添加spire.doc.jar為依賴，百度搜索免費版的下載即可

Imports Spire.Doc

Imports Spire.Doc.Documents

Imports System.Drawing

Namespace SetRowSpace

Class Program

? Shared? Sub Main(ByVal args() As String)

? ? ? '創(chuàng)建文檔

? ? ? Document doc? =? New Document()

? ? ? '添加section

? ? ? Dim s As Section =? doc.AddSection()

? ? ? '添加段落

? ? ? Dim para As Paragraph =? s.AddParagraph()

? ? ? para.AppendText("這是測試文字，這是測試文字，這是測試文字，這是測試文字，這是測試文字，" +

? ? ? ? ? "這是測試文字，這是測試文字，這是測試文字，這是測試文字，這是測試文字，這是測試文字，"+

? ? ? ? ? "這是測試文字，這是測試文字，這是測試文字，這是測試文字。")

? ? ? '設(shè)置段落中行距

? ? ? para.Format.LineSpacing = 20f

? ? ? '創(chuàng)建段落樣式

? ? ? Dim style As ParagraphStyle =? New ParagraphStyle(doc)

? ? ? style.Name = "paraStyle"

? ? ? style.CharacterFormat.FontName = "宋體"

? ? ? style.CharacterFormat.FontSize = 13

? ? ? doc.Styles.Add(style)

? ? ? '應(yīng)用段落樣式

? ? ? para.ApplyStyle("paraStyle")

? ? ? '保存文檔

? ? ? doc.SaveToFile("SetLineSpacing.docx", FileFormat.Docx2013)

? ? ? System.Diagnostics.Process.Start("SetLineSpacing.docx")

? End Sub

End Class

End Namespace

vb.net操作word

將WDApp.wdParagraph直接修改成數(shù)值4，也就是變成 Unit:=4 試試看！

同時將后面的：Alignment:=WDAPP.wdAlignTabRight改成：Alignment:=2,

將Leader:=WDAPP.wdTabLeaderDashes改成： Leader:=2

如果今后遇到這種問題，直接打開Word，然后

sub xx()

msgbox wdParagraph

end sub

就可以得到wdParagraph的真實值。

vb.net 如何創(chuàng)建一個word文檔

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

System.IO.Directory.CreateDirectory("C:\我的文件夾") '創(chuàng)建目錄,路徑就自己改吧,如果路徑存在,就沒必要創(chuàng)建了

System.IO.File.Create("C:\我的文件夾\我的文件.doc") '在指定目錄下創(chuàng)建word文檔

End Sub

分享標題：vb.net設(shè)置word VBNET教程
網(wǎng)站鏈接：http://m.rwnh.cn/article38/hpjesp.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián)，為您提供網(wǎng)站內(nèi)鏈、小程序開發(fā)、服務(wù)器托管、網(wǎng)站改版、App設(shè)計、網(wǎng)站設(shè)計

廣告

聲明：本網(wǎng)站發(fā)布的內(nèi)容（圖片、視頻和文字）以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主，如果涉及侵權(quán)請盡快告知，我們將會在第一時間刪除。文章觀點不代表本網(wǎng)站立場，如需處理請聯(lián)系客服。電話：028-86922220；郵箱：631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載，或轉(zhuǎn)載時需注明來源： 創(chuàng)新互聯(lián)