Question

此代码曾经工作但不再适用。我使用了一个断点，在这一行之后：Dim jpeg As Image = Image.GetInstance("test.jpg")它只是不再执行代码了。

Imports System
Imports System.IO
Imports iTextSharp.text
Imports iTextSharp.text.pdf

Public Class Form1

    Public Sub New1()
        Directory.SetCurrentDirectory("C:\Users\alex\Desktop\") '"
        Console.WriteLine("Chapter 6 example 1: Adding a Wmf, Gif, Jpeg and Png-file using urls")
        Dim document As Document = New Document
        Try
            PdfWriter.GetInstance(document, New FileStream("Chap060112.pdf", FileMode.Create))
            document.Open()

            Dim jpeg As Image = Image.GetInstance("test.jpg")           
            document.Add(jpeg)

        Catch de As DocumentException
            Console.Error.WriteLine(de.Message)
        Catch ioe As IOException
            Console.Error.WriteLine(ioe.Message)
        End Try
        document.Close()
    End Sub

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        New1()
        End
    End Sub

End Class

Answer 1

是否抛出既不是DocumentException也不是IOException的异常？

Answer 2

  Dim jpeg As Image = Image.GetInstance("test.jpg")

可能会抛出您未处理的异常类型。

尝试添加

Catch e As Exception
   Console.Error.WriteLine(e.Message)

这仅用于调试目的，我会将Exception替换为抛出的实际异常类型。一般来说，捕获System.Exception

是一个非常糟糕的主意

Answer 3

执行此操作以查看正在抛出的异常。

Catch e As Exception
    Console.WriteLine(e.GetType().Name)
    Console.WriteLine(e.Message)
 End Try

Answer 4

尝试在“结束尝试”之前抛出另一个“Catch ex as Exception”。您可能正在尝试捕获错误的异常。

没有抓到例外

4 个答案: