Comment appeler et ouvrir des fichiers PDF dans le programme VB6

Solution : Comment ouvrir des fichiers PDF dans le programme VB6 0

Le code suivant appelle le programme par défaut du système pour ouvrir le PDF, veuillez faire attention à modifier le chemin du fichier D:help.pdf

Fonction de déclaration privée 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

Const privée SW_SHOWNORMAL = 1

Sous-commande privée1_Click()

Dim résultat

résultat = ShellExecute(0, vbNullString, "D:help.pdf", vbNullString, vbNullString, SW_SHOWNORMAL)

Si résultat

MsgBox "Échec de l'ouverture !", vbOKOnly + vbCritical, "Erreur :", 0

Fin si

Fin du sous-marin

Comment utiliser PDF ocx pour lire le contenu PDF en VB

'N'est-ce pas juste pour ouvrir un PDF

Voici le code

Fonction de déclaration privée 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 sous forme de chaîne

Dim lR aussi longtemps

sfile=＂Chemin du fichier＂

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

Comment ouvrir le GIF PDF Word Excel Text Exe en utilisant VB. . .

Utilisez la fonction API ShellExecute

Déclaration VB

Déclarer la fonction 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

Instructions

Recherchez le nom de fichier du programme associé au fichier spécifié. La méthode associée consiste soit à exécuter le programme, soit à imprimer le fichier. Vous pouvez utiliser l'éditeur de registre Windows pour associer des types de fichiers spécifiques à des applications. Par exemple, les fichiers texte avec une extension .TXT sont souvent associés au Bloc-notes Windows (NOTEPAD.EXE). Si vous double-cliquez sur un fichier avec une extension .TXT dans le gestionnaire de fichiers, le programme Bloc-notes démarrera automatiquement et y chargera un fichier texte ou le fichier spécifié sera imprimé

 ;

Valeur de retour

Long, supérieur à 32 signifie succès

Tableau des paramètres :

Type et description du paramètre

hwnd Long, spécifie le handle d'une fenêtre Parfois, il est nécessaire qu'un programme Windows affiche une boîte de message avant de créer sa propre fenêtre principale. Si cela se produit, la fenêtre spécifiée par ce paramètre sera utilisée comme fenêtre parent de la boîte de message. Dans l'environnement VB, le handle de fenêtre du formulaire actif est généralement utilisé comme paramètre

lpOperation String, spécifiez la chaîne "Open" pour ouvrir le document lpFlie ou spécifiez "Print" pour l'imprimer. Il peut également être défini sur vbNullString, ce qui signifie que la valeur par défaut est "Open"

lpFile String, un nom de programme ou un nom de fichier que vous souhaitez imprimer ou ouvrir avec le programme associé

lpParameters String, si lpFile est un fichier exécutable, cette chaîne contient les paramètres transmis au programme en cours d'exécution. Si lpFile fait référence à un fichier de document ou n'a pas besoin d'utiliser de paramètres, définissez-le sur vbNullString

lpDirectory String, le chemin complet du chemin par défaut que vous souhaitez utiliser

nShowCmd Long, une valeur constante qui définit comment afficher le programme de démarrage.

Remarques

La description de cette fonction est la suivante dans MSDN : Ouvre ou imprime un fichier spécifié

Ce qui précède est le contenu détaillé de. pour plus d'informations, suivez d'autres articles connexes sur le site Web de PHP en chinois!