无法在vb.net中打开pdf文件

Imports iTextSharp.text
Imports iTextSharp.text.pdf

Dim reader As New PdfReader("path_to_your_pdf_file.pdf")
Dim numberOfPages As Integer = reader.NumberOfPages

For page As Integer = 1 To numberOfPages
    Dim currentPage As PdfDictionary = reader.GetPageN(page)
    Dim resources As PdfDictionary = currentPage.GetAsDict(PdfName.RESOURCES)
    Dim content As PdfDictionary = resources.GetAsDict(PdfName.CONTENTS)
    Dim pageContents As PdfStream = DirectCast(PdfReader.GetPdfObject(content.GetAsIndirectObject(0)), PdfStream)
    Dim pageContentBytes As Byte() = PdfReader.GetStreamBytes(pageContents)
    
    ' 处理页面内容，例如将其显示在一个PictureBox控件中
Next

reader.Close()