Ano mám nadefinovanou funkce getShift kterou mám nadefinovanou jako
Public Function getShift() As Boolean
getShift = CBool(GetAsyncKeyState(System.Windows.Forms.Keys.ShiftKey))
End Function
tedy jako boolean ano/ne
a poté mám tedy ten
If GetAsyncKeyState(97) = -32767 Then
If getShift() = False Then
klavesa = "1"
Else
klavesa = "+"
End If
End If
Takže by bylo lepší to nějak celé předělat ?