Why do you need to add this object to form anyway?

If you comment

' DocProcess_Main.Controls.Add(o_PDFReader) ' throughs error as described below

and try

o_PDFReader = null (or nothing)

at the end of your code, will it work?

>Well, it seems that this is a know issue with adobe - the reader grabs the focus after a load. I have not found a fix for this.
>
>So, I looked at an alternative to the Adobe reader and I found the FoxItReader.
>
>That one works in regards to the setting of the focus.
>
>However, now I got the problem that I need to move the pdf file after processing and the error thrown then is an access error (because the reader still has it open).
>
>I could not find a close command on that reader and just loading another blank pdf does not work either. So I thought of destroying the control and recreating it - but I got some issues with this since I am not that familiar with VB (I am realy a VFP guy :-) ).
>
>Here is what I have so far, I would appreaciate any help you could give me:

>Public Sub DestroyAndAddReader()
>        Dim n_Left, n_Top, n_Width, n_Height
>
>        n_Left = DocProcess_Main.AxAcroPDF1.Left
>        n_Top = DocProcess_Main.AxAcroPDF1.Top
>        n_Width = DocProcess_Main.AxAcroPDF1.Width
>        n_Height = DocProcess_Main.AxAcroPDF1.Height
>
>        DocProcess_Main.Controls.Remove(DocProcess_Main.AxAcroPDF1)
>
>
>        Dim o_PDFReader As New FoxitReaderOCX
>        'Dim f As System.Reflection.FieldInfo
>        'f = GetType(AxHost).GetField("licenseKey", Reflection.BindingFlags.NonPublic Or Reflection.BindingFlags.Instance)
>        'f.SetValue(o_PDFReader, "gnvlslnjskvlmlgnnimh")
>
>        DocProcess_Main.Controls.Add(o_PDFReader)                           ' throughs error as described below
>        o_PDFReader.Name = "AxAcroPDF1"
>        o_PDFReader.Location = New Point(n_Left, n_Top)
>        o_PDFReader.Size = New Size(n_Width, n_Height)
>        o_PDFReader.Show()
>
>
>        'o_PDFReader = New FoxitReaderOCX
>        'DocProcess_Main.Controls.Add(FoxitReaderOCX)
>        'DocProcess_Main.AxAcroPDF1.Name = "AxAcroPDF1"
>
>        'DocProcess_Main.AxAcroPDF1.Location = New(Point(n_Left, n_Top))
>        'DocProcess_Main.AxAcroPDF1.Size = New Size(n_Width, n_Height)
>        'DocProcess_Main.AxAcroPDF1.Visible = True
>
>        'o_PDFReader = New FoxitReaderOCX
>        'o_PDFReader.Name = "AxAcroPDF1"
>        'o_PDFReader.Location = New Point(n_Left, n_Top)
>        'o_PDFReader.Size = New Size(n_Width, n_Height)
>        'DocProcess_Main.Controls.Add(o_PDFReader)
>        'DocProcess_Main.AxAcroPDF1.Visible = True
>    End Sub

>
>The error thrown is:

>Unable to cast COM object of type 'FOXITREADEROCXLib.FoxitReaderOCXClass' to class type
>'System.Windows.Forms.Control'. Instances of types that represent COM components cannot be
>cast to types that do not represent COM components; however they can be cast to interfaces as
>long as the underlying COM component supports QueryInterface calls for the IID of the interface.