Private Declare Sub keybd_event Lib "user32" (ByVal bVk As Byte, _ ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)Private Declare Function GetKeyState Lib "user32" (ByVal nVirtKey As Long) As _ LongPrivate Const KEYEVENTF_KEYUP = &H2' press and/or release any key, given its virtual code'' virtKeyCode can be any vbKey* constants, except mouse constants' Action can be 0 or omitted (press and then release the key)' >0 (only press the key)' <0 (only release the key)Sub PressVirtualKey(ByVal virtKeyCode As KeyCodeConstants, _ Optional ByVal Action As Integer) ' press the key if the argument is 0 or greater If Action >= 0 Then keybd_event virtKeyCode, 0, 0, 0 End If ' then release the key if the argument is 0 or lesser If Action <= 0 Then keybd_event virtKeyCode, 0, KEYEVENTF_KEYUP, 0 End IfEnd Sub


GM Creates Open Source uProtocol and Invites Automakers to Adopt It: Revolutionizing Automotive Software Development.
General Motors (GM) recently announced its entry into the Eclipse Foundation. The Eclipse Foundation is a prominent open-source software foundation. In addition, GMC announced its contribution of “uProtocol” to facilitate