KeyCode — webForum

firstchoiceMedlem sedan okt. 2001615 inlägg

Frågan14 apr. 2004 17:16#1

var hittar men en lista på samtiliga "KeyCode" ?

har hittat koden för "<" (226)
men vad har ">" ??

Nexus86Medlem sedan okt. 20023 030 inlägg

15 apr. 2004 12:53#2

KeyCode är densamma för dom eftersom dom sitter på samma knapp. Du kan ju testa själv. Lägg till denna kod i ett tomt projekt, kör och tryck på valfri knapp så ser du keycode för den knappen.

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
    Me.Cls
    Me.Print KeyCode
End Sub

Vad du däremot kan göra för att ta reda på om man har skrivit ett "<" eller ">" är:

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
    If KeyCode = 226 Then
        If (Shift And 1) = 1 Then  ' Shift nertryckt.. Mao ">"
            ' ...
        Else                       ' Shift inte nertryckt.. Mao "<"
            ' ...
        End If
    End If
End Sub