Visual Basic - Invocar PDF mediante un boton

Hola:
como puedo invocar un archivo PDF desde un boton en mi forma, para abrirla en el mismo PDF. Gracias

'Bien en este ejemplo se utiliza el control commondialog para buscar los archivos .pdf
Private Sub Command1_Click()
On Error GoTo cError
Dim MyValue As String
Dim myPath As String
With CommonDialog
.MaxFileSize = 32000
.CancelError = True
.Filter = "*.pdf|*.pdf" '
.ShowOpen
myPath = .FileName
MyValue = Shell("rundll32.exe url.dll, FileProtocolHandler " & myPath)
End With
Exit Sub
cError: 'Si da clic en cancelar
Beep
Err.Clear
End Sub