La meilleure façon d`imprimer un fichier PDF à partir de Visual Basic est de combiner Visual Basic avec une technologie connexe qui vient sur tous les ordinateurs Windows: Visual Basic Script. Pour ce faire, vous aurez besoin de travailler en deux parties: d`abord, créer le fichier VBScript qui imprime un document fourni, puis créer un programme Visual Basic qui appelle le fichier VBScript.
Ouvrez le Bloc-notes de Windows et collez le texte suivant dans un nouveau fichier texte:
filename = WScript.Arguments (0)
Set fso = CreateObject ("Scripting.FileSystemObject")
fullPath = fso.GetAbsolutePathName (fileName)
set shell = WScript.CreateObject ("Shell.Application")
shell.Namespace (0) .ParseName (fullPath) .InvokeVerb "&Impression"
Enregistrez le fichier texte comme "C: printPDF.vbs."
Ouvrez Visual Basic et créez un nouveau projet en cliquant sur "Fichier" et "Nouveau projet." Choisir "Windows Forms" projet.
Double-cliquez sur le "OpenFileDialog" composant dans le "Caisse à outils" panneau pour ajouter une boîte de dialogue de fichier ouvert à votre projet.
Double-cliquez sur le "Bouton" composant dans le "Caisse à outils" panneau pour ajouter un bouton à votre projet. Un bouton apparaîtra dans votre formulaire Windows.
Double-cliquez sur le bouton nouvellement créé pour ouvrir son code source.
Collez le suivant pour demander à l`utilisateur un fichier à imprimer et exécuter le VBScript pour imprimer:
OpenFileDialog1.Filter = "Fichiers PDF | * .pdf"
résultat dim = OpenFileDialog1.ShowDialog ()
if (résultat = DialogResult.OK) puis
filename dim = OpenFileDialog1.FileNamecoquille("wscript C: printPDF.vbs " &fileName Amp)
fin si
