RosettaCodeData/Task/Simulate-input-Keyboard/VBScript/simulate-input-keyboard.vb

6 lines
209 B
VB.net
Raw Permalink Normal View History

2013-04-11 01:07:29 -07:00
Dim WshShell
Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.SendKeys "{Down}{F2}"
WScript.Sleep 1000 ' one-second delay
WshShell.SendKeys "{Left}{Left}{BkSp}{BkSp}Some text here.~" ' ~ -> Enter