网站:Whileconditionstatements

　　求累加和1+2+3+…+100。
　　省芫毕一T—厂厂”騷養的电胞——$
　　实际计算累加和
　　说明：上例还可以改为直到型循环，只需将其中VBScript代码改为：〈scriptfor=“Buttonl”event=“onClick”language=“VBScript”>
　　s=0：n=1DoUntiln〉100
　　s
　　=s+nn=n+1Loop
　　MsgBox“1+2+3+…+100=”s〈/script〉
　　设计While…Wend语句
　　“当”循环（While.Wend）比较简单，其特点是只要指定的条件为True，则会重复执行一系列的语句。其语法格式如下：
　　Whilecondition[statements]
　　操作超时网站设计Wend
　　说明：
　　condition为必要参数，可以是关系表达式或布尔表达式。如果condition为Null，则condition会被视为False。
　　如果condition为True，则执行statements—次，無后回到While语句，并再一次橙查condition,如果condition还是为True,则重复执行一次statements，否则程序会继续执行Wend语句之后的语句。
　　【例4-6】利用下述公式计算圆周率n的近似值：
　　当最后一项的绝对值小于0.000001时停止计算。
　　编写如下VBScript程序代码：

　　

　　〈title〉计算圆周率/titleX/head〉
　　
　　〈inputtype=“Button”name=“Buttonl”value=“计算”〉
　　〈scriptfor=“Buttonl”event=“onClick”language=“VBScript?>
　　宁波WhileAbs>0.0000001k=k+2
　　m=—mt=m/ks=s+t

　　Wend
　　MsgBox11圆周率兀二”&4*s〈/script〉
　　For…Next语句
　　在循环次数难以预测时，宜用Do…Loop循环，但是，若循环次数容易预测时，则最好使用For…Next循环。与Do…Loop循环不同，宁波网站设计For…Next循环使用一个循环变量，每次循环之后，循环变量的值就会自动增加或者减少。其语法格式如下：
　　Forcounter=startToend[Stepincrement]
　　[statements]
　　NextCcounter]

　　说明：
　　设计counter为必要参数，是用作循环计数器的数值变量，这个变量不能是数组元素。
　　start和end都是必要参数，分别指定counter的初值与终值。
　　终值、步长（start、end、increment）决定循环的执行情况。如果步长的值为正数，则必须是“初值<=终值”；否则必须是“初值〉=终值”。如果没有指定Stepincrement,则缺省值为1。当所有循环中的语句都被执行后，步长的值会加到循环变量中。此时，循环中的语句可能会再次被执行（基于循环开始执行时同样的测试），也可能是退出循环并继续执行Next语句之后的语句。
　　可以在循环中的任何f立置放置任意个ExkFor语句，以控制在需要时退出循环。
　　如果省略Next语句中的counter，将不影响循环的执行。但如果Next语句在它相对应的FoH吾句之前出现，则会产生错误。
　　设计宁波网站设计在循环中改变循环变量的值，将会使程序代码的阅读和调试变得困难。
　　【例4-7】“同构数”是指这样的整数：它恰好出现在其平方数的右端，例如1和5就是这样的数。试找出9999之间的全部“同构数”。
　　位同构数《应满足条件=Mod10；
　　位同构数n应满足条件：n=n2Mod100；
　　位同构数《应满足条件：《=?2Mod1⑻0;

　　位同构数w应满足条件：w=?2Mod10000。
　　网站编写如下VBScript程序代码：
　　网站设计设计同构数
　　　　　　　　本文转载自
　　宁波网站设计www.leseo.net
　　补充词条：宁波谷歌优化  宁波网站seo优化  宁波seo优化公司  宁波seo网站优化  宁波seo外包