Imports System.IO
Imports DocumentFormat.OpenXml.Packaging
Imports DocumentFormat.OpenXml.Wordprocessing
Imports DocumentFormat.OpenXml
Imports System.Data
Imports System.Data.SqlClient
Imports A = DocumentFormat.OpenXml.Drawing
Imports DW = DocumentFormat.OpenXml.Drawing.Wordprocessing
Imports PIC = DocumentFormat.OpenXml.Drawing.Pictures
Imports iTextSharp.text
Imports iTextSharp.text.pdf

Protected Sub MakeDocx(sender As Object, e As System.EventArgs)
' ......
Using wDoc As WordprocessingDocument = WordprocessingDocument.Open(memStream, True)
'.....
Dim ParCenter As New DocumentFormat.OpenXml.Wordprocessing.Paragraph()
'....
End Using
End Sub

'... соответственно ..

Protected Sub MakePDF(ByVal Sender As Object, ByVal E As EventArgs)
' ....
Dim bfont As iTextSharp.text.Font = New iTextSharp.text.Font(bf, 10, iTextSharp.text.Font.BOLD)
Dim p0 As iTextSharp.text.Paragraph = New iTextSharp.text.Paragraph(lblPrint.Text & vbCrLf, bfont)
'.....
End Sub