C#: 向Word插入排版精良的Text Box

た入场券 2023-10-16 22:21 11阅读 0赞

Text Box（文本框）是Word排版的工具之一。在Word文档正文的任何地方插入文本框，可添加补充信息，放在合适的位置，也不会影响正文内容的连续性。我们可以设置文本框的大小，线型，内部边距，背景填充效果。文本框内可以图文混排，设置字体，字号，图片大小等排版。 在日常使用中，我们很容易忽略这些元素，仅仅插入一个黑色单线，仅含文字的文本框。因而，我觉得有必要向大家介绍并制作一个版式精良的文本框，借以抛砖引玉。

本篇博文主要介绍，如何使用C\#在Word文档的特定位置，插入一个有图片填充，内部边距，图文混排，线型精致的文本框。感兴趣的博友请从E-iceblue[下载Free Spire.Doc][Free Spire.Doc]，并添加为Visual Studio引用。

**命名空间:**

***步骤详解：***  
**步骤一：**加载一个只含有文本的Word文档，如下图。

Document document = new Document();
                document.LoadFromFile("李白生平.docx");

![这里写图片描述][20151020102730173]

**步骤二：**在加载的Word文档中添加一个文本框，并设定其具体位置。这里需要考虑两点：插入的页和页面的位置。即：在哪一页插入这个文本框，文本框在该页的位置。只有定位好这两点，文本框的位置才能具体确认。此外，还需考虑文本框和文本的位置关系，即设置位置和自动换行（text wrapping）。所以，以下代码，通过设定文本框在哪一段落，相较于页面的位置和自动换行，来确定其位置。

TextBox TB = document.Sections[0].Paragraphs[0].AppendTextBox(150, 300);
                TB.Format.HorizontalOrigin = HorizontalOrigin.Page;
                TB.Format.HorizontalPosition = 370;
                TB.Format.VerticalOrigin = VerticalOrigin.Page;
                TB.Format.VerticalPosition = 155;
    
                TB.Format.TextWrappingStyle = TextWrappingStyle.Square;
                TB.Format.TextWrappingType = TextWrappingType.Both;

**步骤三：**设置文本框框的颜色，内部边距，图片填充。

TB.Format.LineStyle = TextBoxLineStyle.Double;
                TB.Format.LineColor = Color.LightGoldenrodYellow;
                TB.Format.LineDashing = LineDashing.Solid;
                TB.Format.LineWidth = 3;
    
                TB.Format.InternalMargin.Top = 12;
                TB.Format.InternalMargin.Bottom = 8;
                TB.Format.InternalMargin.Left = 12;
                TB.Format.InternalMargin.Right = 12;
    
                TB.Format.FillEfects.Type = BackgroundType.Picture;
                TB.Format.FillEfects.Picture = Image.FromFile("2.jpg");

**步骤四：**在文本框内添加段落文本，图片，设置字体，字体颜色，行间距，段后距，对齐方式等。然后保存文档，打开查看效果。

Paragraph para1 = TB.Body.AddParagraph();
                para1.Format.AfterSpacing = 6;
                para1.Format.HorizontalAlignment = HorizontalAlignment.Center;
                TextRange TR1 = para1.AppendText("李白");
                TR1.CharacterFormat.FontName = "华文新魏";
                TR1.CharacterFormat.FontSize = 16;
                TR1.CharacterFormat.Bold = true;
    
                Paragraph para2 = TB.Body.AddParagraph();
                Image image = Image.FromFile("李白.jpg");
                DocPicture picture = para2.AppendPicture(image);
                picture.Width = 120;
                picture.Height = 160;
                para2.Format.AfterSpacing = 8;
                para2.Format.HorizontalAlignment = HorizontalAlignment.Center;
    
                Paragraph para3 = TB.Body.AddParagraph();
                TextRange TR2 = para3.AppendText("盛唐最杰出的诗人，中国历史最伟大的浪漫主义诗人杜甫赞其文章“笔落惊风雨，诗成泣鬼神”");
                TR2.CharacterFormat.FontName = "华文新魏";
                TR2.CharacterFormat.FontSize = 11;
                para3.Format.LineSpacing = 15;
                para3.Format.HorizontalAlignment = HorizontalAlignment.Left;
                para3.Format.SuppressAutoHyphens = true;
    
                document.SaveToFile("R1.docx");
                System.Diagnostics.Process.Start("R1.docx");

**效果图：**  
![这里写图片描述][20151020103200085]

完整代码：

using System;
    using System.Collections.Generic;
    using System.Linq;
    using System.Text;
    using Spire.Doc;
    using Spire.Doc.Fields;
    using Spire.Doc.Documents;
    using System.Drawing;
    
    namespace textbox
    {
        class Program
        {
            static void Main(string[] args)
            {
                Document document = new Document();
                document.LoadFromFile("李白生平.docx");
    
                TextBox TB = document.Sections[0].Paragraphs[0].AppendTextBox(150, 300);
                TB.Format.HorizontalOrigin = HorizontalOrigin.Page;
                TB.Format.HorizontalPosition = 370;
                TB.Format.VerticalOrigin = VerticalOrigin.Page;
                TB.Format.VerticalPosition = 155;
    
                TB.Format.TextWrappingStyle = TextWrappingStyle.Square;
                TB.Format.TextWrappingType = TextWrappingType.Both;
    
                TB.Format.LineStyle = TextBoxLineStyle.Double;
                TB.Format.LineColor = Color.LightGoldenrodYellow;
                TB.Format.LineDashing = LineDashing.Solid;
                TB.Format.LineWidth = 3;
    
                TB.Format.InternalMargin.Top = 12;
                TB.Format.InternalMargin.Bottom = 8;
                TB.Format.InternalMargin.Left = 12;
                TB.Format.InternalMargin.Right = 12;
    
                TB.Format.FillEfects.Type = BackgroundType.Picture;
                TB.Format.FillEfects.Picture = Image.FromFile("2.jpg");
    
                Paragraph para1 = TB.Body.AddParagraph();
                para1.Format.AfterSpacing = 6;
                para1.Format.HorizontalAlignment = HorizontalAlignment.Center;
                TextRange TR1 = para1.AppendText("李白");
                TR1.CharacterFormat.FontName = "华文新魏";
                TR1.CharacterFormat.FontSize = 16;
                TR1.CharacterFormat.Bold = true;
    
                Paragraph para2 = TB.Body.AddParagraph();
                Image image = Image.FromFile("李白.jpg");
                DocPicture picture = para2.AppendPicture(image);
                picture.Width = 120;
                picture.Height = 160;
                para2.Format.AfterSpacing = 8;
                para2.Format.HorizontalAlignment = HorizontalAlignment.Center;
    
                Paragraph para3 = TB.Body.AddParagraph();
                TextRange TR2 = para3.AppendText("盛唐最杰出的诗人，中国历史最伟大的浪漫主义诗人杜甫赞其文章“笔落惊风雨，诗成泣鬼神”");
                TR2.CharacterFormat.FontName = "华文新魏";
                TR2.CharacterFormat.FontSize = 11;
                para3.Format.LineSpacing = 15;
                para3.Format.HorizontalAlignment = HorizontalAlignment.Left;
                para3.Format.SuppressAutoHyphens = true;
    
                document.SaveToFile("R1.docx");
                System.Diagnostics.Process.Start("R1.docx");
    
            }
        }
    }

[Free Spire.Doc]: http://www.e-iceblue.com/Download/download-word-for-net-free.html
[20151020102730173]: https://img-blog.csdn.net/20151020102730173
[20151020103200085]: https://img-blog.csdn.net/20151020103200085