2_2002-2004 Miscellaneous #118447

Detect if Shift Key is down

Name: Detect if Shift Key is down
Brand: Planet Source Code
SKU: PSC-118447
Availability: InStock
Rating: 4.7 (497 reviews)
Author: Kamilche

Kamilche

★★★★★

4.8 · İndirme Sayısı: 2,341

A function that returns whether or not the shift key is currently down.

Yapay Zeka Özeti: 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.

Kaynak Kod

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

Orijinal Yorumlar (3)

Wayback Machine'den kurtarıldı