怎么用vbs模拟键盘的回车？

急！急！急！VBS怎样模拟键盘发送 Alt + Enter？？~

给你点详细的资料

Windows 脚本宿主

SendKeys 方法
请参阅
WshShell 对象 | Run 方法
将一个或多个键击发送到活动窗口（仿佛是在键盘上击键一样）。

object.SendKeys(string)
参数
object
WshShell 对象。
string
表示要发送的键击（一个或多个）的字符串值。
说明
使用 SendKeys 方法可以将键击发送到无自动化界面的应用程序中。多数键盘字符都可用一个键击表示。某些键盘字符由多个键击组合而成（例如，CTRL+SHIFT+HOME）。要发送单个键盘字符，请将字符本身作为 string 参数发送。例如，要发送字母 x，则请发送 string 参数 "x"。

注意 要发送空格，则请发送字符串 " "。
可使用 SendKeys 同时发送多个键击。为此，可将每个键击按顺序排列在一起，以此来创建表示一系列键击的复合字符串参数。例如，要发送键击 a、b 和 c，则需要发送字符串参数 "abc"。SendKeys 方法将某些字符用作字符的修饰符（而不使用其本身的含义）。这组特殊的字符可包括圆括号、中括号、大括号，以及：

加号 "+"、
插入记号 "^"、
百分号 "%"、
和“非”符号 "~"。
用大括号 ""。SendKeys中使用的中括号 "[ ]" 无任何特殊含义，但是必须把它们括在大括号中，以便容纳确实要赋予其特殊含义的应用程序（例如，对于动态数据交换 (DDE) 就是这样）。

要发送左中括号字符，请发送字符串参数 ""。
要发送左大括号字符，请发送字符串参数 ""；要发送右大括号字符，请发送字符串参数 ""。
某些键击不生成字符（如 ENTER 和 TAB）。某些键击表示操作（如 BACKSPACE 和 BREAK）。要发送这些类型的键击，请发送下表中列出的参数：

键 参数
退格键 、 或
BREAK
CAPS LOCK
DEL 或 DELETE 或
向下键
END
ENTER 或 ~
ESC
HELP
HOME
INS 或 INSERT 或
向左键
NUM LOCK
PAGE DOWN
PAGE UP
PRINT SCREEN
向右键
SCROLL LOCK
TAB
向上键
F1
F2
F3
F4
F5
F6
F7
F8
F9
F10
F11
F12
F13
F14
F15
F16

要发送由常规键击和 SHIFT、CTRL 或 ALT 组合而成的键盘字符，请创建表示该键击组合的复合字符串参数。可通过在常规键击之前添加一个或多个以下特殊字符来完成上述操作：

键 特殊字符
SHIFT +
CTRL ^
ALT %

注意 这样使用时，不用大括号括起这些特殊字符。
要指定在按下多个其他键时，按下 SHIFT、CTRL 和 ALT 的组合，请创建复合字符串参数，用括号括起其中的组合键。例如，要发送的组合键指定：

如果在按 e 和 c 的同时按 SHIFT 键，则发送字符串参数 "+(ec)"。
如果在按 e 时只按 c（而不按 SHIFT），则发送字符串参数 "+ec"。
可使用 SendKeys 方法发送一种在一行内重复按键的键击。为此，要创建复合字符串参数，以指定要重复的键击，并在其后指定重复次数。可使用 形式的复合字符串参数来完成上述操作。例如，如果要发送 10 次 "x"，则需要发送字符串参数 ""。请确保在键击和数字之间有一个空格。

注意 只可以发送重复按一个键的键击。例如，可以发送 10 次 "x"，但不可发送 10 次 "Ctrl+x"。
注意 不能向应用程序发送 PRINT SCREEN 键 。
示例
下面的示例演示如何将一个 .wsf 文件用于以不同脚本语言（VBScript 和 Jscript）写成的两个作业。每个作业都运行 Windows 计算器并将它发送给键击以执行简单的计算。

<package>
<job id="vbs">
<script language="VBScript">
set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.Run "calc"
WScript.Sleep 100
WshShell.AppActivate "Calculator"
WScript.Sleep 100
WshShell.SendKeys "1"
WScript.Sleep 500
WshShell.SendKeys "2"
WScript.Sleep 500
WshShell.SendKeys "~"
WScript.Sleep 500
WshShell.SendKeys "*3"
WScript.Sleep 500
WshShell.SendKeys "~"
WScript.Sleep 2500
</script>
</job>

<job id="js">
<script language="JScript">
var WshShell = WScript.CreateObject("WScript.Shell");
WshShell.Run("calc");
WScript.Sleep(100);
WshShell.AppActivate("Calculator");
WScript.Sleep(100);
WshShell.SendKeys ("1");
WScript.Sleep(500);
WshShell.SendKeys("2");
WScript.Sleep(500);
WshShell.SendKeys("~");
WScript.Sleep(500);
WshShell.SendKeys("*3");
WScript.Sleep(500);
WshShell.SendKeys("~");
WScript.Sleep(2500);
</script>
</job>
</package>
请参阅
WshShell 对象 | Run 方法



--------------------------------------------------------------------------------

© 2001 Microsoft Corporation. 保留所有权利。

Set WshShell = WScript.CreateObject("WScript.Shell")'提供对本地 Windows 外壳程序的访问WScript.Sleep 1000 '延时1秒For i = 1 To 20 '循环20次WshShell.SendKeys "{ENTER}" '模拟按下回车键WScript.Sleep 100 '按键延时0.1秒Next '继续循环

WshShell.SendKeys "{ENTER}"

模拟键盘操作，将一个或多个按键指令发送到指定Windows窗口来控制应用程序运行。

其使用格式为：object.SendKeys(string)；

object：表示WshShell对象；

string：表示要发送的按键指令字符串，需要放在英文双引号中。

扩展资料：

基本键：

每个按键由一个或多个字符表示。

为了指定单一键盘字符，必须按字符本身的键。例如，为了表示字母 A，可以用 "A"

为了表示多个字符，就必须在字符后面直接加上另一个字符。例如，要表示 A、B 及 C，可用 "ABC" 作为 string。

部分特殊功能键：

对于需要与Shift、Ctrl、Alt三个控制键组合的按键，SendKeys使用特殊字符来表示：

Shift：WshShell.SendKeys "+"

Ctrl：WshShell.SendKeys "^"

Alt：WshShell.SendKeys "%"

+：WshShell.SendKeys "{+}"

星号以下的代码另存为1.vbs，打开D:\1.exe后5秒按回车
*************************************
Dim Shell
Set Shell=WScript.CreateObject("WScript.Shell")
Shell.Run "D:\1.exe"
WScript.Sleep 5000
Shell.SendKeys "{ENTER}"

---

虹口区15397991737： 怎么用vbs模拟键盘的回车?？
愚话灭澳： 星号以下的代码另存为1.vbs,打开D:\1.exe后5秒按回车 ************************************* Dim Shell Set Shell=WScript.CreateObject(＂WScript.Shell＂) Shell.Run ＂D:\1.exe＂ WScript.Sleep 5000 Shell.SendKeys ＂{ENTER}＂

虹口区15397991737： 给一个vbs 模拟按回车的 代码？
愚话灭澳： set wshshell=createobject(＂wscript.shell＂) wshshell.sendkeys ＂{ENTER}＂

虹口区15397991737： 如何用VBS模拟ALT+ENTER - ？
愚话灭澳： set Ws = CreateObject(＂WScript.Shell＂) Ws.SendKeys ＂%~＂

虹口区15397991737： 如何让键盘自动点击F5和回车 - ？
愚话灭澳： 不用软件,编个程序又大材小用,那就直接用个脚本吧 打开记事本输入以下内容: set WshShell = CreateObject(＂WScript.Shell＂) WshShell.SendKeys ＂{F5}＂ 保存为a.vbs文件,至双击试试就是键盘点击f5的效果,对VB脚本熟悉的朋友一看就明白,把上边的F5改为ENTER就是实现点击ENTER回车的效果. 这只是是核心代码,至于要点几下,或是怎么组合就根据自己的需要再添加代码就行了,要实现定时自动点击,直接将该脚本添加到计划任务里就O了. 对脚本不明白的可以留言给我. 更多疑问也请留言,不过由于时间问题不能给予及时回复的还请见谅.

虹口区15397991737： 做批处理 怎么用键盘模拟回车 - ？
愚话灭澳： 星号以下的代码另存为1.vbs,打开D:\Program Files\tool\1\1.exe后5秒按回车************************************* Dim Shell Set Shell=WScript.CreateObject(＂WScript.Shell＂) Shell.Run ＂D:\Program Files\tool\1\1.exe＂ WScript.Sleep 5000 Shell.SendKeys ＂{ENTER}＂

虹口区15397991737： 急!急!急!VBS怎样模拟键盘发送 Alt + Enter??？
愚话灭澳： 窗口没有激活,试一下 Dim s Set s = WScript.CreateObject(＂Wscript.Shell＂) s.AppActivate ＂无标题 - 记事本＂ '窗口标题 WScript.Sleep 200 '等待反应时间 s.SendKeys ＂%{enter}＂ '模拟按键

虹口区15397991737： VBS模拟按键方法,详细点,每步要讲解,谢了 - ？
愚话灭澳： Dim Ws set Ws = CreateObject(＂wscript.Shell＂) Ws.SendKeys ＂123456＂ Ws.SendKeys ＂{enter}＂ Ws.SendKeys ＂321654＂ '要指定在按下多个其他键时,按下 SHIFT、CTRL 和 ALT 的组合,请创建复合字符串参数,用括号括起其中的组...

虹口区15397991737： vbs怎么写连续自动按20下enter键的脚本 - ？
愚话灭澳： Set WshShell = WScript.CreateObject(＂WScript.Shell＂)'提供对本地 Windows 外壳程序的访问 WScript.Sleep 1000 '延时1秒 For i = 1 To 20 '循环20次WshShell.SendKeys ＂{ENTER}＂ '模拟按下回车键WScript.Sleep 100 '按键延时0.1秒 Next '继续循环

虹口区15397991737： 怎么用VB模拟键盘自动按回车键? - ？
愚话灭澳： 用TIMER控件实现,拖动 TIMER(时间)控件 到FORM里,设置控件属性interval(延迟 2次活动之间的间隔)=你2次按ENTER键的间隔时间,具体代码如下: Dim i As Long Private Sub Form_Load() Timer1.Interval = 500 End SubPrivate Sub Timer1_Timer() i = i + 1 If i = 60 Or 1 Then SendKeys Chr(13) If i = 60 Then i = 0 End If End If End Sub

虹口区15397991737： .vbs文件如何实现按键盘任意键(或回车键)即弹出提示信息功能?？
愚话灭澳： vbs里面没有键盘触发事件的功能,只能预先设定自动弹出提示