Caps lock, num lock, scroll lock par logiciel
Soyez le premier à donner votre avis sur cette source.
Snippet vu 22 810 fois - Téléchargée 36 fois
Contenu du snippet
Simule l'appui sur Verrouillage majuscules, Verrouillage numérique, Arrêt défilement
Source / Exemple :
'Dans un module ou dans la section Général-Déclarations de la feuille : (Private ? Public ?)
Const VK_CAPITAL = &H14 ' CapsLock
Const VK_NUMLOCK = &H90 ' NumLock
Const VK_SCROLL = &H91 ' ScrollLock
Private Type KeyboardBytes
kbByte(0 To 255) As Byte
End Type
Private Declare Function GetKeyboardState Lib "user32" (kbArray As KeyboardBytes) As Long
Private Declare Function SetKeyboardState Lib "user32" (kbArray As KeyboardBytes) As Long
Dim kbArray As KeyboardBytes, kbOld As KeyboardBytes
'-----------------------------------------------------
Private Sub Active(vkKey As Long, Actif As Byte)
GetKeyboardState kbArray
kbArray.kbByte(vkKey) = Actif
SetKeyboardState kbArray
End Sub
'-----------------------------------------------------
Private Sub Form_Load()
GetKeyboardState kbOld' se rappeler l'état initial du clavier
End Sub
'-----------------------------------------------------
Private Sub Form_Unload(Cancel As Integer)
SetKeyboardState kbOld' restaurer l'état initial du clavier
End Sub
'-----------------------------------------------------
'Pour (par exemple) activer le verrouillage majuscules,
'Active VK_CAPITAL, 1
'pour le désactiver :
'Active VK_CAPITAL, 0
A voir également
- Vk_capital
- Ctrl scroll lock - Meilleures réponses
- Lock vb.net - Meilleures réponses
- Fonction replace pour émuler caps lock ✓ - Forum - Javascript / DHTML
- Indicateurs systray des touches clavier maj, num, inser, scroll - Codes sources - Visual Basic / VB.NET (Périphériques)
- Pc lock : logiciel pour eviter les intrus par un systeme de clé - Codes sources - Visual Basic / VB.NET (Sécurité)
- "r-locker version 2.1!" protection d'une page par mot de passe comme htaccess + logs d'ip/nav + redi - Codes sources - PHP (Réseau & Internet)
- Invite de commande : textbox locker - Codes sources - Visual Basic / VB.NET (Trucs & Astuces)
J'ai exacteme,t besoin d'un programme qui fait ca! (activer le CapLock au lancement)
Mais j'y connai rien en VB!!! J'ai essayer de compiler le code donnée dans visual studioexpress2005, mais j'ai plein d'erreur du genre variable pas déclarer etc...des la ligne private type!
Help!!! Merci de m'expliquer comment compiler ce code correctement, un grand merci à ceux qui le feront!!!
Ps:je n'ai pas besoin de pouvoir rappeler l'etat precedent de la touche, justequ'il l'active, c'est pour mettre au demarrage d'un pc
Voilà Merci!
- Messages postés
-
14781
- Date d'inscription
- vendredi 14 mars 2003
- Statut
- Modérateur
- Dernière intervention
- 12 avril 2021
154- Messages postés
-
1411
- Date d'inscription
- mercredi 6 août 2003
- Statut
- Membre
- Dernière intervention
- 3 mars 2019
1et naviguez avec les touches Haut, Bas, Gauche, Droite
changez l'atat de ScrollLock et recommencez
vous ne changez plus de cellule mais vous faites défiller la feuille
Bonne prog
++
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.