Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Re: Aufruf der Win10-Touchscreenkalibrierung
Autor: fabishop
Datum: 25.11.19 14:26
Hallo Dieter, habe das ganze mal so eingebaut: Private Sub Bezeichnungsfeld427_Click() Dim Retval As Long Retval = ShellExecute(Me.hwnd, "C:\Windows\System32\tabcal.exe", "UserLincal DeviceKind=touch DisplayID=\\.\DISPLAY1", SW_SHOWNORMAL) Select Case Retval Case SE_ERR_NOASSOC MsgBox "Datei ist nicht Assizoiert", vbInformation, "Fehler" Exit Sub Case SE_ERR_PNF MsgBox "Pfad wurde nicht gefunden", vbInformation, "Fehler" Exit Sub Case SE_ERR_FNF MsgBox "Datei wurde nicht gefunden", vbInformation, "Fehler" Exit Sub Case 8, 26, 32, 28, 29, 30, 27, 5, 11 ' alle anderen Fehler Exit Sub End Select End Sub Allerdings bekomme ich beim Aufruf folgende Fehlermeldung: Fehler beim Kompilieren: Argument ist nicht optional >bezieht sich auf ShellExecute Teste ich das ganze mit der beispielhaften Notepad.exe, ist alles ok. Hast du eine Idee? Gruß FH

Aufruf der Win10-Touchscreenkalibrierung	803	fabishop	24.11.19 19:49
Re: Aufruf der Win10-Touchscreenkalibrierung	430	Dieter	25.11.19 09:57
Re: Aufruf der Win10-Touchscreenkalibrierung	411	fabishop	25.11.19 14:26
Re: Aufruf der Win10-Touchscreenkalibrierung	423	Dieter	25.11.19 14:41
Re: Aufruf der Win10-Touchscreenkalibrierung	430	fabishop	25.11.19 15:02
Re: Aufruf der Win10-Touchscreenkalibrierung	424	Dieter	25.11.19 15:19

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen