循环结构VB程序设计.pptVIP

习题 1、计算下列循环的次数 （1）For I= -3 To 20 Step 4 （2）For I= -3.5 To 5.5 Step 0.5 （3）For I= -3.5 To 5.5 Step -0.5 （4）For I= -3 To 20 Step 0 2、要使下列For语句循环执行20次，循环变量的初值应当是： For k= ____ To –5 Step -2 2, 输入一个数，判断该数是否为素数。 素数只能被1和他本身整除的数（例：5，7，11）。 * 3.3 循环结构 2. 条件型循环 Do…Loop 用于在一定的条件下多次重复执行一组语句,共分为两类: 1. 计数型循环 For…Next 3.3.1 For循环语句 (一般用于循环次数已知) 形式如下： For 循环变量＝初值 to 终值 [Step 步长] 语句块 [Exit For] 语句块 Next 循环变量 循环变量:必须是数值型 语句块:可以是一条或多条语句, 称之为循环体 For 循环流程图 有Exit For F T T F 循环变量得到初值 循环变量在终值内 语句块 循环变量加步长 Exit for :当遇到该语句,退出循环, 执行Next的下一条语句 步长 0 初值终值 =1 时,可省略 0 初值终值 =0 死循环 循环次数＝int（（终值-初值）/步长+1） 例: For I=2 To 13 Step 3 Print I , Next I Print : Print “I=“; I 结果： 输出I的值分别为: 2 5 8 11 循环执行次数： 循环结束输出为: I=14 (初值+循环次数*步长) 思考：若初值和终值颠倒，循环执行几次？ 若步长Step为-3，循环几次？ 下面程序的作用是什么？ Private Sub Form_Load() Dim i As Integer, s As Integer Show ‘加载窗体时，显示数据 s = 0 For i = 2 To 100 Step 2 s = s + i Next i Print s=; s End Sub 例：求自然数1-30的乘积(即30的阶乘) Private Sub Form_Click() s = 1 For i = 1 To 10 s = s * i Print i; 的阶乘是：; s Next i End Sub 21 19 不循环 无数次 33 3、以下_____是正确的For…Next结构。 A. For x = 1 … Next x For x=3 To 10 Step 3 … Next y B. For x=3 To –3 Step –3 … Next x B 3.3.2 Do…Loop循环语句 (用于控制循环次数未知) 形式1： 形式2： Do { While|Until }条件 语句块 [Exit Do] 语句块 Loop Do 语句块 [Exit Do] 语句块 Loop { While|Until} 条件 Do While … Loop 流程图 Do … While Loop 流程图 条件 语句块 语句块 T F 语句块 语句块 条件 T F 有Exit Do F T 有Exit Do F T 注意： 1.形式1先判断后执行，有可能一次也不执行； 形式2先执行后判断，最少执行一次循环体。 2.While用于指明条件为真时执行循环体； Until刚好相反。 3.当省略了{While|Until}条件子句，表示 无条件循环，循环体中应有Exit Do语句， 否则为死循环。 4.遇到Exit Do语句时退出循环，执行Loop下一 条语句。 例:我国有13.2亿人口,按出生率为0.5%的增长率,多少年后超过20