2022年asp控制结构[归 .pdf

《2022年asp控制结构[归 .pdf》由会员分享，可在线阅读，更多相关《2022年asp控制结构[归 .pdf（25页珍藏版）》请在淘文阁 - 分享文档赚钱的网站上搜索。

1、它的语法格式如下： If 条件 then 命令区域 end if 例题一=60 then response.Write(成绩合格 ) end if % 前面的 If.Then命令是较为简单的命令，是使用在If 之后 true情况时所执行的命令，加入了Else 命令可用来指出 If之后 false情况时所执行的命令。它的语法格式如下： If 条件 then 命令区域 1 else 命令区域 2 end if 名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 1 页，共 25 页 - -

2、- - - - - - - 例题二=60 then result=恭喜，您及格了 else result=对不起，您没及格 end if % 请输入分数 :     结果: input name=result type=text id=result value= /      3、多条件判断语法格式为：名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 2 页，共 25 页 - - - - - - - - - If 条件 1 Then 语

3、句组 1 ElseIf 条件 2 Then 语句组 2 ElseIf 条件 3 Then 语句组 3 ,. Else 语句组 4 End If 例题三 ElseIf 100 then result = #$%&*( ElseIf score = 100 Then result=太棒了 ! 满分 名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 3 页，共 25 页 - - - - - - - - - ElseIf score = 80 and score = 60 and score=

4、 40 and score 请输入分数 input name=score type=text size=10 value= 结果 input name=txtResult type=text value= readonly 例题四 NestIf =20 Then result=恭喜你得了满分！ ElseIf count=15 Then result=恭喜你得了优秀！ Else result=对不起，您没有及格 ! End If ElseIf UCase(sex)=F Then If count=42 Then result=恭喜您得了满分！ ElseIf count=30 Then 名师资料总

5、结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 4 页，共 25 页 - - - - - - - - - result=恭喜您得了优秀 ! Else result = 对不起，您没有及格 ! End If Else result=性别输入错误 ! End If % 性别：input name=txtSex type=text value= size=10 M:男 F: 女 分数：input name=txtcount type=text value= size=10 建议：input name

6、=txtResult type=text value= readonly 使用 Select Case 进行判断Select Case 结构提供了 If.Then.ElseIf 结构的一个变通形式， 可以从多个语句块中选择执行其中的一个。Select Case 语句提供的功能与If.Then.Else 语句类似，但是可以使代码更加简练易读。Select Case 结构在其开始处使用一个只计算一次的简单测试表达式。表达式的结果将与结构中每个 Case 的值比较。如果匹配，则执行与该 Case 关联的语句块：请注意 Select Case 结构只计算开始处的一个表达式（只计算一次），而If.The

7、n.ElseIf 结构计算每个 ElseIf 语句的表达式，这些表达式可以各名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 5 页，共 25 页 - - - - - - - - - 不相同。仅当每个 ElseIf 语句计算的表达式都相同时，才可以使用 Select Case 结构代替 If.Then.ElseIf 结构。select case 语法与实例 2008-01-20 15:07何时使用 Select Case, 个人认为当判断条件大于三的时候, 应当采用 Select Ca

8、se, 总比一大堆 if.else 看起来清晰 . 一、SELECT CASE 语句的基本用法：select case 条件变量名case 值 1 符合值 1 执行的语句。case else 如果上面的条件都不符合执行的语句end select 实例题 : Select Case a Case 收藏a 和 收藏比较 e = 这个老师是男士 Case 雪雪a 和 雪雪比较 e = 这个老师是女士 Case 玉树a 和 玉树比较 e = 这个老师是男士 Case Else e = 无法确定 End Select 实例题 : 嵌套Select Case b Case 男Case b和 Case 男比

9、较 Select Case c Case 教 asp 基础课 e = 收藏老师 Case 教 asp 实例课 名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 6 页，共 25 页 - - - - - - - - - e = 玉树老师 End Select Case 女Case b和 Case 女比较 Select Case c Case 室主 e = 雪雪老师 Case 教 asp 实例课 e = 注册老师 End Select End Select 二、SELECT CASE 语句

10、的一种特殊应用法：select case true/false case 表达式 1 符合值 1 执行的语句。case else 如果上面的条件都不符合执行的语句end select 实例题 : 嵌套Select Case True Case m=45 Select Case s Case 2 Response.Write(这是刘老师 ) Case 0 Response.Write(这是郑老师 ) Case else Response.Write(不能确定 ) end Select Case m45 Select Case s 名师资料总结 - - -精品资料欢迎下载 - - - - - -

11、- - - - - - - - - - - - 名师精心整理 - - - - - - - 第 7 页，共 25 页 - - - - - - - - - Case 2 Response.Write(这是黄老师 ) Case 0 Response.Write(这是张老师 ) Case else Response.Write(不能确定 ) End Select End Select 三、这里给出 SELECT CASE 语句比较完全的语法结构，大家可以和以上两种进行比较：select case 表达式case 表达式 1, 表达式 2 . 如果 select case 后所跟的变量或表达式的值与上面

12、CASE 后面的表达式的值任何一个匹配，就执行这里的语句case . case else 如果上面的 CASE 中的值全部都不能匹配，那么执行这里的语句end select 实例题 : Select Case True Case (b=男) and (c=教 asp 基础课 )True和(b= 男) and (c=教 asp基础课 ) 比较 e = 收藏老师 Case (b= 男) and (c=教 asp 实例课 )True和(b= 男) and (c=教 asp 基础课) 比较 e = 玉树老师 Case b= 女 and c=室主True和 b=女 and c= 室主 比较 e = 雪雪

13、老师 Case b= 女 and c=教 asp 实例课 True和(b= 女 and c= 教 asp 实例课 比较 e = 注册老师 End Select 那么，这其中所说的表达式， 可以是一个运算的式子， 也可以是一个变量名， 或是一个数值。而我们上面所提到的到SELECT CASE TRUE/FALSE 用法， 就是 SELECT CASE 用法中的一个特例。四、SELECT CASE 语句，首先运算 SELECT CASE 后面的这个表达式，得出值，我们用 A表式，然后逐个运算每个CASE 后面的表达式， 我们用 Bx 表式，如果发现A的值和其中某个Bx的值相等了，那么就执行这条CA

14、SE 语句到下条 CASE 语句或者是 END SELECT 语句之前的代码，如果A和所有的 Bx都不匹配，并且又有CASE ELSE 语句的话，就会执行CASE ELSE 语句后的代码段。名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 8 页，共 25 页 - - - - - - - - - 需要注意的是， 在 CASE 语句中，我们可以将需要匹配的多个表达式用逗号隔开。下面通过几个典型的例子来讲解这些使用形式：2. 多值匹配：dim a a=5 select case a cas

15、e 5 response.write 优秀 case 4 response.write 良好 case 3 response.write 及格 case 2,1,0 response.write 不及格 case else response.write 错误的输入值 end select 看上面第四个 CASE ，我们设置了三个值，只要是变量A的值与这三个中的任意一个匹配就会执行打印不及格的代码。（需要说明的是， 有些会员有 VB的基础，可能会尝试使用 case 0 to 2 这样的用法，这在VBSCRIPT 中是行不通的）3. 表达式值匹配code: dim a a=100 select c

16、ase a/20 case 10-5,6,7+1 response.write 5 or 6 or 8 case 11+7 response.write 18 case else response.write 0 end select 看上面，我们在 SELECT CASE 后面使用的是一个表达式，它得出的结果是 5 ，也就是说，只要下面哪个CASE 语句中的值与 5 匹配（即相等）就会执行相应的代码。在第一个 CASE 中我们也使用了表达式，而且是多个，用逗号隔开了。4. 特殊的表达式值匹配名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - -

17、- - - 名师精心整理 - - - - - - - 第 9 页，共 25 页 - - - - - - - - - code: dim a a=5 select case true case a=5 response.write 5 case a5 response.write a5 end select 举这个例子，只是为了说明这个SELECT CASE TRUE/FALSE 是 SELECT 语句的一个使用特例，并不是一种SELECT 语句的语法，因为例4 和例 3 的唯一区别就是于例四我们使用了一个关键字TRUE 。只要是其中某个CASE 语句后的表达式运算结果等于 TRUE ，相应的代

18、码就会被执行。另外，这个例子中我们还使用了逻辑运算符。大家读懂上面上面那段红字后将以上四个例子逐一模拟执行一次，就可以很容易的理解 SELECT 语句的用法了。说明：本文中所举例子并不一定有实际意义，纯粹用于教程，因为只需要从SELECT 语句的用法上考虑它们即可。For 循环二、重复循环循环是指在指定情况下，多次重复执行一组语句。最常用（for ,next、do ,loop ），1、重复执行的语句叫循环语句。循环语句可以分为三种类型：(1) 、当条件不为假之前的时候重复执行语句。(2) 、当条件变为真之前重复执行语句。(3) 、按指定的次数重复执行语句。2、For,Next 循环如果重复操作

19、的次数固定，使用For,Next 循环是一个很好的选择，此外也将介绍语法很类似的For Each,Next循环，它适用在数组或集合的重复循环，（一） For,Next 在For,Next 循环的语法中使用初值、终值、步长以及循环变量来完成重复计数的工作。当进入循 环第 一次执行时， 循名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 10 页，共 25 页 - - - - - - - - - 环变量便由初值开始累加一次步长，一直到等于或超过终值为止。例如: 初值为 1，终 值为 10

20、， 步长为 2 ，则循环将执行 5 次，循环变量的值分别是 1 、3、5、7、9，第六次因循环变量累加到 11 ， 已经超过 10 了，便不再执行循环。3、For,Next 循环的语法如下：For 循环变量 =初值 To 终值 Step 步长程序语句 , Exit For程序语句 , Next 说明：(1) 、循环变量： 这个变量通常是使用整数， 但是必要时也可以是其他数值类型,他是一个数值变量。(2) 、 初值：这是循环变量的初始值， 为数值类型。其值不一定是整数 , 或小数 ,VB会自动给他取整数(3) 、终值：循环变量的终值，为数值类型。其值不一定是整数 , 或小数 ,VB 会自动给他取

21、整数(4) 、步长：循环变量每次的增加量，步长的数值类型应该和循环变量一样, 其值可以是正数 ( 递增循环 ) 或是负数 ( 递减循环 ), 当不能为 0, 如果没有特别指定，则步 长默 认为 1 。(5) 、循环体 : 在 For 语句和 Next 语句之间的语句 , 可以是一个或多个语句 . (6) 、Next: 是循环终端语句 , 在 Next 后面的 循环变量 与 For 语句中的 循环变量必须相同 . 如:for i=0 to 10 Step 1 . Next 执行过程 : (1) 、把初值 1 赋给循环变量 i (2) 、将 i 的值与终值 10 进行比较 , 若 i10, 则跳出

22、循环 , 执行(5), 否则执行循环体. (3) 、i 增加一个步长值 , 即 i=i+1 (4) 、返回 (2) 继续执行(5) 、执行 Next 语句后面的代码这个循环的作用是： 根据 FOR 语句中所的初值、 终值和步长， 来确定循环次数，反复执行循环体内各语句。 For,Next 循环尊循先检查、后执行 的原则，即先检查循环变量是否超过终值，然后决定是否执行循环体。因此，在下列情况下，循环体将不会执行，(1) 、当步长这正数 , 初值大于终值名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - -

23、 - - 第 11 页，共 25 页 - - - - - - - - - (2) 、当步长这负数 , 初值小于终值当初值等于终值时 , 不管步长是正数还是负数, 都执行一次循环 . For 语句和 Next 语句必须成对出现 , 不能单独使用 , 并且 For 语句必须在 Next 语句之前 . 循环次数 N 的一般公式为：NInt( （终值初值） / 步长) 1 For,Next循环中的初值小于终值时，步长必须为正值，表示由小到大计数；若初值大于终值时，步长必须设为负值，表示由大到小计数。例如：初值小于终值时% for i=0 to 10 Step 1 默认步长为 1 可以不写Respons

24、e.Write(i&) Next % 例如：初值大于终值时% for i=10 to 1 Step -1 Response.Write(i&) Next % 当步长大于 0 时：当初值 =终值时， For,Next之间的语句会被执行一次，接着循环变量会被加上步长， 如果还小于终值，则再执行一次 For,Next之间的语句，一直到循环变量累加到大于终值，才会跳离For,Next循环。% for i=1 to 1 Step 0.5 Response.Write(i&) Next % 当步长小于 0 时：当初值 =终值，会执行循环内的语句一次， 然后循环变量减去步长（负的），如果循环变量还=终值，则

25、再执行一次循环内的语句，一直到循环变量累加到小于终值，才会跳离For,Next循环。循环语句的执行过程：% for i=2 to 1 Step -1 名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 12 页，共 25 页 - - - - - - - - - Response.Write(i&) Next % 4、循环语句的执行过程：（1）通过 For 语句进入循环。 如果循环变量的初值、 终值、步长为算术表达式，系统首先计算出算术表达式的值，然后将初值赋给循环变量， 并将终值、 步长

26、的值存入内存（2）将循环变量的值与终值进行比较，当循环变量的值未超过终值的范围时，则顺次执行循环体内的各个语句。 若循环变量的值超过终值的范围， 则退出循环，执行 NEXT 的后继语句。（3）在执行完循环体各语句后遇到NEXT 语句，将循环变量增加一个步长的值，再去终值， 比较，如果仍不超过起开涠，则再次执行循环体内的各语句，这样重复执行，直到循环变量的值超过终值的范围，结束该循环，执行Next 的后继语句。课堂例题 : 【例 1 】简单 1 加到 10, 用循环特点每次加1 最终显示结果 :55 【例 2 】% for i=0 to 10 step 2 Response.Write(i&)

27、Next % 最终显示结果 :0,2.4,6,8,10 【例 3 】% for i=0 to 10 Response.Write(i&) if i=5 then exit for强制结束循环 end if Next 名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 13 页，共 25 页 - - - - - - - - - % 在上述程序中， 原本 i 会从 1 累加到 10，执行 10 次，但是在 i 累加到 5 时，符合了 i=5 的判断式，结果执行 Exit For 语句，跳离了

28、循环，因此最后网页显示的结果是“0,1,2,3,4,5,”【例 4 】 最终显示结果 :55 5、我们以范例来说明For,Next循环的不同用法：【例 1 】 上列程序会累加上 I ，而循环中的 i 会由 1,2 ，3，, 每次累加 1 ，一直到 10 ，总共执行 10 次，最后网页会显示出“ 1,2，3,4 ，5,6 ，7,8 ，9,10， ”【例 2 】 上列程序中 a 将每次累加 0.5 ，总共执行 20 次，最后在网页中，显示出“1，1.5 ，2，2.5 ，3，3.5, 9.5 ，【例 3 】 上列程序中 j 将由 10 到 1 ，每次累减 1 ，最后在网页中，显示出“10，9，8，7

29、，6，5，4，3，2，1， ” 【例 4 】循环中的初值、 终值和步长， 在程序一开始执行时只读入一次，随后即使在循环内更改其值，也不会对循环执行有所影响。 上列程序中， 故意在循环内将步长每次减少 0.1 ，将终值每次都加 1 ，意图使 i 永远达不到终值， 但是因为步长和终值都只读取一次，便不会再更改， 因此这段程序的输出结果还是“ 1” 。【例 5 】循环中的循环变量，是会在循环中更动的，因此： 上列程序会累加上 k ，而循环中的 k 会由 1,2 ，3，, 每次累加 1 ，一直到 10 ，总共执行 10 次，最后网页会显示出“1,2， 3,4 ，5,6 ，7,8 ，9,10 ，一、计算

30、 1+2+3+.100的和名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 15 页，共 25 页 - - - - - - - - - 最后显示结果 :5050 for i=1 to 100-循环变量为 i, 其初值为 1, 终值为 100.步长为 1(在该语句后省略了 Step 1 默认步长为 1 可以不写) sum=sum+i- 是这个 for 循环的循环体 .( 即循环变量 i 在 1-100 之间时所触发的操作 ) 是 sum=sum+i. 其意思就是让存储运算结果的变量j 等

31、于上一次加法运算的值再加上循环变量的 i 的值. 因为第一次执行循环时 , 循环变量 i 的值为 1, 而变量 sum的值为 0, 那 sum就等于0+1还是 1. 而第二次执行循环时 , 循环变量 i 的值变为了 2.那 sum就等于上次循环所得到的值 1 加上这个 i 的值 2. .这样 1+2 第二次 sum的值就等于 3. 只要循环变量 i 的值不超过 100. 就会循环执行这样的操作. 所以就实现了从 1 累加到 100 的这种效果 . 二、计算某个数的阶乘 , 即 1+2+3+.的值 最后显示结果 :9.33262154439441E+157 注释: b=1- 这行 b=1 用于将

32、存储运算结果的变量b 初始化为 1, 这一行看似简单 . 但实际上却至关重要 , 没有它这个程序将不能得到正确结果. 若一个变量未初始化 , 字符串型的将会被默认为空字符串. 数值型将会被默认为0, 这里两个变量没有具体声明是什么类型 .VBSCRIPT 就会自动给这两个变量定义相应的数据类型. 因为后面有 b=b*a,VBSCRIPT 就会自动在这将 b变量定义为数值型数据 , 所以此时如果没有对其初始化的语句,VBSCRIPT就会自作主张将其悄悄赋初值为0. 如果这里少了这一行b=1,那后面 b=b*a, 都将是 0 和循环变量 i 相乘, 那不管乘多少次( 即循环多少次 ), 结果变量

33、j 名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 16 页，共 25 页 - - - - - - - - - 的值始终都是 0. 所以这行对结果变量初始化为1的语句 (b=1) 在这个程序中是坚决不能少 . 三、ASCII 码表： ASCII码表 ASCII码表 % Response.Write For i = 1 to 1 Response.Write For j = 1 to 10 Response.Write &码值& 字符 Next Response.Write Next

34、For i = 0 to 12 Response.Write For j = 1 to 10 Response.Write &(i*10+j)&chr(i*10+j) if (i*10+j)=126 then exit for end if Next Response.Write 名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 17 页，共 25 页 - - - - - - - - - Next Response.Write chr函数- 从 0 到 31 的数字表示标准的不可打印的

35、 ASCII 代码。例如，Chr(10) 返回换行符。 ASCII 字符集美国标准信息交换码 (ASCII) 7 位字符集，广泛用于表示美国标准键盘上的字母和符号。ASCII 字符集与 ANSI 字符集的前128 字符 (0-127) 完全一样。%          第七讲 循环结构 Do,Loop条件式循环Do,Loop 循环（条件式循环）如果事先不确定某程序区段需要重复执行的次数，那么使用Do,Loop 循环会较为方便，因为Do,Loop 循环没有循环变量，而是靠一个指定的条件式来判断是否停止循环，若名师资料总结 - - -精品资

36、料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 18 页，共 25 页 - - - - - - - - - 循环没有条件判断，循环将永无止境的执行下去。这个条件式因放置的位置与用法不同，而使Do,Loop 循环有四种变化，以下将一一介绍。（一）Do While,Loop循环Do While,Loop 循环将条件式置于循环的最开始，这种循环在执行到Do While,Loop 时，会检查“条件”的返回值，若返回值为“ True” ，就执行“程序代码” ，也就是说，当 While 后面的条件符合时，会执行循环内的语句一

37、次，然后再回到循环的开始处，重新判断一次，碰到Loop 时又回到 Do While 再检查“条件”的成立与否。若“条件”的返回值为“False ” ，则跳到 Loop 的下一个指令（即离开循环）。此处的“条件”弹性很大，只要“条件”为“False ”时就会结束循环，不必限制循环执行的次数，使用的范围比For, Next 大很多。语法如下：Do While 条件判断式语句Loop 例题一：输入一个数，则程序将计算由 1 100 有几个输入数的倍数，一一显示在文本框中，并列出个数。 Do While.Loop % w=CInt(Request(txtInput) If w 1 Then Do Wh

38、ile num + w 由 1 到 100 有几个input name=txtInput type=text size=10 value= 的倍数 ？名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 19 页，共 25 页 - - - - - - - - - 说明：1、第 9 行：当输入的数字在 2 99 之间，才执行循环，否则执行第17 行显示提示文字指定给show 变量2、第 10 行：当累计的数（ sum ）加上输入的数（ input ）还小于等于 100 时，才执行累计的循环语

39、句3、第 11 行：执行累计，目前 Sum加上输入的数。4、第 12 行：将每次的倍数指定给Show 变量。5、第 13 行：将 num （循环执行次数）加 1 。6、第 15 行：将倍数的个数指定给Show 变量。7、第 28 行：显示 Show 变量所有的内容。（二）中断循环 Exit Do语句循环如果设计不当，很可能造成相当多次甚至死循环，这时我们可以使用 Exit Do 语句来跳出Do,Loop 循环。当程序执行 Exit Do 时，会立刻跳到循环之外，接着执行接在Loop后面的语句。（三）Do,Loop While 条件Do,Loop While 循环将条件式置于循环的最后面，因此一

40、开始就会执行一次循环内的语句，然后当 Loop While 时再做判断。语法如下：Do 语句Loop while判断式这种把条件判断放在循环后面的，就叫做“条件后置循环” ，而前一节的 Do While,Loop ，是在循环一开始的时即判断条件，属于条件前置式循环。这两种循环的最大差异就是，后置式的循环一定会先执行一次循环内的语句，而前置式循环如果一开始条件不符，就不会执行循环内的语句。例题二：文件名： c5_3_2.asp 将 li1.asp范例改成使用Do,Loop While 条件后置式循环来完成，本名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - -

41、 - - - - - - 名师精心整理 - - - - - - - 第 20 页，共 25 页 - - - - - - - - - 范例执行结果与 li1.asp 相同。 Do While.Loop % input=CInt(Request(txtInput) If input 1 Then Do sum = sum + input show = show & sum & , num = num + 1 Loop While sum + input 由 1 到 100 有几个input name=txtInput type=text size=10 value= 的倍数 ？ （四）Do Unt

42、il ,Loop Do Loop 循环的另外一种模式，是以否定的条件判断（Until ），我们可以将 Do Until 语句翻译为“一直做（Do ）, 除非（Until ） ”, 所以当 Until后面的条件成立时，循环便终止，如果一开始 Until后的条件便成立，那么会直接跳出循环，不会执行其内的语句。Do Until 判断式语句名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 21 页，共 25 页 - - - - - - - - - Loop 例题三：文件名： li3.asp 将

43、 li1.asp范例改成使用Do Until,Loop 循环来完成，本范例执行结果与 li1.asp 相同。 Do Until.Loop % input=CInt(Request(txtInput) If input 1 Then Do Until sum + input 100 sum = sum + input show = show & sum & , num = num + 1 Loop show = show & 共有 & num & 个 Else show = 请输入大于 1 且小于 100 的数 End If % 由 1 到 100 有几个input name=txtInput

44、type=text size=10 value= 的倍数 ？ 说明：第 10 行：当累计的数（ sum ）加上输入的数（ input ）100 时，才执行累计的循环语句。( 五) Do,Loop UntilDo,Loop Until 循环，是把条件判断放在后面，同样的是符合的话就结束循环，只是循环内的语句一定名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 22 页，共 25 页 - - - - - - - - - 至少会会被执行一次。其语法如下：Do 语句Loop Until判断式例

45、题四：将 li4.asp范例改成使用Do,Loop Until条件后置式循环来写成，本范例执行结果与 li1.asp 相同。 Do.Loop Until % input=CInt(Request(txtInput) If input 1 Then Do sum = sum + input show = show & sum & , num = num + 1 Loop Until sum + input 100 show = show & 共有 & num & 个 Else show = 请输入大于 1 且小于 100 的数 End If % 由 1 到 100 有几个input name=t

46、xtInput type=text size=10 value= 的倍数 ？ 说明：1、第 10 14 行：为条件后置循环，此循环会将取得 n 的所有倍数值并指定 Show 变量；计算 n 的倍名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 23 页，共 25 页 - - - - - - - - - 数并指定给 num 变量2、第 14 行：当累计的数（ sum ）加上输入的数（ input ）100 时，才执行累计的循环语句。3、本例使用Do,Loop Until，所有循环的程序最

47、少会执行一次。（六）While,Wend While,Wend 循环与 Do,Loop循环类似，它的条件判断是在循环一开始的时候，当条件符合的时候，才会进入循环内执行，语法如下：While 判断式（关系表达式）语句Wend 功能：当关系表达式的值为真时，顺序执行循环体内各语句，经过重复循环，当关系表达式的值为假时，则执行 Wend的下一语句。 WhIle/Wend 循例题五：文件名： li5.asp 利用 While,Wend 来算出费氏数列。费氏数列值前面两个项数之和，如下表，第一项和第二项的值皆为1，第三项是第一项和第二项的和，第四项是第二项和第三项之各，以此类推。第一项 第二项 第三项

48、第四项 第五项 第六项 第七项 , 1 1 2 3 5 8 13 , While.WEnd 0 Then n1 = 1 : n2 = 1 : i = 2 : f = 1 response.write While(iinput) response.write &n1&n2&f& f =n1 + n2 n1 = n2 n2 = f i = i + 1 WEnd response.write show = 费氏数列 f( & input & )等于： & f Else 名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 -

49、- - - - - - 第 24 页，共 25 页 - - - - - - - - - show = 请输入大于 0 的数值 End If % 输入数值input name=txtInput type=text size=10 value= 习题1、请写出下列程序中网页的输出的结果For i=5 To 10 step 0.5 Response.Write i&“， ” Next 2、以 For,Next 循环计算 1 100 的和。3、设计一个程序，可以根据输入的数值 N，计算出由 1 累加到这个数的总各： 123, N。4、设计一个程序，使用者先输入一个数 M，再输入另一个数 N，然后程序可以求出 M 1 M 2 M 3 , M N 的值5、使用嵌套循环取得 1 ！10！的值，执行结果如下：6、在文本框输入大于 1 的整数 n ，并按下“确定”按钮，结果会求出 1 n 的总和； 1n 的奇数和； 1n 的偶数和。网页的执行结果如下：7、有 100 匹马驮 100 块屯，大马驮 3 块，中马驮 2 块，名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 25 页，共 25 页 - - - - - - - - -