Visual Basic code za obavljanje log off current user u win 98

Code:

Const EWX_LOGOFF = 0
Const EWX_SHUTDOWN = 1
Const EWX_REBOOT = 2
Const EWX_FORCE = 4

Private Declare Function ExitWindowsEx Lib "user32" _
(ByVal uFlags As Long, ByVal dwReserved As Long) As Long

Private Sub Form_Load()
    ret& = ExitWindowsEx(EWX_LOGOFF+EWX_FORCE, 0)
End Sub