Попробуйте использовать функцию Windows API ShellExecute.Не уверен в синтаксисе VB (это работает в FoxPro) ...
DECLARE INTEGER ShellExecute IN shell32.dll ;
INTEGER hndWin, ;
STRING cAction, ;
STRING cFileName, ;
STRING cParams, ;
STRING cDir, ;
INTEGER nShowWin
cFileName = "d:\MyDocs\myfile.pdf"
cAction = "open"
ShellExecute(0,cAction,cFileName,"","",1)
... но пользователь должен будет заполнить поля вручную.