ปัญหา การใช้งาน showfiledialog and savefiledialog รบกวนผู้รู้ช่วยหน่อยครับ

 Dim pdf As New SaveFileDialog
 Dim result As Boolean = False

        pdf.Title = "Save File Dialog"
        pdf.InitialDirectory = pdf.RestoreDirectory
        pdf.Filter = "Pdf files (*.pdf)|*.pdf"
        pdf.FilterIndex = 1
        pdf.FileName = Name

        If pdf.ShowDialog() = DialogResult.OK Then
            result = Controller.Document_Download(Doc_id, pdf)
        End If
        If result Then
            MessageBox.Show("Download ไฟล์ Pdf เรียบร้อยแล้ว")
        End If