So rufen und öffnen Sie PDF-Dateien im VB6-Programm

Lösung: So öffnen Sie PDF-Dateien im VB6 0-Programm

Der folgende Code ruft das Systemstandardprogramm zum Öffnen von PDF auf. Bitte achten Sie darauf, den Dateipfad D:help.pdf zu ändern

Private Deklarationsfunktion 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-Ergebnis

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

Wenn Ergebnis

MsgBox „Fehler beim Öffnen!“, vbOKOnly + vbCritical, „Fehler:“, 0

Ende wenn

End Sub

So verwenden Sie pdf ocx zum Lesen von PDF-Inhalten in VB

'Ist es nicht nur zum Öffnen von PDF

Hier ist der Code

Private Deklarationsfunktion 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

Sfile als String dimmen

Dim lR So Long

sfile=＂Dateipfad＂

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

So öffnen Sie Word Excel Text Exe PDF GIF mit VB. . .

Verwenden Sie die API-Funktion ShellExecute

VB-Erklärung

Deklarieren Sie die Funktion 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

Anleitung

Finden Sie den Dateinamen des Programms, das mit der angegebenen Datei verknüpft ist. Die zugehörige Methode besteht darin, entweder das Programm auszuführen oder die Datei zu drucken. Sie können den Windows-Registrierungseditor verwenden, um bestimmte Dateitypen mit Anwendungen zu verknüpfen. Beispielsweise werden Textdateien mit der Erweiterung .TXT oft mit Windows Notepad (NOTEPAD.EXE) verknüpft. Wenn Sie im Dateimanager auf eine Datei mit der Erweiterung .TXT doppelklicken, startet das Notepad-Programm automatisch und lädt eine Textdatei hinein oder die angegebene Datei wird ausgedruckt

Rückgabewert

Lang, größer als 32 bedeutet Erfolg

Parametertabelle:

Parametertyp und Beschreibung

hwnd Long gibt das Handle eines Fensters an. Manchmal ist es erforderlich, dass ein Windows-Programm ein Meldungsfeld anzeigt, bevor es sein eigenes Hauptfenster erstellt. In diesem Fall wird das durch diesen Parameter angegebene Fenster als übergeordnetes Fenster des Meldungsfelds verwendet. In der VB-Umgebung wird als Parameter üblicherweise das Fensterhandle des aktiven Formulars verwendet

lpOperation String, geben Sie die Zeichenfolge „Open“ an, um das lpFlie-Dokument zu öffnen, oder geben Sie „Print“ an, um es zu drucken. Es kann auch auf vbNullString gesetzt werden, was bedeutet, dass der Standardwert „Offen“ ist

lpFile String, ein Programmname oder Dateiname, den Sie drucken oder mit dem zugehörigen Programm öffnen möchten

lpParameters String: Wenn lpFile eine ausführbare Datei ist, enthält dieser String die Parameter, die an das ausführende Programm übergeben werden. Wenn lpFile auf eine Dokumentdatei verweist oder keine Parameter verwenden muss, setzen Sie es auf vbNullString

lpDirectory String, der vollständige Pfad des Standardpfads, den Sie verwenden möchten

nShowCmd Long, ein konstanter Wert, der definiert, wie das Startprogramm angezeigt wird.

Notizen

Die Beschreibung dieser Funktion lautet in MSDN wie folgt: Öffnet oder druckt eine bestimmte Datei

Das obige ist der detaillierte Inhalt vonSo rufen und öffnen Sie PDF-Dateien im VB6-Programm. Für weitere Informationen folgen Sie bitte anderen verwandten Artikeln auf der PHP chinesischen Website!