windows之家1.win10怎么运行VBS?
打开win10系统的电脑，然后准备好vbs文件，这里说明一下，所有vbs都可以用记事本打开，不过看到的只是代码，而并不是运行代码的状态，我们要的是vbs真实运行的状态。
接着右击vbs文件，在弹出的右键菜单中选择打开方式，有的朋友没有打开方式这个选项，也可以选择属性选项。
一般win10系统会自动识别vbs文件，并且自动匹配打开的程序，默认是Microsoft
®
Windows
Based
Script
Host，如果自动识别的就可以双击直接运行vbs文件了，没有识别的需要手动来调节。
接着说下没有自动匹配程序的情况，同样是在打开方式选择程序的窗口界面，点击下方的更多应用选项，
在下方的列表中是没有可以打开的程序，这个时候点击最下面蓝色的zd文字，也就是在这台电脑上查找其他应用选项，点击打开。
接着进入到c盘，然后进入到windows\system32的文件夹，在里边选择wscript.exe，点击打开即可。
2.在windows系统如何编写一个VBS脚本?在windows系统
Dim wsh'声明变量 set wsh=createobject("wscript.shell")'创建对象 wsh.regwrite"HKCU\software\microsoft\windows\currentversion\run\? vbs",WScript.ScriptFullName,"REG_SZ"'获得自身路径并加入开机自启动 wsh.run "mspaint.exe"'运行绘图程序 '在我的电脑windonws7上测试成功 如果觉的我答案有用，请点赞。
3.如何建立.vbs文件
法拉利BEYOND回答，：
方法一：你可用VB软件生成。
方法二：你可以用记事本编辑，然后保存为***.vbs就行了（推荐，这个简单方便，便于修改）
我发一段代码给你玩一下，你放在记事本。然后保存为**.vbs
--------------------------------------分界线-------------------------------------------
on error resume next
Set objShell = CreateObject("Wscript.Shell")
dim a
do while(a <>； "我喜欢你")
a = inputbox （"说我喜欢你，就不关机，快点，说 ""我喜欢你"" "，"快点讲"，"你敢不讲？"，8000,7000）
msgbox chr(13) + chr(13) + chr(13) + a,0,"MsgBox"
loop
msgbox chr(13) + chr(13) + chr(13) + "早说就行了嘛"
msgbox chr(13) + chr(13) + chr(13) + "哈哈哈哈，真过瘾"
msgbox chr(13) + chr(13) + chr(13) + "下次老实一点就没事了！"
msgbox chr(13) + chr(13) + chr(13) + "法拉利BEYOND改写，感谢使用！接下来让你去看看我的空间"
objShell.run "iexplore.exe
------------------------------------------分界线-------------------------------------------
转载请注明出处windows之家 » win10怎么做vbs文档