如何在VB6程序中調用並打開PDF文件

解：VB6 0如何在程序中調用打開PDF文件

下面的代碼是調用系統默認程序打開PDF，注意修改文件路徑D:help.pdf

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

Private Const SW_SHOWNORMAL = 1

Private Sub Command1_Click()

Dim result

result = ShellExecute(0, vbNullString, ＂D:help.pdf＂, vbNullString, vbNullString, SW_SHOWNORMAL)

If result

MsgBox ＂打開失敗！＂， vbOKOnly + vbCritical， ＂錯誤：＂， 0

End If

End Sub

VB怎麼利用pdf ocx讀取PDF內容

'不就是打開PDF嗎

下面是代碼

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

Dim Sfile as string

Dim lR As Long

sfile=＂文件路徑＂

lR = ShellExecute(Me.hWnd, ＂Open＂, sfile, ＂＂, ＂＂, vbNormalFocus)

使用VB如何打開Word Excel Text Exe PDF GIF 。。。

用API函數ShellExecute

VB聲明

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

說明

查找與指定文件關聯在一起的程序的文件名。關聯的方式要麼是運行程序，要麼是打印文件。可用Windows註冊表編輯器將特定的文件類型同應用程序關聯起來。例如，擴展名爲.TXT的文本文件通常與Windows記事本（NOTEPAD.EXE）關聯到一起。如在文件管理器中雙擊含.TXT擴展名的一個文件，就會自行啓動記事本程序，並在其中載入文本文件；或者將指定的文件打印出來

返回值

Long，大於32表示成功

參數表 ：

參數 類型及說明

hwnd Long，指定一個窗口的句柄，有些時候，Windows程序有必要在創建自己的主窗口前顯示一個消息框。如果發生這種情況，由這個參數指定的窗口就會作爲消息框的父窗口使用。在VB環境中，通常將活動窗體的窗口句柄作爲這個參數使用

lpOperation String，指定字串“Open”來打開lpFlie文檔；或指定“Print”來打印它。也可設爲vbNullString，表示默認爲“Open”

lpFile String，想用關聯的程序打印或打開的一個程序名或文件名

lpParameters String，如lpFile是一個可執行文件，則這個字串包含了傳遞給執行程序的參數。如lpFile引用的是一個文檔文件，或者不需要使用參數，則設爲vbNullString

lpDirectory String，想使用的默認路徑完整路徑

nShowCmd Long，定義瞭如何顯示啓動程序的常數值。

註解

這個函數的說明在MSDN裏是這樣的：Opens or prints a specified file

以上就是如何在VB6程序中調用並打開PDF文件的詳細內容，更多請關注本站其它相關文章！