【实验目的】
1.掌握在HTML页面中添加VBScript代码的方法。
2.掌握MsgBox函数和InputBox函数的使用方法。
3.掌握If Else和Select⋯Case语句的使用方法。
4.掌握Do⋯LOOP，While⋯Wend，For⋯Next和For Each⋯Next语句的使用方法。
5.掌握创建、调用Sub过程和Function过程的方法。
6.掌握Window对象和Document对象的主要属性和方法。
【实验内容】
1.编写一个网页，利用InputBox函数显示一个输入框并将字符串赋值给变量，然后利用MsgBox函数显示该变量的值。加载事件用Onload事件，该事件放入〈BODY〉标签中。编写一个过程，通过该过程调用此事件。
2.设计一个VBScript程序来计算圆的面积，要求通过MsgBox函数输入圆的半径，用符号常量表示圆周率，通过InputBox函数显示出计算结果。
3.编写一个网页，其显示效果如图3-15所示。在上面两个文本框中分别输入一个整数，要求两者大小不相等。当单击“显示结果”按钮时，在第三个文本框中显示两者中的较小数；当单击“清除结果”按钮时，将三个文本框的内容清空；如果未同时在上面两个文本框中输入内容而单击“显示结果”按钮，则显示一个对话框，提示用户在上面两个文本框中分别输入一个整数。
图3-15 求两数中的较小者
使用If⋯Else语句，“显示结果”按钮为普通按钮，在其事件过程中编写脚本代码，以实现所需操作；“清除结果”按钮为重置按钮。
4.编写一个网页，该页上部列出一些专业的编号和名称，下部有一个文本框和一个按钮，显示结果如图3-16所示。如果在文本框中输入一个专业编号（1-4）并单击“确定”按钮，则出现一个对话框，显示当前所选择的专业名称；如果输入的专业编号大于4，则显示所选择的是其他专业。
专业列表用一个有序列表来显示；“确定”按钮为普通按钮，在其onClick事件过程中编写脚本代码，并使用Select⋯Case语句来实现所需操作。(www.xing528.com)
图3-16使用Select Case语句
5.编写一个网页，用于计算和输出100～1000之间所有偶数之和。
在网页中添加一个普通按钮，在其onClick事件过程中编写脚本代码，使用Do⋯Loop或For⋯Next语句实现求和操作，并通过MsgBox函数来显示计算结果。
6.编写一个网页，用于验证用户资料页面，如图3-17所示。要求：姓名、密码、性别、所学专业及所学课程不能为空，若为空则弹出提示信息，请输入。若所有内容填写完后单击“提交”按钮则显示用户资料。
图3-17 用户资料页面
使用If⋯End If语句进行表单验证，“提交”按钮为普通按钮，在其事件过程中编写脚本代码，以实现所需操作；“全部重写”按钮为重置按钮。使用Document.write方法显示用户资料。
7.编写一个网页，实现显示效果如图3-18所示的日期格式。
说明：6～8点是早上，8～12点是上午，12～14是中午，14～18点是下午，其余时间是晚上。
8.编写一个网页，其显示效果如图3-19所示。如果单击“打开新网页”按钮，则在另一个窗口中打开指定的网页；如果单击“关闭当前窗口”按钮，则出现一个对话框，提示关闭当前窗口，单击“是”按钮，则关闭当前窗口。
“打开新网页”和“关闭当前窗口”两个按钮均为普通按钮，在其onClick事件过程中编写脚本代码，并调用Window对象的有关方法来实现所需操作。
图3-18显示日期格式
图3-19 显示效果
9.编写一个网页，利用Window对象的有关方法实现在状态栏显示滚动文本。
免责声明：以上内容源自网络，版权归原作者所有，如有侵犯您的原创版权请告知，我们将尽快删除相关内容。
