Detect if Shift Key is down
A function that returns whether or not the shift key is currently down.
AI
Résumé par IA: This codebase represents a historical implementation of the logic described in the metadata. Our preservation engine analyzes the structure to provide context for modern developers.
Code source
Private Function ShiftDown()
Dim RetVal As Long
RetVal = GetAsyncKeyState(16) 'SHIFT key
If (RetVal And 32768) <> 0 Then
ShiftDown = True
Else
ShiftDown = False
End If
End Function
Commentaires originaux (3)
Récupéré via Wayback Machine