using Spire.Pdf;
using Spire.Pdf.Utilities;
using System.IO;
using System.Text;

namespace ExtractTable
{
class Program
{
static void Main(string[] args)
{
//實例化PdfDocument類的對象
PdfDocument pdf = new PdfDocument();

//加載PDF文檔
pdf.LoadFromFile("sample.pdf");

//創(chuàng)建StringBuilder類的對象
StringBuilder builder = new StringBuilder();

//實例化PdfTableExtractor類的對象
PdfTableExtractor extractor = new PdfTableExtractor(pdf);

//聲明一個PdfTable類的表格數(shù)組
PdfTable[] tableLists;

//遍歷PDF頁面
for (int pageIndex = 0; pageIndex < pdf.Pages.Count; pageIndex++)
{
//從頁面提取表格
tableLists = extractor.ExtractTable(pageIndex);

//判斷表格列表是否為空
if (tableLists != null && tableLists.Length > 0)
{
//遍歷表格
foreach (PdfTable table in tableLists)
{
//獲取表格中的行和列數(shù)
int row = table.GetRowCount();
int column = table.GetColumnCount();

//遍歷表格行和列
for (int i = 0; i < row; i++)
{
for (int j = 0; j < column; j++)
{
//獲取行和列中的文本
string text = table.GetText(i, j);

//寫入文本到StringBuilder容器
builder.Append(text + " ");
}
builder.Append("\r\n");
}
}
}
}
//保存提取的表格內(nèi)容為.txt文檔
File.WriteAllText("ExtractedTable.txt", builder.ToString());
}
}

Imports Spire.Pdf
Imports Spire.Pdf.Utilities
Imports System.IO
Imports System.Text

Namespace ExtractTable
Class Program
Private Shared Sub Main(args As String())
'實例化PdfDocument類的對象
Dim pdf As New PdfDocument()

'加載PDF文檔
pdf.LoadFromFile("sample.pdf")

'創(chuàng)建StringBuilder類的對象
Dim builder As New StringBuilder()

'實例化PdfTableExtractor類的對象
Dim extractor As New PdfTableExtractor(pdf)

'聲明一個PdfTable類的表格數(shù)組
Dim tableLists As PdfTable()

'遍歷PDF頁面
For pageIndex As Integer = 0 To pdf.Pages.Count - 1
'從頁面提取表格
tableLists = extractor.ExtractTable(pageIndex)

'判斷表格列表是否為空
If tableLists IsNot Nothing AndAlso tableLists.Length > 0 Then
'遍歷表格
For Each table As PdfTable In tableLists
'獲取表格中的行和列數(shù)
Dim row As Integer = table.GetRowCount()
Dim column As Integer = table.GetColumnCount()

'遍歷表格行和列
For i As Integer = 0 To row - 1
For j As Integer = 0 To column - 1
'獲取行和列中的文本
Dim text As String = table.GetText(i, j)

'寫入文本到StringBuilder容器
builder.Append(text & Convert.ToString(" "))
Next
builder.Append(vbCr & vbLf)
Next
Next
End If
Next

'保存提取的表格內(nèi)容為.txt文檔
File.WriteAllText("ExtractedTable.txt", builder.ToString())
End Sub
End Class
End Namespace