VB Code:
[color=green] ' Place this right at the top of the form.[/color]
Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" _
(ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, _
ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
[color=green] ' Insert one of these variables to the end of the statement below[/color]
Private Const SW_SHOWNORMAL As Long = 1
Private Const SW_MINIMIZE As Long = 6
Private Const SW_MAXIMIZE As Long = 3
Private Sub Form_Load()
Dim strYourFile As String
strYourFile = "C:\Path\File.pdf"
ShellExecute Me.hwnd, vbNullString, strYourFile, vbNullString, "C:\", SW_SHOWNORMAL
End Sub