原创力文档- 1、原创力文档（book118）网站文档一经付费（服务费），不意味着购买了该文档的版权，仅供个人/单位学习、研究之用，不得用于商业用途，未经授权，严禁复制、发行、汇编、翻译或者网络传播等，侵权必究。。
- 2、本站所有内容均由合作方或网友上传，本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺！文档内容仅供研究参考，付费前请自行鉴别。如您付费，意味着您自己接受本站规则且自行承担风险，本站不退款、不进行额外附加服务；查看《如何避免下载的几个坑》。如果您已付费下载过本站文档，您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等，请点击“版权申诉”（推荐），也可以打举报电话：400-050-0827(电话支持时间：9:00-18:30)。
查看更多
第03章 循环结构
Visual Basic流程控制结构;3.3 循环结构 ;3.3.1 For循环语句 ;3.3.1 For循环语句 ;3.3.1 For循环语句 ;3.3.1 For循环语句 ;3.3.1 For循环语句 ;For I =1 to 100 step 2
sum = sum +i
Next I
For i= 1 to 100 step 2
sum=sum +i
Next i;例3.24
Dim f as double,I as integer,n as integer
N= text1.text
F=1
For i=1 to n
f=f*i
next;3.3.2 Do循环语句 ;3.3.2 Do循环语句 ;3.3.2 Do循环语句 ;3.3.2 Do循环语句 ;3.3.2 Do循环语句 ;3.3.2 Do循环语句 ;例3.25
Dim sum as integer,I as integer
Sum =0
i=1
Do while i=100
sum= sum+1
i=i+1
loop;Dim sum as integer,I as integer
Sum =0
i=1
Do until i100
sum= sum+1
i=i+1
loop
;Dim sum as integer,I as integer
Sum =0
i=1
Do sum= sum+1
i=i+1
Loop while i=100
;Dim sum as integer,I as integer
Sum =0
i=1
Do sum= sum+1
i=i+1
Loop until i100
;3.3.3 While循环语句 ;Dim sum as integr,I as integer
Sum=0
i=1
While i=100
sum=sum+I
i=i+1
wend;3.3.4 循环的强制退出 ;Dim sum as integr,I as integer
Sum=0
i=1
While i=100
if sum 2000 then
exit do
end if
sum=sum+I
i=i+1
wend;3.3.5 循环的嵌套 ;例3.31 九九乘法表;3.3.6 几种循环结构的比较 ; 3.3.7 循环结构应用程序举例
文档评论（0）