For循环结构 -循环结构的执行过程 1、执行For循环语句时先将初值赋给循环控制 变量 2、再利用公式计算循环次数。 计算循环次数的公式: R=Int((终值-初值+步长)/长) 2021/22
2021/2/22 11 1、执行For循环语句时先将初值赋给循环控制 变量。 2、再利用公式计算循环次数。 计算循环次数的公式: R=Int（（终值-初值+步长）/步长） For循环结构 -----循环结构的执行过程
For循环结构 循环结构的执行过程 3、检査循环次数,若R=0(或R<0),则跳 出循环体,执行Next语句的下一个语句,若 R>0,则执行循环体。 4、执行Next语句时,循环变量增值步长 循环次数R-1。 5、返回前面步骤3,重复执行步骤3,4。 2021222 12
2021/2/22 12 3、检查循环次数，若R=0（或R<0)，则跳 出循环体，执行Next语句的下一个语句，若 R>0，则执行循环体。 4、执行Next语句时，循环变量增值步长。 循环次数R-1。 5、返回前面步骤3，重复执行步骤3，4。 For循环结构 ---循环结构的执行过程
For循环结构 -循环结构的执行过程 6、其中 Exit For为在满足一定条件下退出 For循环结构。 若For循环的语句为: For循环变量= el To e2 Step e3 循环体 Next循环变量 则其执行过程可用下页的流程图表示: 2021/22 13
2021/2/22 13 6、其中Exit For为在满足一定条件下退出 For循环结构。 若For循环的语句为: For 循环变量=e1 To e2 Step e3 循环体 Next 循环变量 则其执行过程可用下页的流程图表示： For循环结构 -----循环结构的执行过程
计算e1,e2,e3的值 el=>循环变量 当R<=0时 则循环变量 图415 计算应循环次数R 的值就超过 For循 终值,若步 环执行 R>0 长为负值时, 超过终值则 过程流 表示小于终 程图 执行循环体 值。 循环次数R减1 循环变量增值e3 2021/22 执行Next语句的下一个语句
2021/2/22 14 图4-15 For循 环执行 过程流 程图. 计算e1,e2,e3的值 e1=>循环变量 计算应循环次数R R>0 执行循环体 循环次数R减1 循环变量增值e3 执行Next语句的下一个语句 N Y 当R<=0时 则循环变量 的值就超过 终值，若步 长为负值时， 超过终值则 表示小于终 值
【例4-7】输入一个正整数,利用For循环来判 断是否为素数。 分析:所谓素数是指除了1和它本身之外,不 能被其他的数整除的数。判断一个自然数n (≥3)是否为素数的方法是:依次用2~各 数作除数去除,如果余数都不为0,则为素 数 工程设计步骤如下: (1)启动ⅤB,选“新建工程”中“标准EXE 工程。在出现的窗体上添加1个文本框、两 个标签和两个命令按钮。如图4-16左图所示。 2021/2/22 冈心风15
2021/2/22 15 【例4-7】输入一个正整数，利用For循环来判 断是否为素数。 分析：所谓素数是指除了1和它本身之外，不 能被其他的数整除的数。判断一个自然数n （≥3）是否为素数的方法是：依次用2 ~ 各 数作除数去除，如果余数都不为0，则为素 数。 工程设计步骤如下： （1）启动VB，选“新建工程”中“标准EXE” 工程。在出现的窗体上添加1个文本框、两 个标签和两个命令按钮。如图4-16左图所示。 n