百一测评 - VBScript基础知识(3)

职业技能题库&在线云笔试平台http://www.101test.Com 32. [简答]在For?Next循环中，可以给计数器变量赋值吗？

参考答案：虽然也是可以的，但是不建议更改计数器变量，因为很容易引起变量值的混乱。 33. [简答]请以示例3-12为例简述Do?Loop循环的执行过程。 参考答案：略，请参考3.11.2节的讲解。

34. [简答]如何将两个变量的值互换？（提示：用一个中间变量）

参考答案：首先定义一个中间变量，将第一个变量的值赋给中间变量，然后再将第二个变量的值赋给第一个变量，最后将中间变量的值赋给第二个变量，这样就实现了两个变量值的互换。

三. 编程题

每题分值：10分 是否题目乱序：是 是否选项乱序：是 是否可回溯：是 难度：中

35. [编程]请在你的个人主页上添加时间显示信息，显示当天的日期、时间及星期几。

参考答案：参见asptemptj/chapter3/Time_list.asp，注意学习select case的写法, 并打开浏览器，在其中输入http://localhost/asptemptj/chapter3/ Time_list.asp即可访问，清单如下： 清单Time_list Time_list.asp. 显示时间信息代码

第11页

职业技能题库&在线云笔试平台http://www.101test.Com

<%

Response.WriteDate() & \ Time() Select Case Weekday(Date()) Case 1

Response.Write \星期日\

Case 2

Response.Write \星期一\

Case 3

Response.Write \星期二\

Case 4

Response.Write \星期三\

Case 5

Response.Write \星期四\

Case 6

Response.Write \星期五\

Case 7

Response.Write \星期六\

End Select %>

第12页

职业技能题库&在线云笔试平台http://www.101test.Com

36. [编程]请编写程序段，判断当天日期，如果是25日，则显示“请注意，明天可能有病毒发

作”。

参考答案：参见asptemptj/chapter3/Date_meg.asp，并打开浏览器，在其中输入http://localhost/asptemptj/chapter3/ Date_meg.asp即可访问，清单如下： 清单Date_meg Date_meg.asp. 判断当天日期

<%

If Day(Date())=25 Then

Response.Write \请注意:明天可能有病毒发作。\

End If %>

37. [编程]请编写程序段，随机产生一个0到9的整数。如果是偶数，则在页面上输出“生成

第13页

职业技能题库&在线云笔试平台http://www.101test.Com 的是偶数”，否则输出“生成的是奇数”。

参考答案：参见asptemptj/chapter3/Random.asp，并打开浏览器，在其中输入http://localhost/asptemptj/chapter3/ Random.asp即可访问，清单如下： 清单Random.asp 判断奇偶数码

<% Dim s

s=Int(10 * Rnd()) If (s Mod 2)=0 Then

Response.Write \生成的是偶数\

Else

Response.Write \生成的是奇数\

End if %>

第14页

职业技能题库&在线云笔试平台http://www.101test.Com

38. [编程]S=12+32+52+?+992，请利用两种循环语句编写程序，计算S的值。

参考答案：参见asptemptj/chapter3/Cycle.asp，并打开浏览器，在其中输入http://localhost/asptemptj/chapter3/ Cycle.asp即可访问，清单如下： 清单Cycle Cycle.asp 计算平方和

<%

'第1种算法: Dim I,Sum Sum=0

For I=1 To 99 Step 2

Sum=Sum+I^2

Next

Response.Write \%>

<% '第2种算法 I=1

第15页

百度搜索“77cn”或“免费范文网”即可找到本站免费阅读全部范文。收藏本站方便下次阅读，免费范文网，提供经典小说综合文库百一测评 - VBScript基础知识(3)在线全文阅读。