Как реализовать Caps Lock и Enter - VB

Узнай цену своей работы

Формулировка задачи:

Всем привет Помогите реализовать Caps lock и Enter на клавиатуре

Решение задачи: «Как реализовать Caps Lock и Enter»

textual
Листинг программы
Private Declare Function GetKeyboardState Lib "user32" (pbKeyState As Byte) As Long
Function GetCapsLock() As Boolean
Dim keystat(0 To 255) As Byte
  GetKeyboardState keystat(0)
  GetCapsLock = (keystat(vbKeyCapital) And 1)
End Function

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

6   голосов , оценка 3.833 из 5
Похожие ответы