.net - How do I toggle Caps Lock in VB.NET? -
using vb.net, how toggle state of caps lock?
from: http://www.vbforums.com/showthread.php?referrerid=61394&t=537891
imports system.runtime.interopservices public class form2 private declare sub keybd_event lib "user32" ( _ byval bvk byte, _ byval bscan byte, _ byval dwflags integer, _ byval dwextrainfo integer _ ) private const vk_capital integer = &h14 private const keyeventf_extendedkey integer = &h1 private const keyeventf_keyup integer = &h2 private sub button1_click( _ byval sender system.object, _ byval e system.eventargs _ ) handles button1.click ' toggle capslock ' simulate key press keybd_event(vk_capital, &h45, keyeventf_extendedkey or 0, 0) ' simulate key release keybd_event(vk_capital, &h45, keyeventf_extendedkey or keyeventf_keyup, 0) end sub end class
Comments
Post a Comment