空间管理您的位置: 51Testing软件测试网 » 邹平的51Testing博客 » 日志

QQ测试群：4910001、9701760，欢迎加入！学习和讨论QA、软件测试、网站测试、性能、自动化测试等技术，以及招聘测试相关工作。

2011-5-12学习笔记【VBScript教程】

上一篇 / 下一篇 2011-05-12 15:53:51 / 个人分类：学习笔记

查看( 337 ) / 评论( 1 ) / 评分( 0 / 0 )

来源：http://www.w3school.com.cn/vbscript/

如何在 HTML 文档中放置 VBScript
<html>
<head>
</head>
<body>

</body>
</html>

如何应对老式的浏览器
不支持脚本的老式浏览器会把脚本作为网页的内容显示出来。为了避免出现这样的情况，我们可

以使用 HTML 的注释标签：

在何处放置 VBScript
当页面载入浏览器时，页面中的脚本会立即被执行。我们并不希望这种情况发生。有时我们希望

当页面载入时执行脚本，而有时我们则希望当用户触发某个事件时执行这些脚本。

在 head 部分的脚本：当脚本被调用时，它们会被执行，或者某个事件被触发时，脚本也有可能

会执行。当我们把脚本放置于 head 部分时，就可以确保在用户使用之前它们已经被载入了：

<html>
<head>
<script. type="text/vbscript">
some statements
</script>
</head>在 body 部分的脚本：当页面的 body 部分被载入时，脚本就会被执行。当我们把脚本放

置于 body 部分，它会生成页面的内容：

<html>
<head>
</head>
<body>
<script. type="text/vbscript">
some statements
</script>
</body>位于 body 和 head 部分的脚本：您可以在文档中放置如何数量的脚本，因此您可以同时

在 body 和 head 部分放置脚本：

<html>
<head>
<script. type="text/vbscript">
some statements
</script>
</head>
<body>
<script. type="text/vbscript">
some statements
</script>
</body>

VBScript. 变量

实例
创建变量
变量用于存储信息。本例演示如何创建一个变量，并为它赋值。
在一段文本中插入变量值
本例为您演示如何在一段文本中插入变量值。
创建数组
数组用来存储一系列相关的数据项。本例演示如何创建一个存储名字的数组。（我们使用 "for

loop" 来演示如何输出名字。）
---------------------------
什么是变量？
变量是可存储信息的“容器”。在脚本中，变量的值是可以改变的。您可以通过引用某个变量的

名称，来查看或修改它的值。在 VBScript. 中，所有的变量都与类型相关，可存储不同类型的数

据。
---------------------------
变量名称的规则：
必须以字母开头
不能包含点号 (.)
不能超过 255 个字符
----------------------------
变量声明
您可以使用 Dim、Public 或 Private 语句来声明变量，比如这样：

dim name
name=some value
现在，你创建了一个变量。变量名是 "name"。

您也可以通过使用其名称来创建变量。比如这样：

name=some value
这样，您同样创建了一个名为 "name" 的变量。

不过，后面这样的做法不是一种好习惯，这是因为您可能会在脚本中拼错变量名，那样可能会在

脚本运行时引起奇怪的结果。比如，当您把 "name" 变量错拼为 "nime" 时，脚本会自动创建一

个名为 "nime" 的变量。为了防止脚本这样做，您可以使用 Option Explicit 语句。如果您使用

这个语句，就必须使用 dim、public 或 private 语句来声明所有的变量。把 Option Explicit

语句放置于脚本的顶端，这像这样：

option explicit
dim name
name=some value
------------------------------------------
为变量赋值
您可以像这样为某个变量赋值：

name="George"
i=300
变量名在表达式的左侧，需要赋的值在表达式的右侧。现在，变量 "name" 的值是 "George"。
------------------------------------------
变量的生存期
变量的生存期指的是它可以存在的时长。

当您在一个子程序中声明变量后，变量只能在此程序内进行访问。当退出此程序时，变量也会失

效。这样的变量称为本地变量。您可以在不同的子程序中使用名称相同的本地变量，因为每个变

量只能在声明它的程序内得到识别。

如果您在子程序以外声明了一个变量，在您的页面上的所有子程序都可以访问访问它。这类变量

的生存期始于它们被声明，止于页面被关闭。
--------------------------------------------
数组变量
有时，您需要向一个单一的变量赋于多个值。那么您可以创建一个可包含一系列值的变量。这种

变量被称为数组。数组变量的声明使用变量名后跟一个括号()。在下面的例子中，创建了一个包

含三个元素的数组：

dim names(2)括号中的数字是 2。数组的下标以 0 开始，因为此数组包含三个元素。这是容量固

定的数组。您可以为数组的每个元素分配数据：

names(0)="George"
names(1)="John"
names(2)="Thomas"
同样地，通过使用特定数组元素的下标号，我们也可以取回任何元素的值。比如：

father=names(0)您可以在一个数组中使用多达 60 个维数。声明多维数组的方法是在括号中用逗

号来分隔数字。比如，我们声明了一个包含 5 行 7 列的 2 维数组：

dim table(4, 6)

VBScript. 程序

VBScript. 程序
我们可使用两种程序：子程序和函数程序。

子程序：
是一系列的语句，被封装在 Sub 和 End Sub 语句内。
可执行某些操作，但不会返回值。
可带有通过程序调用来向子程序传递参数。
如果没有，必须带有空的圆括号
Sub mysub()
some statements
End SubSub mysub(argument1,argument2)
some statements
End Sub函数程序：
是一系列的语句，被封装在 Function 和 End Function 语句内。
可执行某些操作并返回值。
可带有通过程序调用来向其传递参数。
如果没有，必须带有空的圆括号
通过向函数程序名赋值的方式，可使其返回值。
Function myfunction()
some statements
myfunction=some value
End FunctionFunction myfunction(argument1,argument2)
some statements
myfunction=some value
End Function
--------------------------------------
调用子程序或函数程序
可以这样调用某个函数：

name = findname()

此函数名为 "findname"，函数会返回一个值，这个值会存储于变量 "name" 中。

或者可以这样做：

msgbox "Your name is " & findname()

我们通过调用了名为 "findname" 的函数，这个函数返回的值会显示在消息框中。

可以这样调用子程序：

Call MyProc(argument)

或者，也可以省略 Call 语句：

MyProc argument

VBScript. 条件语句

实例
If...then..else 语句
本例演示如何编写 if...then..else 语句。
If...then..elseif 语句
本例演示如何编写 if...then...elseif... 语句。
Select case 语句
本例演示如何编写 select case 语句。
----------------------------------
If....Then.....Else
在下面的情况中，您可以使用 If...Then...Else 语句：

在条件为 true 时，执行某段代码
选择两段代码之一来执行时
如果需要在条件为 true 时只执行一行语句，可以把代码写为一行：

if i=10 Then msgbox "Hello"在上面的代码中，没有 .else.. 语句。我们仅仅让代码在条件为

true 时执行一项操作（当 i 为 10 时）。

假如我们需要在条件为 true 时执行不止一条语句，那么就必须在一行写一条语句，然后使用关

键词 "End If" 来结束这个语句：

if i=10 Then
msgbox "Hello"
i = i+1
end If
在上面的代码中，同样没有 .else.. 语句。我们仅仅让代码在条件为 true 时执行了多项操作。

假如我们希望在条件为 true 时执行某条语句，并当条件不为 true 时执行另一条语句，就必须

添加关键词 "Else"：

if i=10 then
msgbox "Hello"
else
msgbox "Goodbye"
end If当条件为 true 时会执行第一段代码，当条件不成立时执行第二段代码（当 i 不等于 10

时）。
---------------------------------
If....Then.....Elseif
假如你希望选择多套代码之一来执行，可以使用if...then...elseif语句：

if payment="Cash" then
   msgbox "You are going to pay cash!"
elseif payment="Visa" then
   msgbox "You are going to pay with visa."
elseif payment="AmEx" then
   msgbox "You are going to pay with American Express."
else
   msgbox "Unknown method of payment."
end If
----------------------------------------------
Select Case
假如你希望选择多套代码之一来执行，可以使用 SELECT 语句：

select case payment
case "Cash"
   msgbox "You are going to pay cash"
case "Visa"
   msgbox "You are going to pay with visa"
case "AmEx"
   msgbox "You are going to pay with American Express"
case Else
   msgbox "Unknown method of payment"
end select

以上代码的工作原理：首先，我们需要一个简单的表达式（常常是一个变量），并且这个表达式

会被做一次求值运算。然后，表达式的值会与每个 case 中的值作比较，如果匹配，被匹配的

case 所对应的代码会被执行。

VBScript. 循环语句
实例
For..next 循环
本例演示如何编写一个简单的 For....Next 循环。
循环输出HTML标题
本例演示如何循环生成 6 个 HTML 标题。
For..each 循环
本例演示如何编写一个简单的 For.....Each 循环。
Do...While 循环
本例演示如何编写简单的 Do...While 循环。
-----------------------------------
Looping 语句
经常地，当编写代码时，我们希望将一段代码执行若干次。我们可以在代码中使用循环语句来完

成这项工作。

在 VBScript. 中，我们可以使用四种循环语句：
For...Next 语句
运行一段语句指定的次数
For Each...Next 语句
针对集合中的每个项目或者数组中的每个元素来运行某段语句。
Do...Loop 语句
运行循环，当条件为 true 或者直到条件为 true 时。
While...Wend 语句
不要使用这个语句 - 请使用 Do...Loop 语句代替它。
-----------------------------------------------------
For...Next 循环
如果您已经确定需要重复执行代码的次数，那么您可以使用 For...Next 语句来运行这段代码。

我们可以使用一个计数器变量，这个变量会随着每次循环递增或递减，例如这样：

For i=1 to 10
some code
Next
For 语句规定计数变量以及它的开始值和结束值。

Next 语句会以 1 作为步进值来递增变量i。

Step 关键词
通过使用 Step 关键词，我们可以规定计数变量递增或递减的步进值。

在下面的例子中，计数变量i每次循环的递增步进值为 2。

For i=2 To 10 Step 2
some code
Next
如果要递减计数变量，就必须负的步进值。并且需要规定小于开始值的结束值。

在下面的例子中，计数变量i每次循环的递减步进值为 2。

For i=10 To 2 Step -2
some code
Next
退出 For...Next
如需退出 For...Next 语句，可以使用 Exit 关键词。

您已经学习了 VBScript，下一步的内容是？
下一步，您应该继续学习 ASP。

与 HTML 文件中运行于客户端的脚本不同，ASP文件中的脚本运行于服务器之上。

通过使用 ASP，你可以动态地编辑、改变或者添加网页的任何内容，对由 HTML 表单提交的数据

作出响应，访问任何数据或数据库并向浏览器返回结果，为不同的用户定制更有用的页面等等。