vb.net设置word VBNET教程

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

你可以参考下这篇教程里面的方法C#设置段落间距，不过需要在你的工程文件中引用Spire.Doc.dll这个类库，

创新互联公司主要从事网页设计、PC网站建设（电脑版网站建设）、wap网站建设（手机版网站建设）、成都响应式网站建设公司、程序开发、网站优化、微网站、小程序设计等，凭借多年来在互联网的打拼，我们在互联网网站建设行业积累了丰富的网站制作、成都网站建设、网站设计、网络营销经验，集策划、开发、设计、营销、管理等多方位专业化运作于一体。

vb.net 关于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)

'创建文档

Document doc = New Document()

'添加section

Dim s As Section = doc.AddSection()

'添加段落

Dim para As Paragraph = s.AddParagraph()

para.AppendText("这是测试文字，这是测试文字，这是测试文字，这是测试文字，这是测试文字，" +

"这是测试文字，这是测试文字，这是测试文字，这是测试文字，这是测试文字，这是测试文字，"+

"这是测试文字，这是测试文字，这是测试文字，这是测试文字。")

'设置段落中行距

para.Format.LineSpacing = 20f

'创建段落样式

Dim style As ParagraphStyle = New ParagraphStyle(doc)

style.Name = "paraStyle"

style.CharacterFormat.FontName = "宋体"

style.CharacterFormat.FontSize = 13

doc.Styles.Add(style)

'应用段落样式

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直接修改成数值4，也就是变成 Unit:=4 试试看！

同时将后面的：Alignment:=WDAPP.wdAlignTabRight改成：Alignment:=2,

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

如果今后遇到这种问题，直接打开Word，然后

sub xx()

msgbox wdParagraph

end sub

就可以得到wdParagraph的真实值。

vb.net 如何创建一个word文档

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

System.IO.Directory.CreateDirectory("C:\我的文件夹") '创建目录,路径就自己改吧,如果路径存在,就没必要创建了

System.IO.File.Create("C:\我的文件夹\我的文件.doc") '在指定目录下创建word文档