[VisualBasic] Anzahl gedrückter tasten

Dieses Thema im Forum "Programmierung & Entwicklung" wurde erstellt von Knusperkeks, 30. September 2006 .

Schlagworte:
Status des Themas:
Es sind keine weiteren Antworten möglich.
  1. 30. September 2006
    Anzahl gedrückter tasten

    Hallo Leute des guten Geschmacks,

    Ich hab mich gerade mal dran gesetzt und wollte nen programm schreiben das mir ausgibt wieviele tasten ich so drücke wenn ich am pc bin.....

    Das war auch alles kein Problem, aber dann hab ich bemerkt das der zähler hochschießt wenn ich nen buchstaben gedrückt halte und das fande ich nicht so gut!

    Daher wollte ich fragen wie ich es vermeinden kann das man den zähler durch drücken hochtreiben kann.

    Code:
    Private Sub Timer1_Timer()
Dim a As Long

For a = 32 To 126
 If GetAsyncKeyState(a) Then
 Anzahl = Anzahl + 1
 Label1.Caption = Anzahl
 End If
 
Next a
End Sub
    Das ist der code und hier das ganze Projekt:

    Download offline!/

    Also schon mal vielen dank für die hilfe, ich steh gerade echt voll auf der leitung

    Knusperkeks
     
  3. 30. September 2006
    AW: Anzahl gedrückter tasten

    Hoi,

    ich hab dein Projekt jetz net runtergeladen, sonder ich mach das ausm Stegreif raus ^^
    Das müsste funktionieren:

    Code:
    Dim OldKey As Integer

Private Sub Timer1_Timer()
Dim a As Long

For a = 32 To 126
 If GetAsyncKeyState(a) Then
 If OldKey <> a Then
 Anzahl = Anzahl + 1
 Label1.Caption = Anzahl
 OldKey = a
 End if
 End If
Next a
End Sub
     
  4. 30. September 2006
    AW: Anzahl gedrückter tasten

    Hehe danke, hätte ich auch selber drauf kommen müssen , ist ja recht peinlich das mir das nicht eigefallen ist, aber wenn man auf der leitug steht

    Vielen danke

    geht super


    Knusperkeks
     
  5. Video Script

    Videos zum Themenbereich

    * gefundene Videos auf YouTube, anhand der Überschrift.