How to set a password to PDF file thru VB Code

Hi,
I know how to assign a password to a PDF file thru Adobe Acrobat. I want
to assign a password to a PDF file thru VB Code
Can any one help me?