Visual Basic第六章 循环程序结构.pptVIP

Visual Basic第六章 循环程序结构 For...Next 语句 Do…Loop 循环语句 For …Next 循环语句 格式: For 计数器=初值 to 终值 [step 步长] 语句块 Next 计数器 注: 计数器必须是数值型变量 步长可正可负，也可以带小数，缺省值为1 当计数器达到或超过终值时，终止循环。 可用 Exit For 语句强行中止循环 For…Next循环的流程图 例1：求100以内所有奇数之和 S=0 ‘ S用于保存累计值，初值为0 For K = 1 to 100 step 2 ‘K－计数器，步长2 S = S + K ‘K=1，3，5，…，99 Next K ‘K+2（步长），再执行循环语句 ‘直到K=100（终值） Print “100以内所有奇数之和为“; S ‘输出结果 例2：输出图案（P110,例6-7） For i = 1 To 5 ‘对1～5行 Print Tab(5 + i); ‘跳到第5＋i列 Print String(6 - i, “★”); ‘打印6-I个★ ‘输出6个空格，i个▲ Print Spc(6); String(i, “▲”); ‘再输出6个空格，6-i个☆