windows系统的电脑,
首先右击桌面,选择新建-文本文档,在桌面上新建一个文本文档;
随后打开计算机或者是我的电脑,点击其中的组织(xp系统多为工具),选择下面的文件夹和搜索选项
在弹出的窗口中点击查看,向下滚到,找到隐藏已知文件类型的扩展名,点掉勾号,然后确定;
此时发现新建的文本文档出现后缀名为.txt
打开文本文档后,输入: msgbox“傻X”,后保存。
修改文本文档的后缀,将.txt改为.vbs,后确定,双击打开。窗口弹出如图所示窗口,点确定或关闭后消失。
如果想添加一个对方关闭不掉的窗口,则在刚才的代码中添加do … loop
VBS在输入框中输入文字
方法1:VBS在输入框中输入文字代码:
MsgBox InputBox(“此处输入文字”)。
方法2:
name=Inputbox(“此处输入文字”) Msgbox(name)
语法解释:
第一行,给第一行的inputbox(输入框命名):name 第二行,弹出对话框,对话框的内容就是第一行的inputbox输入的内容。
VBS是基于Visual Basic的脚本语言。VBS的全称是:Microsoft Visual Basic Script Editon。
核心代码是一个函数:sendKeys “XXXX”
XXX就代表我们要打的字,这样我们只要在写vbs脚本的时候打一次字就行了。
方法,打开记事本,输入代码。
下面是代码:
Dim WshShell ‘定义一个对象,名字随便起’ Set WshShell=WScript.CreateObject(“WScript.Shell”) ‘初始化对象’ WScript.Sleep 2000 ‘程序暂停2秒’ WshShell.sendKeys “3{ENTER}” ‘模拟人工,按下3,然后按下ENTER键’ WScript.Sleep 2000 ‘程序暂停2秒’ WshShell.sendKeys “N123;Object-Oriented Programming;Dave Smith;2009;3{ENTER}” WScript.Sleep 2000 ‘程序暂停2秒’
由于脚本运行起来特别快,所以可能会出现屏幕上正在输出,我们暂时无法输入,而导致的输入信息不完全。
这也就是程序暂停2秒的原因,当然如果你追求效率,可以试试把时间改到适合你为止。
sendKeys的内容暂时还不支持中文,只能是字符串,如果真的真的一定要输入中文的话,
可以把中文复制后,用sendKe模仿Ctrl V,至于怎么模拟Ctrl键以及把这两个组合起来,让百度告诉你吧。