C#/VB.NET 设置Word表格边框

概述

文本讲述通过C#和VB.NET程序代码给Word中的表格设置边框的方法，可分为给Table表格设置边框、给表格中的指定Cell设置边框，设置边框时，可设置边框颜色、边框类型、边框线条样式、边框线条粗细等等。

工具导入

编辑代码前，先下载需要的Word类库工具，本文中使用的是Spire的免费版库Free Spire.Doc for .NET。下载后，需要解压安装。在VS程序中将安装路径下Bin文件下的Spire.Doc.dll文件添加引用到“解决方案资源管理器”，如下添加引用结果：

代码示例

1. 设置Table边框

[C#]

1. using Spire.Doc;
   
2. using System.Drawing;
   
3. 
   
4. namespace SetTableBorder_Doc
   
5. {
   
6.     class Program
   
7.     {
   
8.         static void Main(string[] args)
   
9.         {
   
10.             //加载Word文档
    
11.             Document doc = new Document();
    
12.             doc.LoadFromFile("test.docx");
    
13. 
    
14.             //获取Section
    
15.             Section section = doc.Sections[0];
    
16. 
    
17.             //获取第一个表格
    
18.             Table table = section.Tables[0] as Table;
    
19. 
    
20.             //设置上边框
    
21.             table.TableFormat.Borders.Top.BorderType = Spire.Doc.Documents.BorderStyle.DotDash;
    
22.             table.TableFormat.Borders.Top.LineWidth = 2.0F;
    
23.             table.TableFormat.Borders.Top.Color = Color.Red;
    
24.             
    
25.             //设置右边框
    
26.             table.TableFormat.Borders.Right.BorderType = Spire.Doc.Documents.BorderStyle.Double;
    
27.             table.TableFormat.Borders.Right.LineWidth = 2.0F;
    
28.             table.TableFormat.Borders.Right.Color = Color.Green;
    
29. 
    
30.             //设置下边框
    
31.             table.TableFormat.Borders.Bottom.BorderType = Spire.Doc.Documents.BorderStyle.None;
    
32. 
    
33.             //设置左边框
    
34.             table.TableFormat.Borders.Left.BorderType = Spire.Doc.Documents.BorderStyle.Hairline;
    
35.             table.TableFormat.Borders.Left.LineWidth = 2.0F;
    
36.             table.TableFormat.Borders.Left.Color = Color.Blue;
    
37. 
    
38.             //设置垂直边框
    
39.             table.TableFormat.Borders.Vertical.BorderType = Spire.Doc.Documents.BorderStyle.Dot;
    
40.             table.TableFormat.Borders.Vertical.LineWidth = 2.0F;
    
41.             table.TableFormat.Borders.Vertical.Color = Color.Orange;
    
42. 
    
43.             //设置水平边框
    
44.             table.TableFormat.Borders.Horizontal.BorderType = Spire.Doc.Documents.BorderStyle.Wave;
    
45.             table.TableFormat.Borders.Horizontal.LineWidth = 2.0F;
    
46.             table.TableFormat.Borders.Horizontal.Color = Color.Purple;
    
47. 
    
48.             
    
49.             //保存文档
    
50.             doc.SaveToFile("SetTableBorder.docx",FileFormat.Docx2013);
    
51.             System.Diagnostics.Process.Start("SetTableBorder.docx");
    
52.         }
    
53.     }
    
54. }

表格边框设置结果：

[VB.NET]

1. Imports Spire.Doc
   
2. Imports System.Drawing
   
3. 
   
4. Namespace SetTableBorder_Doc
   
5.     Class Program
   
6.         Private Shared Sub Main(args As String())
   
7.             '加载Word文档
   
8.             Dim doc As New Document()
   
9.             doc.LoadFromFile("test.docx")
   
10. 
    
11.             '获取Section
    
12.             Dim section As Section = doc.Sections(0)
    
13. 
    
14.             '获取第一个表格
    
15.             Dim table As Table = TryCast(section.Tables(0), Table)
    
16. 
    
17.             '设置上边框
    
18.             table.TableFormat.Borders.Top.BorderType = Spire.Doc.Documents.BorderStyle.DotDash
    
19.             table.TableFormat.Borders.Top.LineWidth = 2F
    
20.             table.TableFormat.Borders.Top.Color = Color.Red
    
21. 
    
22.             '设置右边框
    
23.             table.TableFormat.Borders.Right.BorderType = Spire.Doc.Documents.BorderStyle.[Double]
    
24.             table.TableFormat.Borders.Right.LineWidth = 2F
    
25.             table.TableFormat.Borders.Right.Color = Color.Green
    
26. 
    
27.             '设置下边框
    
28.             table.TableFormat.Borders.Bottom.BorderType = Spire.Doc.Documents.BorderStyle.None
    
29. 
    
30.             '设置左边框
    
31.             table.TableFormat.Borders.Left.BorderType = Spire.Doc.Documents.BorderStyle.Hairline
    
32.             table.TableFormat.Borders.Left.LineWidth = 2F
    
33.             table.TableFormat.Borders.Left.Color = Color.Blue
    
34. 
    
35.             '设置垂直边框
    
36.             table.TableFormat.Borders.Vertical.BorderType = Spire.Doc.Documents.BorderStyle.Dot
    
37.             table.TableFormat.Borders.Vertical.LineWidth = 2F
    
38.             table.TableFormat.Borders.Vertical.Color = Color.Orange
    
39. 
    
40.             '设置水平边框
    
41.             table.TableFormat.Borders.Horizontal.BorderType = Spire.Doc.Documents.BorderStyle.Wave
    
42.             table.TableFormat.Borders.Horizontal.LineWidth = 2F
    
43.             table.TableFormat.Borders.Horizontal.Color = Color.Purple
    
44. 
    
45. 
    
46.             '保存文档
    
47.             doc.SaveToFile("SetTableBorder.docx", FileFormat.Docx2013)
    
48.             System.Diagnostics.Process.Start("SetTableBorder.docx")
    
49.         End Sub
    
50.     End Class
    
51. End Namespace

2. 设置Cell边框

[C#]

1. using Spire.Doc;
   
2. using System.Drawing;
   
3. 
   
4. namespace SetCellBorder_Doc
   
5. {
   
6.     class Program
   
7.     {
   
8.         static void Main(string[] args)
   
9.         {
   
10.             //加载Word文档
    
11.             Document doc = new Document();
    
12.             doc.LoadFromFile("test.docx");
    
13. 
    
14.             //获取Section
    
15.             Section section = doc.Sections[0];
    
16. 
    
17.             //获取第一个表格
    
18.             Table table = section.Tables[0] as Table;
    
19. 
    
20.             //获取单元格，设置上、下边框
    
21.             TableCell cell1 = table[0, 0];
    
22.             cell1.CellFormat.Borders.Top.BorderType = Spire.Doc.Documents.BorderStyle.Single;
    
23.             cell1.CellFormat.Borders.Top.LineWidth = 2.0F;
    
24.             cell1.CellFormat.Borders.Top.Color = Color.Red;
    
25.             cell1.CellFormat.Borders.Bottom.BorderType = Spire.Doc.Documents.BorderStyle.DashDotStroker;
    
26.             cell1.CellFormat.Borders.Bottom.LineWidth = 2.0F;
    
27.             cell1.CellFormat.Borders.Bottom.Color = Color.Pink;
    
28. 
    
29.             //获取单元格，设置左、右边框
    
30.             TableCell cell2 = table[2, 2];
    
31.             cell2.CellFormat.Borders.Left.BorderType = Spire.Doc.Documents.BorderStyle.Hairline;
    
32.             cell2.CellFormat.Borders.Left.LineWidth = 2.0F;
    
33.             cell2.CellFormat.Borders.Left.Color = Color.Yellow;
    
34.             cell2.CellFormat.Borders.Right.BorderType = Spire.Doc.Documents.BorderStyle.Double;
    
35.             cell2.CellFormat.Borders.Right.LineWidth = 2.0F;
    
36.             cell2.CellFormat.Borders.Right.Color = Color.HotPink;
    
37. 
    
38.             //保存文档
    
39.             doc.SaveToFile("SetCellBorder.docx",FileFormat.Docx2013);
    
40.             System.Diagnostics.Process.Start("SetCellBorder.docx");
    
41.         }
    
42.     }
    
43. }

单元格边框设置结果：

[VB.NET]

1. Imports Spire.Doc
   
2. Imports System.Drawing
   
3. 
   
4. Namespace SetCellBorder_Doc
   
5.     Class Program
   
6.         Private Shared Sub Main(args As String())
   
7.             '加载Word文档
   
8.             Dim doc As New Document()
   
9.             doc.LoadFromFile("test.docx")
   
10. 
    
11.             '获取Section
    
12.             Dim section As Section = doc.Sections(0)
    
13. 
    
14.             '获取第一个表格
    
15.             Dim table As Table = TryCast(section.Tables(0), Table)
    
16. 
    
17.             '获取单元格，设置上、下边框
    
18.             Dim cell1 As TableCell = table(0, 0)
    
19.             cell1.CellFormat.Borders.Top.BorderType = Spire.Doc.Documents.BorderStyle.[Single]
    
20.             cell1.CellFormat.Borders.Top.LineWidth = 2F
    
21.             cell1.CellFormat.Borders.Top.Color = Color.Red
    
22.             cell1.CellFormat.Borders.Bottom.BorderType = Spire.Doc.Documents.BorderStyle.DashDotStroker
    
23.             cell1.CellFormat.Borders.Bottom.LineWidth = 2F
    
24.             cell1.CellFormat.Borders.Bottom.Color = Color.Pink
    
25. 
    
26.             '获取单元格，设置左、右边框
    
27.             Dim cell2 As TableCell = table(2, 2)
    
28.             cell2.CellFormat.Borders.Left.BorderType = Spire.Doc.Documents.BorderStyle.Hairline
    
29.             cell2.CellFormat.Borders.Left.LineWidth = 2F
    
30.             cell2.CellFormat.Borders.Left.Color = Color.Yellow
    
31.             cell2.CellFormat.Borders.Right.BorderType = Spire.Doc.Documents.BorderStyle.[Double]
    
32.             cell2.CellFormat.Borders.Right.LineWidth = 2F
    
33.             cell2.CellFormat.Borders.Right.Color = Color.HotPink
    
34. 
    
35.             '保存文档
    
36.             doc.SaveToFile("SetCellBorder.docx", FileFormat.Docx2013)
    
37.             System.Diagnostics.Process.Start("SetCellBorder.docx")
    
38.         End Sub
    
39.     End Class
    
40. End Namespace