復(fù)制 Word 段落時(shí)，用戶可以選擇僅復(fù)制文本或復(fù)制段落的所有元素，例如格式、圖像、超鏈接等。本指南中的解決方案介紹了如何在 C# 中將 Word 段落（文本和格式）從一個(gè)文檔復(fù)制到另一個(gè)文檔和VB.NET 通過 Spire.Doc for .NET。

Spire.Doc for.NET 最新下載

Spire.Doc for .NET是一個(gè)獨(dú)立的 .NET Word 組件，它提供了一個(gè)方法Paragraph.Clone()來允許用戶復(fù)制段落。以下屏幕截圖顯示了復(fù)制后的結(jié)果。

下載并安裝 Spire.Doc for .NET并按照步驟復(fù)制 Word 段落。首先，從指定的文檔初始化一個(gè)文檔實(shí)例 doc1 和一個(gè)新的文檔實(shí)例 doc2。其次，初始化兩個(gè)Paragraph實(shí)例p1和p2，它們是doc1的標(biāo)題和第一段。第三，實(shí)例化一個(gè)新的 Section 實(shí)例和兩個(gè) Paragraph 實(shí)例。將調(diào)用 Paragraph.Clone() 后的結(jié)果分配為這兩個(gè)實(shí)例的值。然后，使用參數(shù)paragraph 調(diào)用Section.Paragraph.Add 方法將復(fù)制的段落添加到新文檔中。代碼如下：

[C＃]

using Spire.Doc;
using Spire.Doc.Documents;
using System.Drawing;

namespace CopyParagraph
{
class Program
{
static void Main(string[] args)
{
//Load doc1
Document doc1 = new Document();
doc1.LoadFromFile(@"E:\Work\Document\A GOOD MAN IS HARD TO FIND.docx");

//Create New doc2
Document doc2 = new Document();

//Get Paragraph 1(the Title) and Paragraph 2(body) in Doc1
Section s = doc1.Sections[0];
Paragraph p1 = s.Paragraphs[0];
Paragraph p2 = s.Paragraphs[1];

//Copy p1 and p2 to doc2
Section s2 = doc2.AddSection();
Paragraph NewPara1 = (Paragraph)p1.Clone();
s2.Paragraphs.Add(NewPara1);
Paragraph NewPara2 = (Paragraph)p2.Clone();
s2.Paragraphs.Add(NewPara2);

//Add Watermark
PictureWatermark WM = new PictureWatermark();
WM.Picture = Image.FromFile(@"E:\Work\Document\Rose.jpg");
doc2.Watermark = WM;

//Save and Launch
doc2.SaveToFile("copy.docx", FileFormat.Docx2010);
System.Diagnostics.Process.Start("copy.docx");
}
}
}

[VB.NET]

Imports Spire.Doc
Imports Spire.Doc.Documents
Imports System.Drawing

Namespace CopyParagraph
Friend Class Program
Shared Sub Main(ByVal args() As String)
'Load doc1
Dim doc1 As New Document()
doc1.LoadFromFile("E:\Work\Document\A GOOD MAN IS HARD TO FIND.docx")

'Create New doc2
Dim doc2 As New Document()

'Get Paragraph 1(the Title) and Paragraph 2(body) in Doc1
Dim s As Section = doc1.Sections(0)
Dim p1 As Paragraph = s.Paragraphs(0)
Dim p2 As Paragraph = s.Paragraphs(1)

'Copy p1 and p2 to doc2
Dim s2 As Section = doc2.AddSection()
Dim NewPara1 As Paragraph = CType(p1.Clone(), Paragraph)
s2.Paragraphs.Add(NewPara1)
Dim NewPara2 As Paragraph = CType(p2.Clone(), Paragraph)
s2.Paragraphs.Add(NewPara2)

'Add Watermark
Dim WM As New PictureWatermark()
WM.Picture = Image.FromFile("E:\Work\Document\Rose.jpg")
doc2.Watermark = WM

'Save and Launch
doc2.SaveToFile("copy.docx", FileFormat.Docx2010)
System.Diagnostics.Process.Start("copy.docx")
End Sub
End Class
End Namespace

注意：因?yàn)閜aragraph.Clone() 的類型是DocumentObject，所以在新建Word 文檔doc2 中初始化段落實(shí)例時(shí)將其類型轉(zhuǎn)換為Paragraph。

Spire.Doc 作為專業(yè)的 Word 組件，在無需 Word 自動(dòng)化和任何第三方工具的情況下，在 .NET、WPF、Silverlight 中快速生成、加載、編寫、修改和保存 Word 文檔非常強(qiáng)大。

歡迎下載|體驗(yàn)更多E-iceblue產(chǎn)品