Hola
"{LWIN}" o "{RWIN}"
EDIT: Bueno yo sabia k el key era este pero no lo havia probado y la verdad esk no funciona xD
Intente SendKeys "^{ESC}" ya k ctrl + esc es el shourtcut para la tecla windows y nada.
Creo k es imposible hacerlo con sendkeys...
Pero puedes hacerlo con el keybd_event, mira:
Option Explicit
Private Declare Sub keybd_event Lib "user32" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)
Private Const KEYEVENTF_EXTENDEDKEY As Long = &H1
Private Const KEYEVENTF_KEYUP As Long = &H2
Private Const VK_LWIN = &H5B
Private Const VK_RWIN = &H5C
Private Sub Form_Load()
Call keybd_event(VK_LWIN, 0, 0, 0)
Call keybd_event(VK_LWIN, 0, KEYEVENTF_KEYUP, 0)
End Sub
Salu2
Mostrar Mensajes
