VBS 入门交互实战

🎈 什么是 VBS

• VBS 是一种 Windows 脚本语言，全称是 Microsoft Visual Basic Script Editon，微软公司可视化 BASIC 脚本版
  
• vbs 是系统内置的，代码可在 windows 系统中直接执行，不需要编译环境，非常的方便
  
• vbs 脚本简单，高效，大部分功能都可以实现，利用好 vbs 脚本，可以极大的提高效率，可以用它来做一些反复繁琐的机器操作

🎈 第一个 VBS 脚本

• 在桌面上新建一个文本文档
  
• 打开文本文档，在其中输入 msgbox "Hello World!"
  
• 将文本文档的格式后缀 .txt 改为 .vbs
  
• 然后双击运行文件即可
  

🎈 msgbox 语法

• 语法：msgbox "对话框内容","对话框类型(参数：0,1,2,3,4,5)","对话框标题"
  
• 对话框内容：是指弹窗的主体内容
  
• 对话框类型：可以选择 0-5 共6种类型的对话框模式，0时对话框只有确定按钮；1时对话框有确定按钮、取消按钮；2时对话框有中止按钮、重试按钮、忽略按钮；3时对话框有是按钮、否按钮、取消按钮；4时对话框有是按钮、否按钮并且对话框禁止点击右上角的关闭按钮；5时对话框有重试按钮、取消按钮。如果不填默认为0
  
• 对话框标题：是指弹窗的标题
  

msgbox"飞兔小哥送你一份奖品待领取", 3, "温馨提醒"

🎈 中文乱码

• 上图可以看到中文乱码了
  
• 这主要是因为编码错误导致的，正常的文本文档它的编码格式是 UTF-8 的，但是 VBS 脚本需要编码格式是 ANSI 才可以正常运行中文
  
• 这时候我们需要 打开文本文档 ► 点击左上角文件 ► 另存为 ► 选择编码为ANSI ► 确定 即可解决
  

🎈 弹窗交互功能

• 上面我们只是实现了很简单的展示功能，那么我们需要实现交互功能，就要用到变量了
  
• 在 vbs 中可以通过 dim 定义变量，语法为：dim 变量名1,变量名2,变量名3...变量名n
  
• 其中 inputbox 可以用来接收用户手动输入的参数
  

dimnamename = inputbox("请告诉我您是谁", "这是交互的标题")
msgboxname,,"欢迎您"

🎈 表白恶搞

• 之前很火的关闭不了的表白弹窗，就是 vbs 做出来的
  
• 使用 dim a(5) 可以定义数组，5表示这个数组里面有多少元素
  
• 使用 Select Case 表示这是一个选项
  
• 其中选择同意的返回值为6，不同意的返回值为7
  
• 如果点击了不同意，那就循环从数组中取值展示
  
• 如果用户点击了同意，那就阴谋得逞，退出选项
  

MsgBox"佛前哭求"MsgBox"奈何桥等待"MsgBox"五百次回眸"MsgBox"千年的回首"MsgBox"百世的轮回"MsgBox"换你今朝一世情缘"MsgBox"可否"dima(5)
a(0)="天大，地大，女友最大"a(1)="工资上交"a(2)="房写你名"a(3)="帮清购物车"a(4)="保大"a(5)="你就答应我把^o^"DimjDoSelectCasemsgbox ("姑娘，做我女朋友吧", 4)
Case6MsgBox"you are my girlfriend，"+Chr(13) +"from this day until to my last days."exitdoCase7msgboxa(i)
i=i+1ifi>=6theni = 0endifendSelectLoop