本文將以C#程序代碼為例介紹如何來讀取txt文件中的內容數據庫word文檔生成器,生成Word文檔。在編輯代碼前,可參考如下代碼環境進行配置:
dll文件安裝(3種方法)1.通過NuGet安裝dll(2種方法)
1.1 可以在 中打開“解決方案資源管理器”數據庫word文檔生成器,鼠標右鍵點擊“引用”,“管理NuGet包”,然后搜索“Free Spire.Doc”,點擊“安裝”。等待程序安裝完成。
1.2 將以下內容復制到PM控制臺安裝。
- .Doc - 9.9.7
2.手動添加dll引用
可通過手動下載包,然后解壓,找到BIN文件夾下的Spire.Doc.dll。然后在 中打開“解決方案資源管理器”,鼠標右鍵點擊“引用”,“添加引用”,將本地路徑BIN文件夾下的dll文件添加引用至程序。
讀取txt生成Word
C#
using Spire.Doc;
using Spire.Doc.Documents;
using System.Drawing;
using System.IO;
using System.Text;
namespace CreateWordDocument_Doc
{
class Program
{
static void Main(string[] args)
{
//實例化Document類的對象,并添加section和paragraph
Document doc = new Document();
Section section = doc.AddSection();
Paragraph paragraph = section.AddParagraph();
//讀取txt文件
StreamReader sr = new StreamReader("test.txt", Encoding.Default);
string line;
while ((line = sr.ReadLine()) != null)
{
paragraph.AppendText(line);//在段落中寫入txt
//設置段落樣式,并應用到段落
ParagraphStyle style1 = new ParagraphStyle(doc);
style1.Name = "titleStyle";
style1.CharacterFormat.Bold = true;
style1.CharacterFormat.TextColor = Color.Purple;
style1.CharacterFormat.FontName = "宋體";
style1.CharacterFormat.FontSize = 12;
doc.Styles.Add(style1);
paragraph.ApplyStyle("titleStyle");
}
//保存為docx格式的Word
doc.SaveToFile("addTxttoWord.docx", FileFormat.Docx2013);
System.Diagnostics.Process.Start("addTxttoWord.docx");
}

}
}
VB.NET
Imports Spire.Doc
Imports Spire.Doc.Documents
Imports System.Drawing
Imports System.IO
Imports System.Text
Namespace CreateWordDocument_Doc
Class Program
Private Shared Sub Main(args As String())
'實例化Document類的對象,并添加section和paragraph
Dim doc As New Document()
Dim section As Section = doc.AddSection()
Dim paragraph As Paragraph = section.AddParagraph()
'讀取txt文件
Dim sr As New StreamReader("test.txt", Encoding.[Default])
Dim line As String
While (InlineAssignHelper(line, sr.ReadLine())) IsNot Nothing
paragraph.AppendText(line)
'在段落中寫入txt
'設置段落樣式,并應用到段落
Dim style1 As New ParagraphStyle(doc)
style1.Name = "titleStyle"
style1.CharacterFormat.Bold = True
style1.CharacterFormat.TextColor = Color.Purple
style1.CharacterFormat.FontName = "宋體"
style1.CharacterFormat.FontSize = 12
doc.Styles.Add(style1)
paragraph.ApplyStyle("titleStyle")
End While
'保存為docx格式的Word
doc.SaveToFile("addTxttoWord.docx", FileFormat.Docx2013)
System.Diagnostics.Process.Start("addTxttoWord.docx")
End Sub
Private Shared Function InlineAssignHelper(Of T)(ByRef target As T, value As T) As T
target = value
Return value
End Function
End Class
End Namespace
效果圖:
注意事項
代碼中的txt文件和生成的Word文檔路徑為F:\\oc\oc\bin\Debug下,文件路徑也可以自定義。
—End—