所以我正在處理需要打印的表單。我想最終使用Foxit PDF打印機的PDF文件。問題是,我不知道如何獲取選定的路徑作爲文件位置,所以我不斷得到一個路徑不能爲空。 錯誤。在使用Printform時,我應該在代碼中放置文件位置? 在此代碼中,文件夾名稱是我要打印的位置。VB.net Printform找不到路徑
Private Sub BtnPrint_Click(sender As Object, e As EventArgs) Handles BtnPrint.Click
Dim folderDlg As New FolderBrowserDialog
Dim foldername As String
folderDlg.ShowNewFolderButton = True
If (folderDlg.ShowDialog() = DialogResult.OK) Then
foldername = folderDlg.SelectedPath
Dim root As Environment.SpecialFolder = folderDlg.RootFolder
End If
PrintForm1.Print()
End Sub
編輯:
實際刪除代碼的一部分,仍然得到同樣的錯誤(第一部分wasnt做任何事情先從我知道)。所有我現在使用的是:
Private Sub BtnPrint_Click(ByVal sender As System.Object, ByVal e As EventArgs) Handles BtnPrint.Click
PrintForm1.Print()
End Sub
約Printform也是微軟幫助數據庫心不是幫助,因爲我已經做正是它說,仍然獲得路徑爲空錯誤
編輯2: 所以我用此代碼現在正在工作。
Private Sub BtnPrint_Click(ByVal sender As System.Object, ByVal e As EventArgs) Handles BtnPrint.Click
PrintDialog1.PrinterSettings = PrintForm1.PrinterSettings
PrintDialog1.AllowSomePages = True
If PrintDialog1.ShowDialog = DialogResult.OK Then PrintForm1.PrinterSettings = PrintDialog1.PrinterSettings
With Me.PrintForm1
.PrintAction = Printing.PrintAction.PrintToPreview
Dim MyMargins As New Margins
With MyMargins
.Left = 10
.Right = 10
.Top = 10
.Bottom = 10
End With
.PrinterSettings.DefaultPageSettings.Margins = MyMargins
.Print()
End With
End Sub
但只要我嘗試設置應該打印的區域,我會得到以下錯誤:「打印不是powerpacks的成員」。我試圖使用根據微軟下面的代碼,這是它應該工作的方式。我不知道哪裏的錯誤來自
.Print(Me, PowerPacks.Printing.PrintForm.PrintOption.ClientAreaOnly)
我不知道如何'.PRINT()'工作 - 是使用它'root'?你確定DialogResult返回True嗎?你有調試過嗎?我認識福昕,但我不確定它在這裏如何使用 - 這是一個API /庫嗎? –
Printform.print()工作,我得到對話框來選擇打印機,並在打印機的屬性中,我可以選擇路徑,但只要我按下打印,我得到沒有選擇路徑的錯誤。 Foxit只是我正在使用的實際打印機,而且當我選擇實際的物理打印機時,我也遇到同樣的錯誤。 –
好的,但我不明白打印機如何知道上面設置的路徑是它打算使用的路徑。你可能會發布更多的代碼?我真的建議在代碼中放置斷點,並至少獲取失敗位的內部異常和/或堆棧跟蹤。 –