当前位置:首页 >> 数学 >> vb循环结构

vb循环结构


循环结构
1 循环的概念 问题1:计算 s= 1+2+3+···+100 ··· s=0 s=s+(a+1) a=a+1 s=s+(a+1) 执行n次 …… s=s+(a+1)

5.2

Do . . . Loop 语句

Do [{While /Until } <条件> ] [ <语句列1 > ] [Exit Do ] [ <语句列2> ] Loop 条件 是条件表达式,为循环的条件。应该 能判断出真或假值,根据其值来决定循 环的执行。

Do … Loop 语句
先判断条件:
格式 1: Do [ While<条件>] <语句块> Loop 格式 2: Do [Until <条件>] <语句块> Loop

开始
While

开始
Until No

条件?
Yes

条件?
No

Yes

循环体

循环体

结束

结束

Do … Loop 语句
后判断条件:
格式 1: Do <语句块> <语句块> Loop [ While<条件>] 格式 2: Do <语句块> <语句块> Loop [Until <条件>]

开始
循环体
While

开始
循环体
Until
Yes

条件
No

条件
Yes

No

结束

结束

? Do … Loop 语句应用于循环次数未知的情况 ? 循环体内都必须有修改循环条件的语句。 ? Do … Loop While | Until 则至少执行一次循环。

问题2:输出六行“﹡”号,每行60个。可用Print 方法输出六行字符串。

Print “﹡﹡﹡……﹡﹡”
60个

Print “﹡﹡﹡……﹡﹡”
60个

执行六次

…….
Print “﹡﹡﹡……﹡﹡”
60个

2 While … Wend 语句
格式: While <条件> <语句块> Wend
执行过程:
如果<条件>为真,执行由<语句块> 组成的循环体,当遇到Wend语句 时,控制返回到While语句,并 对<条件>进行测试,如果为真, 重复上述过程。为假,则执行 Wend后而面的语句。

循环结构流图
循环体

开始


条件?


语句块

计算* s=1+2+3+···+ ··· n
…… n=Val(InputBox(“Input n”)) s=0 k=1 While k < = n s = s+k k = K+1 ?加法器 Wend Print “s=“;s

第一次 第二次 第三次 第四次 第五次

k 1 2 3 4 5

s 0+1 0+1+2 0+1+2+3 0+1+2+3+4 …….

计算 2n 。
…… n=Val(InputBox (“Input n”)) k s s=1 第一次 1 1×2 k=1 第二次 2 1×2 ×2 While k < = n 第三次 3 1×2 ×2 ×2 s = s﹡2 第四次 4 23 ×2 k = K+1 第五次 5 ……. Wend Print “s=“;s ……

注意:
1. 2. While … Wend 语句先对<条件>进行测试,然后才决 定是否执行循环体。(可能一次也不执行)。因此, 进入循环之前应正确设置循环条件。 循环体内要有修改循环条件的语句,使得循环体能 正常执行和正常终止。否则会出现死循环。

例5.2 从键盘输入字符,以“?”结束,并对输入字符中 的字母个数和数字个数进行统计。 ? 变量 ch 接受键盘输入的字符,变量 num1, num2 用 于统计字母、数字的个数。 ? 是否终止循环取决于循环体内对ch 的赋值。

例5.3.1 给两个正整数求它们 的最大公约数。 可以用“辗转相除法”。如 24和16,先将24作为被除数, 16作为除数,得余数为8。再 将原除数16作为下一次的被 除数,将余数8作为下一次的 除数,当余数为0时,最后一 次的除数8就是最大公约数。 24 / 16 =1 … 8 16 / 8 =2 … 0
最大公约数

例5.3.2 计算 e 的值。当最后一项 的绝对值小于10-6时,停止计算。 e ≈ 1/1! + 1/2! + 1/3! +…+1/n! 分析:t 存放中间项的计算结果, 当 |t | < 10-6时结束计算。K存 放阶乘的结果。可以把算法描 述为: t = 第一项的值 : e = t : n =1 : k=1 Do Until Abs(t) < 1E-6 n=n+1 k=k﹡n t = 第n 项的值 s=s+t Loop t

5.4 For … next 语句 格式: For<控制变量> = <初值> To <终值> [ Step< 步长>] [ <循环体 >] Next [<控制变量> ] 例如: 在开始执行FOR语句时, for I=A To B step C控制变量 I 取初值A,然 后每次按指定的步长C 增值, 直到超过终值B为 P=I*I 止。 print P Next I

FOR – NEXT语句执行过程 ? 控制变量取初值 I=A ? 将I值与循环终值比较。 若 I≤B,则执行循环体,否则 执行NEXT语句下面的语 句。 ? 执行循环体。 ? 遇NEXT语句,控制变量I 按步长增值,即I+C=>I。 此时控制变量I由一个新 值代替了原来的值。 “NEXT I” 就是“取下 一个值”的意思。 ? 返回FOR语句。

把初值赋给控制变量 A=>I

I超过B? 顺序执行循环体内 各语句

控制变量按步长增值 I+C=>..I

执行NEXT语句 下面的语句

说明:
? FOR 与 NEXT必须成对出现。 ? 终止循环的条件是“控制变量超过终值”,而不是“等 于终值” 。如: FOR I=1 TO 3
PRINT I NEXT I

执行循环体几次?

? FOR循环是循环次数确定的循环。
终值-初值

循环次数=
步长

+1

上例中循环次数=
((3-1)/1)+1=3

? 初值、终值可以是正、负或零。

例:

FOR I=-3 TO 3 STEP 1.5 PRINT I NEXT I 运行结果: -3 -1.5 0 1.5 3 例: FOR I=3 TO 0 STEP -1 PRINT I NEXT I 运行结果: 3 2 1 0

? 省略 STEP,隐含“STEP 1”
FOR I=1 TO 10 STEP 1 FOR I=1 TO 10 STEP 与 等价

? 控制变量可被引用,也可 不出现在循环体中。
例: FOR I= 1 TO 3

PRINT X NEXT I 运行结果: 0 0 0 FOR I= 1 TO n X=X*I n! NEXT I PRINT X

? 求

例 5.4.1* 给一个整数A,判 断它是否素数。
素数--- 除了能被1和该数本身整 除外,不能被其它整数整除。 分析 :A作被除数, 2、3、…… A-1作除数 (实际上把A被2~√A 除即可) 一个一个地相除,若都 除不尽,A就是素数,否则, A不是素数。 for i =1 to A-1 If A mod I = 0 then flag=1 Next i

例5.4.2 * 有一个数列,前两 个数是1,1,第三个数是 前两个数之和,要求输 出前10个数。 设置3 个变量F1、F2、F3 F3=F1+F2 1 1 2 3 5 8
F1 F2 F1 F3 F2 F1

F3 F2 F3

5.5 循环嵌套
循环体内包含另一个循环,称为循环的嵌套
例: FOR I=1 TO 3 FOR J=5 TO 6 PRINT I, J NEXT J NEXT I
运行结果: 1 1 2 2 3 3 5 6 5 6 5 6

说明:
? 当进入第一次外循环体时,外 循环控制变量值为1, 该值在执 行第一次外循环全部过程中 保持不变.外循环控制变量值 改变一次,内循环的循环体执 行2次。所以,内循环的循环 体总共执行了2×3次。 ? 写程序时循环体一般采取缩 进形式,这种锯齿形的程序形 式,使程序结构清晰,增加程序 可读性。(Tab/Insert-indent)

?

在循环嵌套中,内外循 环不得交叉。
FOR X FOR Y ……. NEXT X NEXT Y

?

循环嵌套有三种形式:

1. FOR X FOR Y FOR Z ……. NEXT Z NEXT Y NEXT X

2. 省略 NEXT后面的X,Y,Z FOR X FOR Y FOR Z ……. NEXT ……. NEXT ……. NEXT

3.内外循环有相同终点时, 可共用一个NEXT语句。
FOR X FOR Y FOR Z ……. NEXT X,Y,Z

例5.5.2 打印以下图形 例5.5.1 把五角钞票换成一 分、二分、五分的硬币, * 每种至少有一枚, *** 分析:先取五分的,为保 ***** 证每种硬币至少有一枚, 五分右取1到9枚;则二 ******* 分可取胜1到(50-5k)\2枚。 ********* 一分取50-5k-2j *********** * ** * * * * * * * * * * ***************

作业
习题5 p113 一、1~4、6、9、13 二、编程序在窗体上输出下面图形。


更多相关文档:

《VB程序设计》之循环结构讲解_图文.ppt

VB程序设计》之循环结构讲解 - 《VB程序设计》主题讲座 主题:循环结构 程序设计的三种基本结构 顺序结构 ? 选择结构 ? 循环结构 ? 循环结构 ? 计数型循环For...

VB循环结构_图文.ppt

VB循环结构_工学_高等教育_教育专区。第5章 循环结构本章内容: ? ? ?

vb 循环结构_2018_图文.ppt

vb 循环结构_2018 - 信息技术基础 Visual Basic2010

VB程序设计--循环结构_图文.ppt

VB程序设计--循环结构 - Visual Basic 程序设计 循环结构 1 4.3 循环结构 4.3.1 For循环语句 4.3.2 Do…Loop循环语句 4.3.3 循环的嵌套 ...

VB循环结构,教学设计.doc

篇一:vb 程序设计 fornext 循环结构教学设计 《vb 程序设计 for?next 循环结构》教学设计 江苏省武进高级中学现代教育技术组 吴涛 一、 教学目标设计 本课内容的...

VB教程---循环结构_图文.ppt

VB教程---循环结构_计算机软件及应用_IT/计算机_专业资料。循环结构在Visual Basic程序的三种结构中,循环结构是教 学课件 一种重要结构。 循环的本质:不断地重复...

VB循环结构_图文.ppt

VB循环结构 - 分支结构 在VB中,下列程序段执行后, 变量m的值是( -10

vb循环结构_图文.ppt

vb循环结构_工学_高等教育_教育专区。程序设计语言的三种基本结构流程图:语句块

vb教程,循环结构_图文.ppt

vb教程,循环结构 - 第6 章 Visual BASIC 程序设计 循环结构程序设计 本章要点: ? For...Next循环 ? Do...Loop循环 特点: 重复相同或相似的操...

VB教程---循环结构分析_图文.ppt

VB教程---循环结构分析 - 循环结构 在Visual Basic程序的三种结构中,循环结构是 教学课件 一种重要结构。 循环的本质:不断地重复某种动作。 对计算机程序而言,...

vb循环结构_图文.ppt

vb循环结构 - 第4章:循环结构 主要内容: 1:循环结构 2:Do…Loop

VB循环结构程序设计_图文.ppt

VB循环结构程序设计 - 3.3 循环语句 程序的另一种结构是循环结构 循环结构

循环结构vb语句资料_图文.ppt

循环结构vb语句资料 - 程序设计的循环结构 ?主要内容: ?(1)次数已知的循

vb教程,循环结构解析_图文.ppt

vb教程,循环结构解析 - 第 6章 Visual BASIC 程序设计 循环结构程序设计 本章要点: ? For...Next循环 ? Do...Loop循环 特点: 重复相同或相似...

教案(1)VB-For循环结构(1)_图文.ppt

教案(1)VB-For循环结构(1) - 第七章控制结构 7.2循环程序结构 7

VB中循环结构之Do While-Loop、Do Loop-While语句.doc

VB循环结构之Do While-Loop、Do Loop-While语句_计算

vb-4-循环结构程序设计_图文.ppt

vb-4-循环结构程序设计 - 第六次课 第4章 循环结构程序设计 本章内容 ? ? ? ? 循环结构 用For-Next语句实现循环结构 用Do While-Loop语句实现循环结构 嵌...

VB编程6.0 循环结构_图文.ppt

VB编程6.0 循环结构 - 茂 名 院 学 循环结构程序设计 VB 程序设计循环结构 本章要点: ?While ... Wend循环 ?For...Next循环 ...

vb-4-循环结构程序设计_图文.ppt

vb-4-循环结构程序设计 - 第六次课 第4章 循环结构程序设计 本章内容 循环结构 用For-Next语句实现循环结构 语句实现循环结构 用Do While-Loop语句实现循环结构...

VB控制结构_多重循环课件_图文.ppt

VB控制结构_多重循环课件 - 第4章 Visual Basic语言基础5 ? 提要 ? 多重循环 ? 常用算法 ? 重点 ? 多重循环 ? 常用算法 1 4.7.5 多重循环...

更多相关标签:
网站地图

文档资料共享网 nexoncn.com copyright ©right 2010-2020。
文档资料共享网内容来自网络,如有侵犯请联系客服。email:zhit325@126.com