本章小结
本章主要介绍在网页中使用 VBScript 进行脚本编程的基本知识,是 ASP 程序设计的基础。
内容主要包括 VBScript 的基本概念,如何在网页中嵌入 VBScript 脚本,VBScript 的基本数据 类型、常量与变量、运算符与表达式的使用、语句控制的方法、常见内置函数的应用、VBScript 过程、VBScript 对象编程等。
VBScript 是一种基于对象的脚本语言,是 VB 的子集。在网页文件中可直接嵌入 VBScript
176
脚本,以控制网页的控件和对象,增强网页的灵活性和多样性,而且还可以对用户的操作作出 反应。
VBScript 可在客户端进行编程,也可作为服务器端编程语言。因此,它可以在 HTML 网 页中使用,也可在 ASP 网页中使用,但使用格式有所差异。
VBScript 中只有一种数据类型,称为 Variant(变体型)。根据使用方式的不同,Variant 可以包含不同类型的信息,即这种数据类型可以根据用途的需要选择最合适的子类型来存储 数据。
在 VBScript 中,定义常量使用 Const 语句,对变量的定义可以直接使用,也可以在使用 前事先定义。变量声明的位置不同,其作用域也不同。
VBScript 的运算符包括算术、字符串(连接)、逻辑和比较 4 种。
在 VBScript 中经常用到的函数有数学运算函数、字符串函数、日期函数、数据类型转换 函数和多种用于产生对话框的函数。
VBScript 语句主要包括条件语句与循环语句,条件语句有 if 语句、select case 语句;循环 语句有当型和直到型循环语句。
在 VBScript 中,为了简化程序,经常需要使用 Sub 过程和 Function 函数。
可以使用 VBScript 对象模型进行编程,如 Window 对象、Document 对象等。
关于本章内容的进一步学习,读者可以参阅以下网站:
http://www.duoko.com
http://www.adminlm.net/jc/VBscript http://ie.zzu.edu.cn/jiaoxue/asp/index.asp http://www.bianceng.cn/vbscript
http://www.176net.com/article/wangzhankaifa/vbscript
习题 4
一、选择题
1.以下对 VBScript 描述,不正确的是( )。
A.是基于对象的脚本语言 B.是 VB 的子集
C.IE 浏览器不支持 VBScript D.通常用于 ASP 服务器端编程 2.在 VBScript 中,注释采用( )。
A.// B./*…*/ C.' D."
3.若 VBScript 的变量在使用前必须事先定义,则应使用( )语句设置。
A.Option Explicit B.Option Base C.Dim D.ReDim 4.在 VBScript 中,日期常量必须用( )括起来。
A.' ' B." " C.; D.#
5.可用于计算一个表达式的值的函数是( )。
A.Fix() B.Eval() C.Val() D.Round() 6.若要获得当前系统日期为星期几,可使用( )函数实现。
177
1.ASP 的服务器端脚本编程通常采用__________,它是 Visual Basic 的子集。
2.Microsoft 公司的__________浏览器支持 VBScript,也支持 JavaScript。
3.在 VBScript 中,字符连接可使用的运算符有__________或__________。
4.在 VBScript 中,可用__________函数来获取当前时间。
5.编写 HTML 静态网页时,从兼容性考虑,脚本语言宜选用__________。
6.VBScript 的运算符包括__________、__________、逻辑和比较 4 种运算符。
7.在 VBScript 中,为了简化程序,经常需要使用__________过程和__________函数。
8.在 VBScript 中,定义常量使用__________语句。
9.VBScript 是一种基于__________的脚本语言。
10.使用 Document 对象的__________属性可以在页面上自动产生最后修改页面的日期。
三、程序分析题
1.编写一个随意确定 N 的数值,并计算且显示出 1+2+3+…+N 的和的页面。
<html>
<body>
<script language="vbscript">
N=__________
Sum=0
For i=1 to N __________
Next
Document.write("N 的值为:"__________)
</Script>
</body>
</html>
2.使用 VBScript 中的事件:页面中只显示一个“点击试一下”的按钮;当用户单击“点 击试一下”按钮后,弹出对话框:你成功了!
<html>
178
<body>
<form>
<input type="__________"value="点击试一下"onclick=__________>
</form>
</body>
</html>
3.交换变量内容。
Sub Swap(x, y) Dim t
__________' 交换两个变量的值 End Sub
Sub Button1_onClick() Dim a, b
a = Form1.Text1.Value b = Form1.Text2.Value __________
Form1.Text1.Value = a Form1.Text2.Value = b End Sub
四、编程题
1.编写一个 Web 页面,在状态栏中显示系统当前时间。
2.编写一个求最大值的 HTML 页面,输入两个整数并求出较大者。
3.利用 Window 对象的有关方法实现在状态栏显示滚动文本“欢迎光临!”。
实训 4 VBScript 脚本编程
一、实验目的与要求
(1)掌握 VBScript 中常用函数的使用。
(2)掌握 VBScript 常用程序控制语句的使用。
(3)掌握 VBScript 中 Sub 过程与 Function 函数的使用。
(4)掌握 Window 对象、Document 对象常用的属性、方法和事件的使用。
二、实验内容
1.使用日期时间函数 Date()、Time()、Now(),获取系统当前日期与时间。如图 4-25 所示。
图 4-25 日期时间函数应用
179 2.使用对话框函数 inputbox()、msgbox(),输入一个年份数字,并判断是“闰年”或“非
闰年”。如图 4-26 和图 4-27 所示。
图 4-26 inputbox()函数应用 图 4-27 msgbox()函数应用 3.使用数组和随机数函数 Rnd(),编写一个随机显示信息的页面,当单击“随机字符”
按钮时,把获得的随机字符串显示到文本框中。如图 4-28 所示。
图 4-28 Rnd()函数应用
4.使用 if 语句,编写一个数值比较程序。在表格的三个文本框中任意输入三个数字,单 击“排序”按钮,在弹出的消息窗中显示最大数和最小数。如图 4-29 所示。
图 4-29 if 语句应用
5.使用 if…elseif 语句,编写一个背景和文字颜色变化程序。当用户选择背景颜色或文字 颜色时,页面中的背景颜色或文字颜色将会发生相应的变化。如图 4-30 所示。
180
图 4-30 if…elseif 语句应用
6.使用 do while 语句,编写一个动态输出表格的程序。如图 4-31 和图 4-32 所示。
图 4-31 do while 语句应用 图 4-32 do while 语句应用
7.编写一个倒计时程序。页面加载时,首先出现一个从 10~1 的秒数倒计时,计时结束 跳转到 a.htm 页面。如图 4-33 所示。
图 4-33 Sub 过程与 Function 函数应用