在VB.Net中将文本转换为PDF

Question

有人知道如何获取字符串并将其保存为PDF文件吗？

Dim str As String
'Put it into PDF Document
'Save to PDF DOcument

谢谢，

初学者

Answer 1

您可以使用itextSharp库来创建pdf文档。 我正在使用C＃：

你的字符串是

str="Hello World!"

使用库：

using iTextSharp.text;
using iTextSharp.text.pdf;

将文档创建为：

Document pdfDocument = new Document(PageSize.A4, 20f, 20f, 20f, 20f);

将文档写入磁盘：

PdfWriter.GetInstance(pdfDocument, new FileStream(filePathToDisk, FileMode.Create));

设置您的字符串：

Paragraph newParagraph = new Paragraph(str);

pdfDocument.Open();
pdfDocument.Add(newParagraph);
pdfDocument.Close();
pdfDocument.Dispose();

这将创建您的Pdf文件。

Answer 2

尝试为此使用Docotic.Pdf库 （免责声明：我是该库的开发人员之一）。

下面是一个示例，该示例显示如何绘制指定矩形中内接的单行文本或多行文本。

Imports System.Diagnostics
Imports System.Drawing

Imports BitMiracle.Docotic.Pdf

Namespace BitMiracle.Docotic.Pdf.Samples
    Public NotInheritable Class DrawText
        Public Shared Sub Main()
            Dim pathToFile As String = "DrawText.pdf"

            Using pdf As New PdfDocument()
                Dim canvas As PdfCanvas = pdf.Pages(0).Canvas

                canvas.DrawString(10, 50, "Hello, world!")

                Const longString As String = "Lorem ipsum dolor sit amet, consectetur adipisicing elit"
                canvas.DrawString(longString, New RectangleF(10, 70, 40, 150), PdfTextAlign.Left, PdfVerticalAlign.Top)
                canvas.DrawText(longString, New RectangleF(70, 70, 40, 150), PdfTextAlign.Left, PdfVerticalAlign.Top)

                pdf.Save(pathToFile)
            End Using

            Process.Start(pathToFile)
        End Sub
    End Class
End Namespace