PdfDocument document = new PdfDocument();
            document.LoadFromFile(@"E:\work\A Thousand Suns.pdf");
            PdfPageBase page = document.Pages[0];

            Dim document As New PdfDocument()
            document.LoadFromFile("E:\work\A Thousand Suns.pdf")
            Dim page As PdfPageBase = document.Pages(0)
          

            Image img = Image.FromFile(@"E:\work\Documents\heaven&hell.jpg");
            page.BackgroundImage = img;

            Dim img As Image = Image.FromFile("E:\work\Documents\heaven&hell.jpg")
            page.BackgroundImage = img
          

            PdfTilingBrush brush
    = new PdfTilingBrush(new SizeF(page.Canvas.ClientSize.Width / 2, page.Canvas.ClientSize.Height / 2));
            brush.Graphics.SetTransparency(0.5f);
            brush.Graphics.TranslateTransform(brush.Size.Width / 2, brush.Size.Height / 2);
            brush.Graphics.RotateTransform(-45);

            Dim brush As New PdfTilingBrush(New SizeF(page.Canvas.ClientSize.Width \ 2, page.Canvas.ClientSize.Height \ 2))
            brush.Graphics.SetTransparency(0.5F)
            brush.Graphics.TranslateTransform(brush.Size.Width \ 2, brush.Size.Height \ 2)
            brush.Graphics.RotateTransform(-45)
          

            PdfTrueTypeFont font1 = new PdfTrueTypeFont(new Font("Calibri", 24f,FontStyle.Bold));
            brush.Graphics.DrawString("A Thousand Suns",
                font1, PdfBrushes.DarkOrange, 0, 0,
                new PdfStringFormat(PdfTextAlignment.Center));
            page.Canvas.DrawRectangle(brush, new RectangleF(new PointF(0, 0), page.Canvas.ClientSize));

            Dim font1 As New PdfTrueTypeFont(New Font("Calibri", 24.0F, FontStyle.Bold))
            brush.Graphics.DrawString("A Thousand Suns", font1, PdfBrushes.DarkOrange, 0, 0, New PdfStringFormat(PdfTextAlignment.Center))
            page.Canvas.DrawRectangle(brush, New RectangleF(New PointF(0, 0), page.Canvas.ClientSize))
          

            document.SaveToFile("Watermark.pdf");
            document.Close();
            System.Diagnostics.Process.Start("Watermark.pdf");

            document.SaveToFile("Watermark.pdf")
            document.Close()
            System.Diagnostics.Process.Start("Watermark.pdf")
          

            Workbook workbook = new Workbook();
            workbook.LoadFromFile(@"E:\work\Documents\PartSalesInfo.xlsx");
            Worksheet sheet = workbook.Worksheets[0];
            sheet.Name = "Data Source";
            Worksheet sheet2 = workbook.CreateEmptySheet();
            sheet2.Name = "Pivot Table";

            Dim workbook As New Workbook()
            workbook.LoadFromFile("E:\work\Documents\PartSalesInfo.xlsx")
            Dim sheet As Worksheet = workbook.Worksheets(0)
            sheet.Name = "Data Source"
            Dim sheet2 As Worksheet = workbook.CreateEmptySheet()
            sheet2.Name = "Pivot Table"
          

CellRange dataRange = sheet.Range["A1:G17"];
            PivotCache cache = workbook.PivotCaches.Add(dataRange);
            PivotTable pt = sheet2.PivotTables.Add("Pivot Table", sheet.Range["A1"], cache);

Dim dataRange As CellRange = sheet.Range("A1:G17")
            Dim cache As PivotCache = workbook.PivotCaches.Add(dataRange)
            Dim pt As PivotTable = sheet2.PivotTables.Add("Pivot Table", sheet.Range("A1"), cache)
          

            var r1 = pt.PivotFields["Vendor No"];
            r1.Axis = AxisTypes.Row;
            pt.Options.RowHeaderCaption = "Vendor No";

            var r2 = pt.PivotFields["Description"];
            r2.Axis = AxisTypes.Row;

            Dim r1 = pt.PivotFields("Vendor No")
            r1.Axis = AxisTypes.Row
            pt.Options.RowHeaderCaption = "Vendor No"

            Dim r2 = pt.PivotFields("Description")
            r2.Axis = AxisTypes.Row
          

pt.DataFields.Add(pt.PivotFields["OnHand"], "SUM of OnHand", SubtotalTypes.Sum);
            pt.DataFields.Add(pt.PivotFields["OnOrder"], "SUM of OnOrder", SubtotalTypes.Sum);
            pt.DataFields.Add(pt.PivotFields["ListPrice"], "Average of ListPrice", SubtotalTypes.Average);

            pt.BuiltInStyle = PivotBuiltInStyles.PivotStyleMedium12;

pt.DataFields.Add(pt.PivotFields("OnHand"), "SUM of OnHand", SubtotalTypes.Sum)
            pt.DataFields.Add(pt.PivotFields("OnOrder"), "SUM of OnOrder", SubtotalTypes.Sum)
            pt.DataFields.Add(pt.PivotFields("ListPrice"), "Average of ListPrice", SubtotalTypes.Average)

            pt.BuiltInStyle = PivotBuiltInStyles.PivotStyleMedium12
          

            workbook.SaveToFile("PivotTable.xlsx", ExcelVersion.Version2010);
            System.Diagnostics.Process.Start("PivotTable.xlsx");

            workbook.SaveToFile("PivotTable.xlsx", ExcelVersion.Version2010)
            System.Diagnostics.Process.Start("PivotTable.xlsx")
          

Document doc = new Document();
            Section section = doc.AddSection();

            // add text
            section.AddParagraph().AppendText("This is a simple test by E-iceblue Co.,Ltd");
            section.AddParagraph().AppendText("E-iceblue Co., Ltd. provides professional .NET components for .NET applications and Microsoft Visual Studio. \n");
            section.AddParagraph().AppendText("The goal of e-iceblue is always to offer high-quality components for reading and writing office file formats. E-iceblue components have been widely-used by most of the Fortune 500 corporations\n");
            section.AddParagraph().AppendText("The key developers of e-iceblue have over 10 years of combined experience developing high-performance, high-quality .net component technology\n");

            //insert page border
            section.PageSetup.Borders.BorderType = Spire.Doc.Documents.BorderStyle.ThinThickLargeGap;
          

Dim doc As New Document()
Dim section As Section = doc.AddSection()
' add text
section.AddParagraph().AppendText("This is a simple test by E-iceblue Co.,Ltd")
section.AddParagraph().AppendText("E-iceblue Co., Ltd. provides professional .NET components for .NET applications and Microsoft Visual Studio. " & vbLf)
section.AddParagraph().AppendText("The goal of e-iceblue is always to offer high-quality components for reading and writing office file formats. e-iceblue components have been widely-used by most of the Fortune 500 corporations" & vbLf)
section.AddParagraph().AppendText("The key developers of e-iceblue have over 10 years of combined experience developing high-performance, high-quality .net component technology" & vbLf)
          

            doc.SaveToFile("test.docx", FileFormat.Docx);
            System.Diagnostics.Process.Start("test.docx");
          

doc.SaveToFile("test.docx", FileFormat.Docx)
System.Diagnostics.Process.Start("test.docx")
          

using Spire.Doc;
using Spire.Doc.Documents;
using Spire.Doc.Collections;
          

Imports Spire.Doc
Imports Spire.Doc.Documents
Imports Spire.Doc.Collections
          

            //load Word document
            Document document = new Document();
            document.LoadFromFile(@"D:\Sample.doc");
          

'load Word document
Dim document As New Document()
document.LoadFromFile("D:\Sample.doc")
          

            //remove sections
            document.Sections.RemoveAt(0);
          

'remove sections
document.Sections.RemoveAt(0)
          

            //Save file
            document.SaveToFile("sample.doc", FileFormat.Doc);
          

'Save file
document.SaveToFile("sample.doc", FileFormat.Doc)
          

           using Spire.Pdf;
           using Spire.Pdf.Graphics;
           using Spire.Pdf.Tables;

Imports Spire.Pdf
Imports Spire.Pdf.Graphics
Imports Spire.Pdf.Tables
          

            //Create a pdf document.
            PdfDocument doc = new PdfDocument();
//margin
            PdfUnitConvertor unitCvtr = new PdfUnitConvertor();
            PdfMargins margin = new PdfMargins();
            margin.Top = unitCvtr.ConvertUnits(2.54f, PdfGraphicsUnit.Centimeter,             PdfGraphicsUnit.Point);
            margin.Bottom = margin.Top;
            margin.Left = unitCvtr.ConvertUnits(3.17f, PdfGraphicsUnit.Centimeter,             PdfGraphicsUnit.Point);
            margin.Right = margin.Left;
            // Create new page
            PdfPageBase page = doc.Pages.Add(PdfPageSize.A4, margin);
float y = 10;
            //title
            PdfBrush brush1 = PdfBrushes.Black;
            PdfTrueTypeFont font1 = new PdfTrueTypeFont(new Font("Arial", 16f, FontStyle.Bold));
            PdfStringFormat format1 = new PdfStringFormat(PdfTextAlignment.Center);
            page.Canvas.DrawString("Country List", font1, brush1, page.Canvas.ClientSize.Width / 2, y, format1);
            y = y + font1.MeasureString("Country List", format1).Height;
            y = y + 5;

'Create a pdf document.
Dim doc As New PdfDocument()
'margin
Dim unitCvtr As New PdfUnitConvertor()
Dim margin As New PdfMargins()
margin.Top = unitCvtr.ConvertUnits(2.54F, PdfGraphicsUnit.Centimeter, PdfGraphicsUnit.Point)
margin.Bottom = margin.Top
margin.Left = unitCvtr.ConvertUnits(3.17F, PdfGraphicsUnit.Centimeter, PdfGraphicsUnit.Point)
margin.Right = margin.Left
' Create new page
Dim page As PdfPageBase = doc.Pages.Add(PdfPageSize.A4, margin)
Dim y As Single = 10
'title
Dim brush1 As PdfBrush = PdfBrushes.Black
Dim font1 As New PdfTrueTypeFont(New Font("Arial", 16F, FontStyle.Bold))
Dim format1 As New PdfStringFormat(PdfTextAlignment.Center)
page.Canvas.DrawString("Country List", font1, brush1, page.Canvas.ClientSize.Width / 2, y, format1)
y = y + font1.MeasureString("Country List", format1).Height
y = y + 5
          

            String[] data
                = {
                    "Name;Capital;Continent;Area;Population",
                    "Argentina;Buenos Aires;South America;2777815;32300003",
                    "Bolivia;La Paz;South America;1098575;7300000",
                    "Brazil;Brasilia;South America;8511196;150400000",
                    "Canada;Ottawa;North America;9976147;26500000",
                    };
            String[][] dataSource
                = new String[data.Length][];
            for (int i = 0; i < data.Length; i++)
            {
                dataSource[i] = data[i].Split(';');
            }

Dim data As [String]() = {"Name;Capital;Continent;Area;Population", "Argentina;Buenos Aires;South America;2777815;32300003", "Bolivia;La Paz;South America;1098575;7300000", "Brazil;Brasilia;South America;8511196;150400000", "Canada;Ottawa;North America;9976147;26500000"}
Dim dataSource As [String]()() = New [String](data.Length - 1)() {}
For i As Integer = 0 To data.Length - 1
	dataSource(i) = data(i).Split(";"C)
Next
          

 PdfTable table = new PdfTable();
            table.Style.CellPadding = 2;
            table.Style.HeaderSource = PdfHeaderSource.Rows;
            table.Style.HeaderRowCount = 1;
            table.Style.ShowHeader = true;
            table.DataSource = dataSource;
            PdfLayoutResult result = table.Draw(page, new PointF(0, y));
            y = y + result.Bounds.Height + 5;
            PdfBrush brush2 = PdfBrushes.Gray;
            PdfTrueTypeFont font2 = new PdfTrueTypeFont(new Font("Arial", 9f));
            page.Canvas.DrawString(String.Format("* {0} countries in the list.", data.Length - 1), font2, brush2, 5, y);

Dim table As New PdfTable()
table.Style.CellPadding = 2
table.Style.HeaderSource = PdfHeaderSource.Rows
table.Style.HeaderRowCount = 1
table.Style.ShowHeader = True
table.DataSource = dataSource
Dim result As PdfLayoutResult = table.Draw(page, New PointF(0, y))
y = y + result.Bounds.Height + 5
Dim brush2 As PdfBrush = PdfBrushes.Gray
Dim font2 As New PdfTrueTypeFont(New Font("Arial", 9F))
page.Canvas.DrawString([String].Format("* {0} countries in the list.", data.Length - 1), font2, brush2, 5, y)
          

            //Save pdf file.
            doc.SaveToFile("SimpleTable.pdf");
            doc.Close();
            System.Diagnostics.Process.Start("SimpleTable.pdf");

'Save pdf file.
doc.SaveToFile("SimpleTable.pdf")
doc.Close()
System.Diagnostics.Process.Start("SimpleTable.pdf")
          

using System;
using System.IO;
using System.Text;
using Spire.Doc;
using Spire.Doc.Documents;

namespace ExtractText
{
    class Program
    {
        static void Main(string[] args)
        {
        }
    }
}
          

Imports System.IO
Imports System.Text
Imports Spire.Doc
Imports Spire.Doc.Documents

Namespace ExtractText
	Class Program
		Private Shared Sub Main(args As String())
		End Sub
	End Class
End Namespace
          

Document doc = new Document();
            doc.LoadFromFile(@"..\..\Test.doc",FileFormat.Doc);
          

Dim doc As New Document()
doc.LoadFromFile("..\..\Test.doc", FileFormat.Doc)
          

            //new a stringBuilder to extract text from word document
            StringBuilder sb = new StringBuilder();

            //extract text from word document
            foreach (Section section in doc.Sections)
            {
                foreach (Paragraph paragraph in section.Paragraphs)
                {
                    sb.AppendLine(paragraph.Text);
                }
            }
          

'new a stringBuilder to extract text from word document
Dim sb As New StringBuilder()

'extract text from word document
For Each section As Section In doc.Sections
	For Each paragraph As Paragraph In section.Paragraphs
		sb.AppendLine(paragraph.Text)
	Next
Next
          

            //write the text of word document into a txt file
            File.WriteAllText(@"..\..\result.txt", sb.ToString());

            //launch the text file
            System.Diagnostics.Process.Start(@"..\..\result.txt");
          

'write the text of word document into a txt file
File.WriteAllText("..\..\result.txt", sb.ToString())

'launch the text file
System.Diagnostics.Process.Start("..\..\result.txt")
          

            Workbook workbook = new Workbook();
            workbook.LoadFromFile(@"E:\work\Documents\PartSalesInfo.xlsx");
            Worksheet sheet = workbook.Worksheets[0];

            Dim workbook As New Workbook()
            workbook.LoadFromFile("E:\work\Documents\PartSalesInfo.xlsx")
            Dim sheet As Worksheet = workbook.Worksheets(0)
          

            workbook.Worksheets[0].HPageBreaks.Add(sheet.Range["A10"]);
            workbook.Worksheets[0].VPageBreaks.Add(sheet.Range["G1"]);

            workbook.Worksheets(0).HPageBreaks.Add(sheet.Range("A10"))
            workbook.Worksheets(0).VPageBreaks.Add(sheet.Range("G1"))
          

            workbook.Worksheets[0].ViewMode = ViewMode.Preview;

            workbook.Worksheets(0).ViewMode = ViewMode.Preview
          

            workbook.SaveToFile("ExcelPageBreak.xlsx", ExcelVersion.Version2010);
            System.Diagnostics.Process.Start("ExcelPageBreak.xlsx");

            workbook.SaveToFile("ExcelPageBreak.xlsx", ExcelVersion.Version2010)
            System.Diagnostics.Process.Start("ExcelPageBreak.xlsx")