VB循环.pptVIP

Visual Basic 程序设计 主讲：马秀峰 格 式：If 条件 Then 语句1 [Else 语句2] 一、For...Next循环 Dim count As Integer, sum As Integer Sum=0 For count = 1 To 100 Step 1 sum = sum + count Next count Print sum=; sum 4. 说明 (1)步长缺省值为1。 (2)步长可正可负 。 若步长为负数，循环条件为计数器大于等于终值。 例如：For i=100 To 1 Step -1 (3)可以通过Exit For语句提前退出循环。 For t = 100 To 1 Step -1 If t = 50 Then Exit For sum = sum + t Next t 二、Do...Loop循环 当While指定的“循环条件”为True执行循环体； 当Until指定的“循环条件”为Flase重复执行循环体。 二、Do...Loop循环 先执行循环体一次，当While指定的“循环条件”为True时，继续执行循环体； 先执行循环体一次，当Until指定的“循环条件”为Flase重复执行循环体。 例6.13 输入一个正整数n,利用“当型”循环判断是否素数。 分析： 何谓素数：所谓“素数”