Posted on January 4, 2009
1
2
3
4
5
6
7
8
9
10
11
| 'System & API - How to Open Start Menu using VB Code
Private Const KEYEVENTF_KEYUP = &H2
Private Const MENU_KEYCODE = 91
Private Declare Sub keybd_event Lib "user32" (ByVal bVk As Byte, ByVal bScan As Byte, _
ByVal dwFlags As Long, ByVal dwExtraInfo As Long)
Public Sub OpenStartMenu()
keybd_event MENU_KEYCODE, 0, 0, 0
keybd_event MENU_KEYCODE, 0, KEYEVENTF_KEYUP, 0
End Sub |