VBS作为一款脚本语言，从古到今一直起着不可替代的作用，从windows的WHS到WINCC的vbs脚本，一直伴随着工控人的左右，可以说C语言是工控人的启蒙老师，那VBS脚本则是工控人的领路人。如果你能用好VBS可以让你在工控的上位系统里游刃有余，同时还能提升自己的BIG，正因为如此，剑指工控统计过熟练掌握VBS脚本编程的工程师比不懂脚本脚本编程工程师早有女朋友3年，也就是说一个VBS脚本可以让你提前3年。。。。快乐。
我们先来看一个简单的 vbs脚本实例
Const aa="Hello World!" bb="MsgBox 例子" cc="MsgBox"(aa,vbOKOnly,bb) 语法介绍 VBScript 常数什么是常数？常数是具有一定含义的名称，用于代替数字或字符串，其值从不改变。 VBScript定义了许多固有常数。详细信息，请参阅 VBScript 语言参考。创建常数的方法：您可以使用 Const 语句在 VBScript 中创建用户自定义常数。使用 Const 语句可以创建名称具有一定含义的字符串型或数值型常数，并给它们赋原义值。例如： Const MyString = "这是一个字符串。 " Const MyAge = 49 请注意字符串文字包含在两个引号 (" ")之间。这是区分字符串型常数和数值型常数的最明显的方法。日期文字和时间文字包含在两个井号 (#) 之间。例如： Const CutoffDate = #6-1-97# 最好采用一个命名方案以区分常数和变量。这样可以避免在运行 Script时对常数重新赋值。例如，可以使用 “vb”或“con”作常数名的前缀，或将常数名的所有字母大写。将常数和变量区分开可以在开发复杂的 Script 时避免混乱。 VBScript 变量什么是变量？变量相当于一个容器，我们可以给这个容器起名叫做 A，那么我们可以向 A杯子内放入任何的数。那么容器 A就可以看作是一个变量。声明变量：声明变量的一种方式是使用 Dim 语句、Public 语句和 Private 语句在 Script 中显式声明变量。例如： Dim aa 声明多个变量时，使用逗号分隔变量。例如： Dim Top, Bottom, Left, Right 数据类型描述 Null 不包含任何有效数据的变量。 Boolean 包含 True 或 False。 Integer 包含 -32,768 到 32,767 之间的整数。 Long 包含 -2,147,483,648 到 2,147,483,647 之间的整数。 Single 包含单精度浮点数，负数范围从 -3.402823E38 到 -1.401298E-45，正数范围从 1.401298E-45 到 3.402823E38。 Double 包含双精度浮点数，负数范围从 -1.79769313486232E308 到 -4.94065645841247E-324，正数范围从 4.94065645841247E-324 到 1.79769313486232E308。 String 包含变长字符串，最大长度可为 20 亿个字符。 弹出对话框的函数 MSGBOX("剑思庭VBS教程") WScript.Echo("剑思庭VBS教程") Set WshShell = WScript.CreateObject("WScript.Shell") WshShell.Popup "剑思庭VBS教程" MsgBox 函数描述在对话框中显示消息，等待用户单击按钮，并返回一个值指示用户单击的按钮。语法 MsgBox(prompt[, buttons][, title][, helpfile, context]) MsgBox 函数的语法有以下参数： 参数描述 prompt 作为消息显示在对话框中的字符串表达式。prompt 的最大长度大约是 1024 个字符，这取决于所使用的字符的宽度。如果 prompt 中包含多个行，则可在各行之间用回车符 (Chr(13))、换行符 (Chr(10)) 或回车换行符的组合 (Chr(13) & Chr(10)) 分隔各行。 buttons 数值表达式，是表示指定显示按钮的数目和类型、使用的图标样式，默认按钮的标识以及消息框样式的数值的总和。有关数值，请参阅“设置”部分。如果省略，则 buttons 的默认值为 0。 title 显示在对话框标题栏中的字符串表达式。如果省略 title，则将应用程序的名称显示在标题栏中。 helpfile 字符串表达式，用于标识为对话框提供上下文相关帮助的帮助文件。如果已提供 helpfile，则必须提供 context。在 16 位系统平台上不可用。 context 数值表达式，用于标识由帮助文件的作者指定给某个帮助主题的上下文编号。如果已提供 context，则必须提供 helpfile。在 16 位系统平台上不可用。 设置 buttons 参数可以有以下值：常数值描述 vbOKOnly 0 只显示确定按钮。 vbOKCancel 1 显示确定和取消按钮。 vbAbortRetryIgnore 2 显示放弃、重试和忽略按钮。 vbYesNoCancel 3 显示是、否和取消按钮。 vbYesNo 4 显示是和否按钮。 vbRetryCancel 5 显示重试和取消按钮。 vbCritical 16 显示临界信息图标。 vbQuestion 32 显示警告查询图标。 vbExclamation 48 显示警告消息图标。 vbInformation 64 显示信息消息图标。 vbDefaultButton1 0 第一个按钮为默认按钮。 vbDefaultButton2 256 第二个按钮为默认按钮。 vbDefaultButton3 512 第三个按钮为默认按钮。 vbDefaultButton4 768 第四个按钮为默认按钮。 第一组值 (0 -5) 用于描述对话框中显示的按钮类型与数目；第二组值 (16, 32, 48, 64) 用于描述图标的样式；第三组值 (0, 256, 512) 用于确定默认按钮；而第四组值 (0, 4096) 则决定消息框的样式。在将这些数字相加以生成 buttons 参数值时，只能从每组值中取用一个数字。 返回值 MsgBox 函数有以下返回值：常数值按钮 vbOK 1 确定 vbCancel 2 取消 vbAbort 3 放弃 vbRetry 4 重试 vbIgnore 5 忽略 vbYes 6 是 vbNo 7 否 说明如果同时提供了 helpfile 和 context，则用户可以按 F1 键以查看与上下文相对应的帮助主题。如果对话框显示取消按钮，则按 ESC 键与单击取消的效果相同。如果对话框包含帮助按钮，则有为对话框提供的上下文相关帮助。但是在单击其它按钮之前，不会返回任何值。 下面的示例利用 MsgBox 函数显示一信息框并且返回值说明了按下的是那一个按钮: Dim MyVar MyVar = MsgBox ("Hello World!", 65, "MsgBox 例子") ' MyVar 包含 either 1 or 2， '依赖于 被按下的按钮。 一个 VBS的加法运算的例子 : dim a,b,c'声明变量 a,b,c a="4"'变量付值。把变量 a付值为 4 b="6"'变量付值。把变量 b付值为 6 c="a" b'把变量 a的内容和变量 b内的内容进行相加，存放到变量 c中 msgbox(c)'用 msgbox函数显示出变量 c中的内容。 dim a,b,c a="4" b="6" c="a" b msgbox(c) ============= VBS 中的运算符 运算符 付值= 加 减 乘 * 除 / =============== 小于 < 大于 > 负号 - 等于 == 小于等于 <= 大于等于 >= 不等于 <> =============== 求余 Mod 逻辑与 And 逻辑或 Or 逻辑非 Not 逻辑异或 Xor 字符串连接 & Chr(34) 为"符号 ======================= 实例： Dim a,b,c,d,e a= InputBox("输入一个加数") b= InputBox("输入一个被加数") c=CInt(a) d="CInt"(b) e="c" d msgbox(e) Cint函数作用：把一个其它类型的数转化为正数型。使用格式 CINT(表达式) InputBox 函数显示一对话框来做为提示，等使用者输入文字或按下按钮，则传回文字方块的内容。 InputBox(prompt[, title][, default][, xpos][, ypos][, helpfile, context]) 自变量 prompt 字符串表达式。用来做为对话框讯息的字符串表达式。prompt 的最大长度大约是 1024 个字符，由使用字符的宽度来决定。如果 prompt 超过一行，您可以在各行之间用复位字符 (Chr(13))、换行字符 (Chr(10))、或是复位字符与换行字符的组合 (Chr(13) & Chr(10)) 来做区隔。 title 显示在对话框标题列的字符串表达式。如果没有 title，则以应用程序的名称做为标题。 default 显示在文字方块中的字符串表达式，在没有提供其它输入时做为默认值。如果没有 default，则文字方块就是空白的。 xpos 数值表达式。成对指定的数值表达式，用来指定对话框的左缘与屏幕左缘的水平距离。如果没有 xpos，则对话框会出现在水平方向的中间。 ypos 成对指定的数值表达式，用来指定对话框的上缘与屏幕的上缘的距离。如果没有 ypos，对话框会放置于屏幕垂直方向三分之一的位置。 helpfile 字符串表达式，用来指定对话框文字感应说明的说明档案。如果指定了 helpfile，则您也必须指定 context。 context 数值表达式，由说明档案的作者指定给某个说明主题的说明主题代码。如果指定了 context，则也必须指定 helpfile。 附注如果同时提供 helpfile 与 context，对话框中会自动加上一个 Help 按钮。 如果使用者按了一下 [确定] 或是按了 ENTER，则 InputBox 函数会传回文字方块中的内容；如果使用者按了一下 [取消]，则此函数会传回一个长度为零的字符串 ("")。 下面范例即使用 InputBox 函数显示输入方块并指定字符串给 Input 变量： Dim Input Input = InputBox("Enter your name") MsgBox ("You entered: " & Input)
