vbs最简单教材.docx

vbs最简单教材.docx

《vbs最简单教材.docx》由会员分享，可在线阅读，更多相关《vbs最简单教材.docx（15页珍藏版）》请在冰豆网上搜索。

vbs最简单教材

VBScript最简教材

——ByXiangTianYu

第一节程序的基本结构及输出函数

Rem1编写你第一个程序Rem2编写你第一个程序

DimName<等价于>Msgbox“Hello,world!

”

Name=“Hello,world!

”

MsgboxName

把上面的代码复制一个记事本中，并重命名为Hello.Vbs（好吧其实hello这个文件名没有什么用途，重在的是改后缀名为vbs！

【如果你电脑没有显示后缀名，别急！

请点击工具——文件夹选项——查看——看到那个高级选项没？

那就找一下“隐藏已知文件后缀名”把那个勾去掉——应用，确定ok！

】格式如下：

*.vbs）打开之后会弹出一个显示Hello,world!

的窗口，没错这就是你第一次编写的脚本程序！

是不是很激动！

但是我们输入上去的你可能发现了几个你不认识的字符：

Rem、Dim、Msgbox这些具有特殊功能的字符我们称之为函数，那你可能好奇道，这些函数有什么用了？

Rem：

解释这段代码的作用！

以Rem开头的代码是在程序中是不运行的！

它的用途是说明你的程序是干什么的？

当然这段代码是可以去除的（因为它是不运行的嘛），估计你会说到那就删掉呗！

反正占内存……切忌：

不要去掉Rem，因为也许不久的将来你会纠结于这段代码用途……

Dim：

声明变量作用哦！

什么是变量了？

就这么比喻吧！

变量就像一个个小房子，这个小房子可以住“人”，而这“人”可以是各式各样的东西：

数字，文字啊！

对象（以后再讲）啊！

总之是什么都能装……也许你会问道为什么要声明啊？

声明的作用有点像申请房子一样！

一小小的地皮上需要多少人住啊？

为了合理利用我们需要知道多少人要住，从而建造多少房子。

当然如果你不申请的话自然会有资源的浪费……同样声明也是同样的作用：

我们在程序中定义的变量，在计算机内存中都要为其开辟一定数量的存储单元，为了不造成资源的不必要浪费，所以要声明……当然vbs是可以不用声明的（因为vbs会自动分配的，但是会造成资源的浪费）！

所以这段代码也可以删除滴！

不过声明变量是一个程序员基本节操……

Msgbox：

输出你想要表达字符……这个小小的函数一被运行就会桌面上弹出一个小小的窗口，如图

看到了吗？

是不是很酷！

它会把Msgbox后面的变量、字符串（什么是字串符了？

呵呵！

就是“”给括起来的字符啦）给显示出来！

具体格式如下……Msgbox（“内容”，，“标题”）{尽量不用括号会造成错误的，只有参数的时候才用……呵呵，放心以后会讲的！

}

说到这里是不是你对你第一个编写的程序有所了解？

还是不懂？

没事！

我们接的讲……

Rem1编写你第一个程序‘首先说明一下这里的“‘”是vbs中表示注解的作用，与Rem函数一样，“’”后面的是不运行解释的！

DimName’声明Name这个变量

Name=“Hello,world!

”‘并让Name这个变量住进了“Hello,world!

”这个字符串，等于的作用相当于把等式的右边放进左边的变量中

MsgboxName‘最后用Msgbox来表示Name变量中“人”的“Hello,world!

”字串符给“请”出来……

上面的是第一段代码的解释……

Rem2编写你第一个程序

Msgbox“Hello,world!

”‘Msgbox函数直接就将它后面的“Hello,world!

”这个字串符显示出来！

通过上面两个代码对比，你会发现第二个程序比第一个程序短好多啊！

那是因为第二个程序是直接就把用“Hello,world!

”这个字串符Msgbox显示出来了……

所以我们就可以知道对于程序的精简是很有必要的！

！

总结以上学习我们可以大致可以归类出vbs程序的基本结构

Rem说明程序的用途

Dim声明变量，如果是多变量请用“，”逗号分隔开

变量=”字串符“或“数字”或“对象”这里的“=”是斌值的作用哦！

是把等式的右边的东东放到左边的变量中，那这个变量就有了右边的东东，需要的时候再把变量拿出来用就可以了！

Msgbox表现函数，它就把我们需要的数据给表达出来啦！

随便再说一句，任何程序（当然，你马上学到的循环语句就会不一样楼！

这只是说明一下）它运行方向是自上到下的！

第一节程序中的“&”“+”换行符运用，输出函数

上一节我们让计算器会说话了，但是计算器是说我们给它编好的话……重新让它说其他话又得重新编程好麻烦啊………………能不能让我们叫它说什么就说什么了？

今天我们来讲输出函数inputbox！

Rem让它说你想要让说的话

Dimword‘声明Word这个变量

Word=inputbox（“请说你想要说的话！

”,”标题”）‘inputbox函数被运行时会弹出一个窗口请你输入，又在你输入好并按下Enter后，它会将你输入好的字符住进“word”这个变量

MsgboxWord’哈哈，显示你输入的字符

Inputbox函数：

如同上一节我们学过的Msgbox函数一样！

被运行解释时会在窗口弹出一个窗口请你输入，又在你输入好并按下Enter后,它会将你输入好的字符斌值给变量！

Inputbox函数运行图：

Msgbox函数运行图：

看到了吧！

这就是Inputbox函数与Msgbox函数运行时的对话框……

他们的使用方法如下

Inputbox函数

变量=Inputbox（“内容”，“标题”，“默认值”，窗口位置X轴，窗口位置Y轴）

Msgbox函数

Msgbox“内容”，参数，“标题”

还是没懂到？

没关系，我们来练练！

先是Msgbox函数吧！

Rem显示不同的提示图标

Msgbox“本图片不存在！

”,16,”系统提示”

Msgbox“本图片不存在！

”,32,”系统提示”

Msgbox“本图片不存在！

”,48,”系统提示”

Msgbox“本图片不存在！

”,64,”系统提示”

效果如图：

呵呵是不是很好玩？

你可能惊讶于：

为什么只是更改了参数就有如此之大的变化了？

为了我们要了解这个问题，我们首先介绍一下什么是参数？

参数其实是在函数中赋予特殊功能是数字或字符。

一定要看清楚！

是在函数中！

！

硬是要说的话参数是函数中的函数（其实我对参数的理解并不好……）所以参数只在函数中！

这回我们回到刚刚提到的问题：

为什么只是更改了参数就有如此之大的变化了？

其实你可以自己回答了：

参数是具有特殊功能滴！

那它们具体有什么功能了？

如表：

参数设置值

常数

值

描述

对话框中显示的按钮的类型与数目

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

第四个按钮是默认按钮。

对话框的强制返回性

vbApplicationModal

0

应用程序强制返回；应用程序一直被挂起，直到用户对消息框作出响应才继续工作。

vbSystemModal

4096

系统强制返回；全部应用程序都被挂起，直到用户对消息框作出响应才继续工作。

对话框特殊设置

vbMsgBoxHelpButton

16384

将帮助按钮添加到消息框。

vbMsgBoxSetForeground

65536

指定消息框窗口作为前景窗口。

vbMsgBoxRight

524288

文本为右对齐。

vbMsgBoxRtlReading

1048576

指定文本应为在希伯来和阿拉伯语系统中的从右到左显示。

这些常数都是VisualBasicforApplications（VBA）指定的。

所以，可以在程序代码中使用这些常数名称，而不使用实际数值。

详细资料：

Inputbox函数：

Rem让它说你想要让说的话

Dimword

Word=inputbox（“请说你想要说的话！

”,”标题”,”欢迎来到vbs世界”,1,2）

MsgboxWord,64+VbYesNo,”标题”

乍一眼发现与前面的程序没啥不同啊？

一打开才知道哪里不同……

1）我添加了默认值，还有窗口的位置的X，Y轴

2）你会发现原来64和VbYesNo原来是可以连用的！

如果连用必须要“+”或“&”（别急！

马上会讲到的，朋友！

）

好！

终于讲完了msgbox函数和inputbox函数的用法，在vbs中这两种表现函数是最为常见的两种，所以请大家要牢记它们用法哦！

*杂项&，+，换行符的用法

哦！

忘说了……在任何程序（不仅仅VBS）都不准出现中文标点符号！

！

一定是英文标点符号！

希望大家能多多提出我文中的问题，非常感谢！

好了现在进入正题吧！

Rem输入你的名字，并显示“你好！

“&你的名字

DimMyName

MyName=inputbox（"请输入你的名字","名字"）

Msgbox"你好!

"+MyName&"，朋友！

"

效果图：

你发现（"你好!

"+MyName&"，朋友！

）合并在一起了！

这是怎么做到了？

呵呵，最大的功臣便是“+”与“&”它们的作用便是合并字串符，不过如果只是合并的字串符的话那最好使用“&”，因为“+”容易会混淆，“+”与“&”可是一个好东西啊！

比如你要制作免杀的病毒，用它们就可以改变程序结构，隐藏特征项。

最好的列子便是：

fso=createobject（"scripting.filesystemobject"）

变成：

fso=createobject（"script"&"ing.filesyste"&"mobject"）

呵呵，讲远了……总之，要活学“+”与“&”的运用时很重要的！

！

Rem输入你、你的父亲、你的母亲的姓名，并显示！

DimMyName,MyFatherName,MyMatherName

MyName=inputbox（"请输入你的名字","名字"）

MyFatherName=inputbox（"请输入你父亲的名字","父亲的名字"）

MyMatherName=inputbox（"请输入你母亲的名字","母亲的名字"）

Msgbox"你的名字：

"+MyName&chr（13）&chr（10）&_

"你父亲的名字：

"&MyFatherName&vbCrLf&_

"你母亲的名字：

"&MyMatherName&vbCrLf&_

"祝你们幸福！

"

呵呵！

看到效果没？

你会发现chr（13）&chr（10）与vbCrlf的作用是一样的“换行”不过chr（13）&chr（10）太过麻烦了……所以我们多用vbCrlf！

细