Dim res As String = System.Reflection.Assembly.GetEntryAssembly.GetName( _
          ).Name + ".DEIN_PDF_FILE.PDF"
        Dim fileName As String = Application.StartupPath + "\" + _
        Now.Ticks.ToString + ".pdf"
        Dim s As IO.Stream = _
        System.Reflection.Assembly.GetEntryAssembly.GetManifestResourceStream( _
        res)
        Dim br As IO.BinaryReader = New IO.BinaryReader(s)
        Dim chars() As Char = System.Text.Encoding.Unicode.GetChars( _
          br.ReadBytes(s.Length))
        Dim sw As New IO.StreamWriter(fileName, False, _
        System.Text.UnicodeEncoding.Unicode)
        sw.Write(chars)
        sw.Close()
 
        ' hier dein Aufruf
        axpdf1.loadfile (fileName) 
        axpdf1.wait ' <<< vielleicht gibt es ja sotwas ähnliches .. 
 
        Application.DoEvents()
        IO.File.Delete(fileName)