Feedback

VB - Tastenschläge zählen

Veröffentlicht von am 14.04.2008
(1 Bewertungen)
Mit diesem Code werden die Tastenschläge mit Hilfe von user32.dll gezählt
GFU-Schulungen  [Anzeige]

C# 2017/2015/2013 Grundlagen

Nach Abschluss des Kurses sind Ihnen die Datentypen und Klassenbibliotheken von C# bekannt. Außerdem sind Sie in der Lage, mit Variablen umzugehen und deren Typen zu konvertieren. Sie definieren Namespaces und setzen diese ein, Sie erstellen eigene Klassen  und bauen Trouble Shooting ein.

C# 2017/2015/2013 Aufbau

In dieser Schulung lernen Sie fortgeschrittene Techniken im Bereich .Net C#. Dabei stehen neben den eigentlichen Techniken auch architektonische Aspekte im Mittelpunkt.

Imports System.Runtime.InteropServices

Public Class Form1


    <DllImport("user32.dll")> Private Shared Function GetAsyncKeyState(ByVal vKey As Integer) As Short
    End Function
    Public Const KeyPressed As Integer = -32767




    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        Timer1.Interval = 1

        For Each key As Int32 In [Enum].GetValues(GetType(Windows.Forms.Keys))
            If GetAsyncKeyState(key) = -32767 Then
                Label1.Text += 1
            End If
        Next
    End Sub

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

           Me.Timer1.Start
    End Sub

1 Kommentare zum Snippet

Hagen schrieb am 20.04.2008:
Das Snippet zählt auch Mausklicks. Kann man irgendwie nur die Tastenschläge zählen?

Gruß
Hagen
 

Logge dich ein, um hier zu kommentieren!