Bagaimana untuk memanggil dan membuka fail PDF dalam program VB6

Penyelesaian: Bagaimana untuk membuka fail PDF dalam program VB6 0

Kod berikut memanggil program lalai sistem untuk membuka PDF, sila beri perhatian untuk mengubah suai laluan fail D:help.pdf

Fungsi Isytihar Peribadi ShellExecute Lib "shell32.dll" Alias ​​​​"ShellExecuteA" (ByVal hwnd Sepanjang, ByVal lpOperation Sebagai Rentetan, ByVal lpFile Sebagai Rentetan, ByVal lpParameters Sebagai Rentetan, ByVal lpDirektori Sebagai Rentetan Panjang, ByVal lpDirektori Sebagai Rentetan Panjang

Private Const SW_SHOWNORMAL = 1

Sub Perintah Peribadi1_Klik()

Hasil malap

hasil = ShellExecute(0, vbNullString, "D:help.pdf", vbNullString, vbNullString, SW_SHOWNORMAL)

Jika keputusan

MsgBox "Gagal dibuka!", vbOKOnly + vbCritical, "Ralat:", 0

Tamat Jika

Tamat Sub

Cara menggunakan pdf ocx untuk membaca kandungan PDF dalam VB

'Bukan hanya untuk membuka PDF

Ini kodnya

Fungsi Isytihar Peribadi ShellExecute Lib ＂shell32.dll＂ Alias ​​​​＂ShellExecuteA＂ _

(ByVal hWnd Selagi, ByVal lpOperation Sebagai Rentetan, _

ByVal lpFile Sebagai Rentetan, ByVal lpParameters Sebagai Rentetan, _

ByVal lpDirectory Sebagai Rentetan, ByVal nShowCmd Selagi) Selagi

Malapkan Sfile sebagai rentetan

Malapkan lR Selagi

sfile=＂Laluan fail＂

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

Cara membuka Word Excel Text Exe PDF GIF menggunakan VB. . .

Gunakan fungsi API ShellExecute

Kenyataan VB

Isytihar Fungsi ShellExecute Lib "shell32.dll" Alias ​​​​"ShellExecuteA" (ByVal hwnd Selagi, ByVal lpOperation Sebagai Rentetan, ByVal lpFile Sebagai Rentetan, ByVal lpParameters Sebagai Rentetan, ByVal lpDirektori Sebagai Rentetan, As LongCmd

Arahan

Cari nama fail program yang dikaitkan dengan fail yang ditentukan. Kaedah yang berkaitan adalah sama ada untuk menjalankan program atau mencetak fail. Anda boleh menggunakan Windows Registry Editor untuk mengaitkan jenis fail tertentu dengan aplikasi. Contohnya, fail teks dengan sambungan .TXT sering dikaitkan dengan Windows Notepad (NOTEPAD.EXE). Jika anda mengklik dua kali pada fail dengan sambungan .TXT dalam pengurus fail, program Notepad akan dimulakan secara automatik dan memuatkan fail teks ke dalamnya atau fail yang ditentukan akan dicetak keluar

Nilai pulangan

Panjang, lebih daripada 32 bermakna kejayaan

Jadual parameter:

Jenis dan huraian parameter

hwnd Long, menentukan pemegang tetingkap Kadangkala, program Windows perlu memaparkan kotak mesej sebelum mencipta tetingkap utamanya sendiri. Jika ini berlaku, tetingkap yang ditentukan oleh parameter ini akan digunakan sebagai tetingkap induk kotak mesej. Dalam persekitaran VB, pemegang tetingkap bentuk aktif biasanya digunakan sebagai parameter ini

lpOperation String, nyatakan rentetan "Buka" untuk membuka dokumen lpFlie atau tentukan "Cetak" untuk mencetaknya. Ia juga boleh ditetapkan kepada vbNullString, yang bermaksud lalai ialah "Buka"

lpFile String, nama program atau nama fail yang anda ingin cetak atau buka dengan program yang berkaitan

lpParameters String, jika lpFile ialah fail boleh laku, rentetan ini mengandungi parameter yang dihantar kepada program pelaksana. Jika lpFile merujuk kepada fail dokumen, atau tidak perlu menggunakan parameter, tetapkannya kepada vbNullString

lpDirectory String, laluan penuh laluan lalai yang anda mahu gunakan

nShowCmd Long, nilai tetap yang mentakrifkan cara memaparkan program permulaan.

Nota

Penerangan fungsi ini adalah seperti berikut dalam MSDN: Membuka atau mencetak fail yang ditentukan

Atas ialah kandungan terperinci Bagaimana untuk memanggil dan membuka fail PDF dalam program VB6. Untuk maklumat lanjut, sila ikut artikel berkaitan lain di laman web China PHP!