Det enklaste sättet att skriva ut ett PDF inifrån Visual Basic är att kombinera Visual Basic med en teknologi som kommer på alla Windows -datorer : Visual Basic Script . För att göra detta måste du arbeta i två delar: . Skapa först VBScript fil som skriver ut ett dokument som , och sedan skapa ett Visual Basic-program som anropar VBScript fil
1
Öppna Windows Anteckningar och klistra in följande i en ny textfil .
filename=wscript . Argument (0 )
Set FSO=CreateObject ( ”Scripting. FileSystemObject”)
fullpath=fso. GetAbsolutePathName (filename)
som shell=WScript. CreateObject ( ” Shell. Application ” )
shell. Namespace (0) . ParseName ( fullpath ) . InvokeVerb ” Skriv ut ”
Spara textfilen som ” C: \ printPDF. vbs ”
2
Öppna Visual Basic och . skapa ett nytt projekt genom att klicka på ”File” och ” Nytt projekt . ” Välj ” Windows Forms ” -projektet .
3 .
Dubbelklicka på ” OpenFileDialog ” komponent ”Toolbox ” panel för att lägga till en dialogrutan Öppna fil i ditt projekt .
4 .
Dubbelklicka på ” Button ” komponent ”Toolbox ” panel för att lägga till en knapp till ditt projekt . En knapp visas i Windows-formulär .
5 .
Dubbelklicka på den nyskapade knappen för att öppna sin källkod .
6 .
Klistra in följande för att uppmana användaren att en fil ska skrivas ut och köra VBScript för att skriva ut det :
OpenFileDialog1. Filter=” PDF -filer | *. pdf ”
dim result=OpenFileDialog1. ShowDialog ( )
if ( resultat=DialogResult . OK ) sedan
dim filnamn=OpenFileDialog1. FileName
skal ( ” wscript C: \ printPDF. vbs ” filename)
slut om