Feedback

VB - Zeitpunkt der letzten Benutzereingabe ermitteln

Veröffentlicht von am 20.10.2006
(1 Bewertungen)
Diese Funktion gibt den Zeitpunkt der letzten Benutzereingabe in Millisekunden zurück.
Dabei wird die Zeit vom Systemstart genommen also von GetTickCount und nicht die Uhrzeit.
GFU-Schulungen  [Anzeige]

C# Aufbaukurs

Sie haben grundlegende .NET- und C#-Kenntnisse und und wollen diese nun erweitern. Der Aufbaukurs C# führt Sie ein die Arbeit mit Interfaces und Delegates, Generics und Parallel Computing.

JavaScript für .NET-Entwickler

Sie sind .NET-Entwickler und nun stehen Sie vor der Aufgabe, JavaScript in Ihre Arbeit einzubinden. Die Schulung vermittelt Ihnen die JavaScript Grundlagen und die Funktionen der Scriptsprache. Sie wissen, wie objektorientierte Programmierung in JavaScript funktioniert und lernen abschließend Best Practicies Fälle kennen.

Public Declare Auto Function GetLastInputInfo Lib "user32" ( _
    ByRef LIIObj As LII) _
As Integer

Public Structure LII 'LastInputInfo
    Public Size As Integer
    Public Time As Integer
End Structure


''' <summary>
''' Diese Funktion gibt den Zeitpunkt der letzten Benutzereingabe in Millisekunden zurück.
''' Dabei wird die Zeit vom Systemstart genommen also von GetTickCount.
''' </summary>
Public Function GetLastInputTime() As Integer
    Dim LIIObj As New LII

    '"Unmanaged" Größe des Objekts speichern
    LIIObj.Size = CUInt(System.Runtime.InteropServices.Marshal.SizeOf(LIIObj))

    'Zeit der letzten Eingabe abfragen (Maus oder Tastatur)
    GetLastInputInfo(LIIObj)

    Return LIIObj.Time
End Function
Abgelegt unter Idle.

Kommentare zum Snippet

 

Logge dich ein, um hier zu kommentieren!

Ähnliche Snippets