Sendkeys「variable」

Question

是否可以使用SendKeys類型變量中的字符。 例如我得到字符存儲在變量firstname = Regie

這是我的代碼。

On Error Resume Next 
Dim objSysInfo, objUser 
Set objSysInfo = CreateObject("ADSystemInfo") 

Set objUser = GetObject("LDAP://" & objSysInfo.UserName) 
firstname = objUser.givenName 
Set WshShell = WScript.CreateObject("WScript.Shell") 
WshShell.AppActivate "Notepad" 
WScript.Sleep 400 
WshShell.SendKeys "{& objUser.givenName}" 
WScript.Sleep 250 

或者有什麼辦法可以做到這一點嗎？

Answer 1

當然可以，在命令行上試試這個小腳本，它會打印「測試」。

Set WshShell = WScript.CreateObject("WScript.Shell") 
keys = "test" 
WshShell.SendKeys keys