vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#

https://www.vbarchiv.net
Rubrik: Windows/System09.05.01
SetLastError-Funktion

Diese Funktion setzt einen globalen Fehler für den entsprechenden Thread.

Betriebssystem:  Win95, Win98, WinNT, Win2000, WinMEViews:  10.168 

Beschreibung:
Diese Funktion setzt einen globalen Fehler für den entsprechenden Thread. Mit der "GetLastError" Funktion kann man den letzten Fehler abfragen und darauf reagieren.

Deklaration:

Declare Function SetLastError Lib "kernel32.dll" (ByVal dwErrCode As Long)

Parameter:
dwErrCodeErwartet eine der Fehler-Konstanten

Rückgabewert:
keiner

Beispiel:

Private Declare Sub SetLastError Lib "kernel32" (ByVal dwErrCode As Long) 
 
' Eine der Fehler-Konstanten
Private Const ERROR_INVALID_FUNCTION = 1 ' Unzulässige Funktion.
Private Sub Command1_Click() 
 
  ' Fehler setzen
  SetLastError ERROR_INVALID_FUNCTION 
 
  ' Ist der Fehler gesetzt ?
  If Err.LastDllError = ERROR_INVALID_FUNCTION Then 
    MsgBox "Unzulässige Funktion.", vbCritical , "Fehler: " & Err.LastDllError 
  End If 
End Sub 

 
 
Copyright ©2000-2024 vb@rchiv Dieter OtterAlle Rechte vorbehalten.


Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.