C#/VB.NET: 將Word或Excel文檔轉化為Text
Text文件只由純文本內容組成,且沒有格式,所以其大小比Word或Excel文件更小。除此之外,Text文件還具有跨平台性,幾乎與所有應用程式都兼容。因此,在某些時候,我們可能需要將Word或Excel文件轉換為Text。接下來,我將介紹如何使用C#和VB.NET將Word或Excel文件轉換為Text。
安裝DLL文件
在此篇文章中,我所用到的是 Spire.Office for .NET類庫,它可以通過NuGet安裝。具體步驟為:依次選擇工具>NuGet包管理器>程式包管理器控制台,然後執行以下命令:
PM> Install-Package Spire.Office
使用C#和VB.NET將Word文件轉化為Text
Spire.Office提供了Document類用於處理Word文檔,該類提供了一個SaveToText()方法用於將Word文檔轉換為Text文本。
具體轉換步驟如下:
- 初始化一個Document類的實例。
- 使用Document.LoadFromFile()方法載入Word文檔。
- 使用 Document.SaveToTxt() 方法將文檔另存為Text文本。
C#
using Spire.Doc; using System.Text; namespace ConvertWordToText { class Program { static void Main(string[] args) { //創建一個Document實例 Document document = new Document(); //載入Word文件 document.LoadFromFile("新型冠狀病毒肺炎.docx"); //將Word文件轉換為Text文件 document.SaveToTxt("新型冠狀病毒肺炎.txt", Encoding.UTF8); } } }
VB.NET:
Imports Spire.Doc Imports System.Text Namespace ConvertWordToText Friend Class Program Private Shared Sub Main(ByVal args As String()) '創建一個Document實例 Dim document As Document = New Document() '載入Word文件 document.LoadFromFile("新型冠狀病毒肺炎.docx") '將Word文件轉換為Text文件 document.SaveToTxt("新型冠狀病毒肺炎.txt", Encoding.UTF8) End Sub End Class End Namespace
原Word文檔:
轉換而來的Text文檔:
使用C#和VB.NET將Excel文件轉化為Text
Workbook類用於處理Excel文檔,該類提供了一個Worksheets屬性,用於獲取當前Excel文檔的所有工作表的集合。你可以獲取該集合內的指定工作表,也可以遍歷該集合內的每一個工作表,然後調用Worksheet.SaveToFile() 方法將其轉換為Text。
具體轉換步驟如下:
- 初始化一個Workbook類的實例。
- 使用 Workbook.LoadFromFile() 方法載入Excel文件。
- 通過Workbook.Worksheets[sheetIndex]屬性獲取指定工作表。
- 使用Worksheet.SaveToFile() 方法將工作錶轉換為Text。
C#
using Spire.Xls; using System.Text; namespace ConvertExcelToText { class Program { static void Main(string[] args) { //創建一個Workbook實例 Workbook workbook = new Workbook(); //載入Excel文件 workbook.LoadFromFile("GDP排名.xlsx"); //獲取第一個工作表 Worksheet worksheet = workbook.Worksheets[0]; //將工作表保存為Text文件 worksheet.SaveToFile("GDP排名.txt", " ", Encoding.UTF8); } } }
VB.NET
Imports Spire.Xls Imports System.Text Namespace ConvertExcelToText Friend Class Program Private Shared Sub Main(ByVal args As String()) '創建一個Workbook實例 Dim workbook As Workbook = New Workbook() '載入Excel文件 workbook.LoadFromFile("GDP排名.xlsx") '獲取第一個工作表 Dim worksheet As Worksheet = workbook.Worksheets(0) '將工作表保存為Text文件 worksheet.SaveToFile("GDP排名.txt", " ", Encoding.UTF8) End Sub End Class End Namespace
原Excel文件:
所轉換的Text文檔: