主题：[求助]请教一下

代码没问题，报什么错？你写到最后有没问题？

这样处理一下即可，如

CType(pdf,System.ComponentModel.ISupportInitialize).BeginInit()

'设置的代码，如

pdf.ShowTitleBar(False)

CType(pdf,System.ComponentModel.ISupportInitialize).EndInit()

写到最后

Dim dlg As New OpenFileDialog '定义一个新的OpenFileDialog

dlg.Filter= "PDF文件|*.pdf" '设置筛选器

If dlg.ShowDialog = DialogResult.Ok Then '如果用户单击了确定按钮
   
    Dim tab As WinForm.TabControl = e.Form.Controls("TabControl1") '声明页面集合
    Dim pdf As new AxFoxitReaderSDKProLib.AxFoxitReaderSDK '声明PDF的SDK
    pdf.Dock =  System.Windows.Forms.DockStyle.Fill '定义打开的PDF文件填充范围为页面集合区域)
   
    Dim finfo As new FileInfo(dlg.FileName) '声明打开文件的"路径+文件名"
   
    Dim name = finfo.Name.Replace(finfo.Extension, "") '声明打开文件的文件名
   
    tab.TabPages.Add(name, name) '添加页面集合的页面,并将页面名称及页面标题定义为其打开的文件名
   
    Dim pb = tab.BaseControl
   
    PB.TabPages(name).Controls.add(pdf)
   
    tab.SelectedPage = tab.TabPages(name)
   
    pdf.openfile(dlg.FileName,"")
    pdf.ShowTitleBar(False)
End If