求解：(VB6.0)如何在程序中调用打开PDF文件？

2025-02-11 00:01:53

推荐回答（1个）

回答1：

下面的代码是调用系统默认程序打开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 <= 32 Then
MsgBox "打开失败！", vbOKOnly + vbCritical, "错误：", 0
End If

End Sub

最新问答

在asp.net中我想将数据访问层获得的数据库数据传到dropdownlist中，请问怎么传？谢谢

父母的爱作文发烧

平静的背后无不藏着压抑的痛苦怎样理解这句话

百旺山和香山哪个高.各是多少米?北京还有什么山?