在PDFSharp中创建全局文档

时间:2016-08-04 13:09:18

标签: vb.net pdfsharp

不确定这是否特定于PDFSharp,但我已经在VB.Net项目的主要形式中创建了一个PDF文档,如下所示,我想使其成为全局的,以便其他模块中的Subs可以访问它创建新页面并写入这些页面。非常感谢您的帮助。我试图将“doc”宣布为公开,但这不起作用。

这是我的代码:

[主要表格]

Public Class Form1

Public Sub Button1_Click(ByVal sender As System.Object,ByVal e As System.EventArgs)Handles Button1.Click

    Dim doc As PdfDocument = New PdfDocument
    doc.Info.Title = "Created with PDFsharp"

    Output.Addpage()

    Dim filename As String = "NewFile.pdf"
    doc.Save(filename)

    Process.Start(filename)

End Sub

结束班

输出模块

Public Sub Addpage()

    page = doc.AddPage

使用gfx作为XGraphics = XGraphics.FromPdfPage(页面)

    gfx.DrawRectangle(TablePen, dispLeftMarg - 4, dispTopMarg - 8, dispallowedL + 8, dispallowedH + 12)

    End Using
End Sub

1 个答案:

答案 0 :(得分:0)

我不知道如何在VB.NET中公开doc

在这种情况下,无论如何我都不会这样做。

doc的调用中将Public Sub Addpage()作为参数传递更为清晰。

Public Sub Addpage(ByVal doc As PdfDocument)应该可以解决问题。