当前位置 : 主页 > 网络编程 > c#编程 >

C#给Word不同页面设置不同背景

来源:互联网 收集:自由互联 发布时间:2021-05-09
给Word文档设置背景时,通常只能针对整篇文档设置统一的背景,如果需要对某些页面单独设置背景,则需要通过另外的方式来实现。本文通过C# 程序代码演示如何来实现。并附VB.NET代码

给Word文档设置背景时,通常只能针对整篇文档设置统一的背景,如果需要对某些页面单独设置背景,则需要通过另外的方式来实现。本文通过C# 程序代码演示如何来实现。并附VB.NET代码作参考。

思路:通过在页眉中添加形状或者图片,并将形状或图片平铺(即设置形状或图片大小为页面大小)到整个页面。添加背景时,通过添加形状并设置形状颜色来设置成纯色背景效果;通过添加图片来实现图片背景效果。

本次程序运行环境中包括:引入Spire.Doc.dll;.Net Framework 4.5.1

设置不同背景时,分以下2种情况:

1. 只需设置首页背景和其他页面不同

1.1 设置纯色背景

【C#】

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

namespace DifferentBackground1
{
 class Program
 {
 static void Main(string[] args)
 {
  //加载Word测试文档
  Document doc = new Document();
  doc.LoadFromFile("测试.docx");

  //获取第一节
  Section section = doc.Sections[0];

  //设置首页页眉页脚不同
  section.PageSetup.DifferentFirstPageHeaderFooter = true;

  //在首页页眉添加形状
  HeaderFooter firstpageheader = section.HeadersFooters.FirstPageFooter;//获取首页页眉
  firstpageheader.Paragraphs.Clear();//清除页眉默认的段落格式(因默认页眉格式中包含有一条横线)
  Paragraph firstpara = firstpageheader.AddParagraph();//重新添加段落
  float width = section.PageSetup.PageSize.Width;//获取页面宽度、高度
  float height = section.PageSetup.PageSize.Height;
  ShapeObject shape = firstpara.AppendShape(width, height, ShapeType.Rectangle);//添加形状
  shape.BehindText = true;//设置形状衬于文字下方
  shape.HorizontalAlignment = ShapeHorizontalAlignment.Center;//设置对齐方式,铺满页面
  shape.VerticalOrigin = VerticalOrigin.TopMarginArea;
  shape.FillColor = Color.LightBlue;//形状颜色


  //在其他页面的页眉中添加形状
  HeaderFooter otherheader = section.HeadersFooters.Header;
  otherheader.Paragraphs.Clear();
  Paragraph otherpara = otherheader.AddParagraph();
  ShapeObject shape1 = otherpara.AppendShape(width, height, ShapeType.Rectangle);
  shape1.BehindText = true;
  shape1.HorizontalAlignment = ShapeHorizontalAlignment.Center;
  shape1.VerticalOrigin = VerticalOrigin.TopMarginArea;
  shape1.FillColor = Color.Pink;


  //保存文档
  doc.SaveToFile("ColorBackground1.docx", FileFormat.Docx2013);
  System.Diagnostics.Process.Start("ColorBackground1.docx");
 }
 }
}

【VB.NET】

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

Namespace DifferentBackground1
 Class Program
 Private Shared Sub Main(args As String())
  '加载Word测试文档
  Dim doc As New Document()
  doc.LoadFromFile("测试.docx")

  '获取第一节
  Dim section As Section = doc.Sections(0)

  '设置首页页眉页脚不同
  section.PageSetup.DifferentFirstPageHeaderFooter = True

  '在首页页眉添加形状
  Dim firstpageheader As HeaderFooter = section.HeadersFooters.FirstPageFooter
  '获取首页页眉
  firstpageheader.Paragraphs.Clear()
  '清除页眉默认的段落格式(因默认页眉格式中包含有一条横线)
  Dim firstpara As Paragraph = firstpageheader.AddParagraph()
  '重新添加段落
  Dim width As Single = section.PageSetup.PageSize.Width
  '获取页面宽度、高度
  Dim height As Single = section.PageSetup.PageSize.Height
  Dim shape As ShapeObject = firstpara.AppendShape(width, height, ShapeType.Rectangle)
  '添加形状
  shape.BehindText = True
  '设置形状衬于文字下方
  shape.HorizontalAlignment = ShapeHorizontalAlignment.Center
  '设置对齐方式,铺满页面
  shape.VerticalOrigin = VerticalOrigin.TopMarginArea
  shape.FillColor = Color.LightBlue
  '形状颜色

  '在其他页面的页眉中添加形状
  Dim otherheader As HeaderFooter = section.HeadersFooters.Header
  otherheader.Paragraphs.Clear()
  Dim otherpara As Paragraph = otherheader.AddParagraph()
  Dim shape1 As ShapeObject = otherpara.AppendShape(width, height, ShapeType.Rectangle)
  shape1.BehindText = True
  shape1.HorizontalAlignment = ShapeHorizontalAlignment.Center
  shape1.VerticalOrigin = VerticalOrigin.TopMarginArea
  shape1.FillColor = Color.Pink


  '保存文档
  doc.SaveToFile("ColorBackground1.docx", FileFormat.Docx2013)
  System.Diagnostics.Process.Start("ColorBackground1.docx")
 End Sub
 End Class
End Namespace

1.2 设置图片背景

【C#】

using Spire.Doc;
using Spire.Doc.Documents;
using Spire.Doc.Fields;

namespace DifferentBackground1
{
 class Program
 {
 static void Main(string[] args)
 {
  //加载Word测试文档
  Document doc = new Document();
  doc.LoadFromFile("测试.docx");

  //获取第一节
  Section section = doc.Sections[0];

  //设置首页页眉页脚不同
  section.PageSetup.DifferentFirstPageHeaderFooter = true;

  HeaderFooter firstpageheader = section.HeadersFooters.FirstPageFooter;//获取首页页眉
  firstpageheader.Paragraphs.Clear();//清除页眉默认的段落格式(因默认页眉格式中包含有一条横线)
  Paragraph firstpara = firstpageheader.AddParagraph();//重新添加段落

  //获取页面宽度、高度
  float width = section.PageSetup.PageSize.Width;
  float height = section.PageSetup.PageSize.Height; 
  
  //添加图片到首页页眉
  DocPicture pic0 = firstpara.AppendPicture("1.png");
  pic0.TextWrappingStyle = TextWrappingStyle.Behind;
  pic0.HorizontalAlignment = ShapeHorizontalAlignment.Center;
  pic0.VerticalOrigin = VerticalOrigin.TopMarginArea;
  pic0.Width = width;
  pic0.Height = height;


  //在其他页面的页眉中添加图片
  HeaderFooter otherheader = section.HeadersFooters.Header;
  otherheader.Paragraphs.Clear();
  Paragraph otherpara = otherheader.AddParagraph();
  DocPicture pic1 = otherpara.AppendPicture("2.png");
  pic1.TextWrappingStyle = TextWrappingStyle.Behind;
  pic1.HorizontalAlignment = ShapeHorizontalAlignment.Center;
  pic1.VerticalOrigin = VerticalOrigin.TopMarginArea;
  pic1.Width = width;
  pic1.Height = height;


  //保存文档
  doc.SaveToFile("ImageBackground1.docx", FileFormat.Docx2013);
  System.Diagnostics.Process.Start("ImageBackground1.docx");
 }
 }
}

【VB.NET】

Imports Spire.Doc
Imports Spire.Doc.Documents
Imports Spire.Doc.Fields

Namespace DifferentBackground1
 Class Program
 Private Shared Sub Main(args As String())
  '加载Word测试文档
  Dim doc As New Document()
  doc.LoadFromFile("测试.docx")

  '获取第一节
  Dim section As Section = doc.Sections(0)

  '设置首页页眉页脚不同
  section.PageSetup.DifferentFirstPageHeaderFooter = True

  Dim firstpageheader As HeaderFooter = section.HeadersFooters.FirstPageFooter
  '获取首页页眉
  firstpageheader.Paragraphs.Clear()
  '清除页眉默认的段落格式(因默认页眉格式中包含有一条横线)
  Dim firstpara As Paragraph = firstpageheader.AddParagraph()
  '重新添加段落
  '获取页面宽度、高度
  Dim width As Single = section.PageSetup.PageSize.Width
  Dim height As Single = section.PageSetup.PageSize.Height

  '添加图片到首页页眉
  Dim pic0 As DocPicture = firstpara.AppendPicture("1.png")
  pic0.TextWrappingStyle = TextWrappingStyle.Behind
  pic0.HorizontalAlignment = ShapeHorizontalAlignment.Center
  pic0.VerticalOrigin = VerticalOrigin.TopMarginArea
  pic0.Width = width
  pic0.Height = height


  '在其他页面的页眉中添加图片
  Dim otherheader As HeaderFooter = section.HeadersFooters.Header
  otherheader.Paragraphs.Clear()
  Dim otherpara As Paragraph = otherheader.AddParagraph()
  Dim pic1 As DocPicture = otherpara.AppendPicture("2.png")
  pic1.TextWrappingStyle = TextWrappingStyle.Behind
  pic1.HorizontalAlignment = ShapeHorizontalAlignment.Center
  pic1.VerticalOrigin = VerticalOrigin.TopMarginArea
  pic1.Width = width
  pic1.Height = height


  '保存文档
  doc.SaveToFile("ImageBackground1.docx", FileFormat.Docx2013)
  System.Diagnostics.Process.Start("ImageBackground1.docx")
 End Sub
 End Class
End Namespace

2. 设置指定多个页面背景不同

注:给多个页面设置不同背景时,需要通过获取不同节的页眉来设置,本次程序环境中所用源文档已设置了多个节,如需手动设置分节,可参考代码:

document.Sections[0].Paragraphs[0].InsertSectionBreak(SectionBreakType.NoBreak);

2.1 设置纯色背景

【C#】

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

namespace DifferentBackground2
{
 class Program
 {
 static void Main(string[] args)
 {
  //加载Word文档
  Document doc = new Document();
  doc.LoadFromFile("测试.docx");

  //获取第一节
  Section section1 = doc.Sections[0];

  //获取页面宽度、高度
  float width = section1.PageSetup.PageSize.Width;
  float height = section1.PageSetup.PageSize.Height;

  //添加图片到页眉
  HeaderFooter header1 = section1.HeadersFooters.Header;
  header1.Paragraphs.Clear();
  Paragraph para1 = header1.AddParagraph();
  ShapeObject shape1 = para1.AppendShape(width, height, ShapeType.Rectangle);//添加形状
  shape1.BehindText = true;//设置形状衬于文字下方
  shape1.HorizontalAlignment = ShapeHorizontalAlignment.Center;//设置对齐方式,铺满页面
  shape1.VerticalOrigin = VerticalOrigin.TopMarginArea;
  shape1.FillColor = Color.LightSalmon;//形状颜色

  //同理设置第二节页眉中的形状
  Section section2 = doc.Sections[1];
  HeaderFooter header2 = section2.HeadersFooters.Header;
  header2.Paragraphs.Clear();
  Paragraph para2 = header2.AddParagraph();
  ShapeObject shape2 = para2.AppendShape(width, height, ShapeType.Rectangle);//添加形状
  shape2.BehindText = true;//设置形状衬于文字下方
  shape2.HorizontalAlignment = ShapeHorizontalAlignment.Center;//设置对齐方式,铺满页面
  shape2.VerticalOrigin = VerticalOrigin.TopMarginArea;
  shape2.FillColor = Color.Moccasin;//形状颜色

  //同理设置第三节中的页眉中的形状
  Section section3 = doc.Sections[2];
  HeaderFooter header3 = section3.HeadersFooters.Header;
  header3.Paragraphs.Clear();
  Paragraph para3 = header3.AddParagraph();
  ShapeObject shape3 = para3.AppendShape(width, height, ShapeType.Rectangle);//添加形状
  shape3.BehindText = true;//设置形状衬于文字下方
  shape3.HorizontalAlignment = ShapeHorizontalAlignment.Center;//设置对齐方式,铺满页面
  shape3.VerticalOrigin = VerticalOrigin.TopMarginArea;
  shape3.FillColor = Color.LawnGreen;//形状颜色

  //保存文档
  doc.SaveToFile("ColorBackground2.docx", FileFormat.Docx2013);
  System.Diagnostics.Process.Start("ColorBackground2.docx");
 }
 }
}

【VB.NET】

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

Namespace DifferentBackground2
 Class Program
 Private Shared Sub Main(args As String())
  '加载Word文档
  Dim doc As New Document()
  doc.LoadFromFile("测试.docx")

  '获取第一节
  Dim section1 As Section = doc.Sections(0)

  '获取页面宽度、高度
  Dim width As Single = section1.PageSetup.PageSize.Width
  Dim height As Single = section1.PageSetup.PageSize.Height

  '添加图片到页眉
  Dim header1 As HeaderFooter = section1.HeadersFooters.Header
  header1.Paragraphs.Clear()
  Dim para1 As Paragraph = header1.AddParagraph()
  Dim shape1 As ShapeObject = para1.AppendShape(width, height, ShapeType.Rectangle)
  '添加形状
  shape1.BehindText = True
  '设置形状衬于文字下方
  shape1.HorizontalAlignment = ShapeHorizontalAlignment.Center
  '设置对齐方式,铺满页面
  shape1.VerticalOrigin = VerticalOrigin.TopMarginArea
  shape1.FillColor = Color.LightSalmon
  '形状颜色
  '同理设置第二节页眉中的图片
  Dim section2 As Section = doc.Sections(1)
  Dim header2 As HeaderFooter = section2.HeadersFooters.Header
  header2.Paragraphs.Clear()
  Dim para2 As Paragraph = header2.AddParagraph()
  Dim shape2 As ShapeObject = para2.AppendShape(width, height, ShapeType.Rectangle)
  '添加形状
  shape2.BehindText = True
  '设置形状衬于文字下方
  shape2.HorizontalAlignment = ShapeHorizontalAlignment.Center
  '设置对齐方式,铺满页面
  shape2.VerticalOrigin = VerticalOrigin.TopMarginArea
  shape2.FillColor = Color.Moccasin
  '形状颜色
  '同理设置第三节中的页眉中的图片
  Dim section3 As Section = doc.Sections(2)
  Dim header3 As HeaderFooter = section3.HeadersFooters.Header
  header3.Paragraphs.Clear()
  Dim para3 As Paragraph = header3.AddParagraph()
  Dim shape3 As ShapeObject = para3.AppendShape(width, height, ShapeType.Rectangle)
  '添加形状
  shape3.BehindText = True
  '设置形状衬于文字下方
  shape3.HorizontalAlignment = ShapeHorizontalAlignment.Center
  '设置对齐方式,铺满页面
  shape3.VerticalOrigin = VerticalOrigin.TopMarginArea
  shape3.FillColor = Color.LawnGreen
  '形状颜色
  '保存文档
  doc.SaveToFile("ColorBackground2.docx", FileFormat.Docx2013)
  System.Diagnostics.Process.Start("ColorBackground2.docx")
 End Sub
 End Class
End Namespace

2.2 设置图片背景

【C#】

using Spire.Doc;
using Spire.Doc.Documents;
using Spire.Doc.Fields;

namespace DifferentBackground2
{
 class Program
 {
 static void Main(string[] args)
 {
  //加载Word文档
  Document doc = new Document();
  doc.LoadFromFile("测试.docx");

  //获取第一节
  Section section1 = doc.Sections[0];
  //添加图片到页眉
  HeaderFooter header1 = section1.HeadersFooters.Header;
  header1.Paragraphs.Clear();
  Paragraph para1 = header1.AddParagraph();
  DocPicture pic1 = para1.AppendPicture("1.png");
  pic1.TextWrappingStyle = TextWrappingStyle.Behind;
  pic1.HorizontalAlignment = ShapeHorizontalAlignment.Center;
  pic1.VerticalOrigin = VerticalOrigin.TopMarginArea;
  float width = section1.PageSetup.PageSize.Width;
  float height = section1.PageSetup.PageSize.Height;
  pic1.Width = width;
  pic1.Height = height;

  //同理设置第二节页眉中的图片
  Section section2 = doc.Sections[1];
  HeaderFooter header2 = section2.HeadersFooters.Header;
  header2.Paragraphs.Clear();
  Paragraph para2 = header2.AddParagraph();
  DocPicture pic2 = para2.AppendPicture("2.png");
  pic2.TextWrappingStyle = TextWrappingStyle.Behind;
  pic2.HorizontalAlignment = ShapeHorizontalAlignment.Center;
  pic2.VerticalOrigin = VerticalOrigin.TopMarginArea; 
  pic2.Width = width;
  pic2.Height = height;

  //同理设置第三节中的页眉中的图片
  Section section3 = doc.Sections[2];
  HeaderFooter header3 = section3.HeadersFooters.Header;
  header3.Paragraphs.Clear();
  Paragraph para3 = header3.AddParagraph();
  DocPicture pic3 = para3.AppendPicture("3.png");
  pic3.TextWrappingStyle = TextWrappingStyle.Behind;
  pic3.HorizontalAlignment = ShapeHorizontalAlignment.Center;
  pic3.VerticalOrigin = VerticalOrigin.TopMarginArea;
  pic3.Width = width;
  pic3.Height = height;

  //保存文档
  doc.SaveToFile("ImageBackground2.docx", FileFormat.Docx2013);
  System.Diagnostics.Process.Start("ImageBackground2.docx");
 }
 }
}

【VB.NET】

Imports Spire.Doc
Imports Spire.Doc.Documents
Imports Spire.Doc.Fields

Namespace DifferentBackground2
 Class Program
 Private Shared Sub Main(args As String())
  '加载Word文档
  Dim doc As New Document()
  doc.LoadFromFile("测试.docx")

  '获取第一节
  Dim section1 As Section = doc.Sections(0)
  '添加图片到页眉
  Dim header1 As HeaderFooter = section1.HeadersFooters.Header
  header1.Paragraphs.Clear()
  Dim para1 As Paragraph = header1.AddParagraph()
  Dim pic1 As DocPicture = para1.AppendPicture("1.png")
  pic1.TextWrappingStyle = TextWrappingStyle.Behind
  pic1.HorizontalAlignment = ShapeHorizontalAlignment.Center
  pic1.VerticalOrigin = VerticalOrigin.TopMarginArea
  Dim width As Single = section1.PageSetup.PageSize.Width
  Dim height As Single = section1.PageSetup.PageSize.Height
  pic1.Width = width
  pic1.Height = height

  '同理设置第二节页眉中的图片
  Dim section2 As Section = doc.Sections(1)
  Dim header2 As HeaderFooter = section2.HeadersFooters.Header
  header2.Paragraphs.Clear()
  Dim para2 As Paragraph = header2.AddParagraph()
  Dim pic2 As DocPicture = para2.AppendPicture("2.png")
  pic2.TextWrappingStyle = TextWrappingStyle.Behind
  pic2.HorizontalAlignment = ShapeHorizontalAlignment.Center
  pic2.VerticalOrigin = VerticalOrigin.TopMarginArea
  pic2.Width = width
  pic2.Height = height

  '同理设置第三节中的页眉中的图片
  Dim section3 As Section = doc.Sections(2)
  Dim header3 As HeaderFooter = section3.HeadersFooters.Header
  header3.Paragraphs.Clear()
  Dim para3 As Paragraph = header3.AddParagraph()
  Dim pic3 As DocPicture = para3.AppendPicture("3.png")
  pic3.TextWrappingStyle = TextWrappingStyle.Behind
  pic3.HorizontalAlignment = ShapeHorizontalAlignment.Center
  pic3.VerticalOrigin = VerticalOrigin.TopMarginArea
  pic3.Width = width
  pic3.Height = height

  '保存文档
  doc.SaveToFile("ImageBackground2.docx", FileFormat.Docx2013)
  System.Diagnostics.Process.Start("ImageBackground2.docx")
 End Sub
 End Class
End Namespace

到此这篇关于C#给Word不同页面设置不同背景的文章就介绍到这了,更多相关C#给Word设置背景内容请搜索自由互联以前的文章或继续浏览下面的相关文章希望大家以后多多支持自由互联!

网友评论