本资料来自于资源最齐全的２１世纪教育网www.21cnjy.com For 循环语句 同步练习 任务一 已知:画一个圆的VB程序为： Private Sub form_click() Circle (2000, 2000), 500 End Sub 问题一：如何编程才能画出5个同心圆，半径分别为100,200,300,400,500 问题二：能力提高：画10个同心圆怎么编程呢？半径为100,200,300。。。1000 任务二 请问：循环三要素是什么？ 指出程序中的循环三要素 例题： For i=1 to 2 循环变量： s=s+i 步长值： Next i 循环语句： 计算题： 计算题一：1+2+3+…+10=？ 与上面例题比较，哪个循环要素改变了？ 计算题二：1+3+5+7+9=？ 与上面例题比较，哪个循环要素改变了？ 任务三 用for循环画10个同心圆？半径分别为100,200,300,……,1000 Private Sub form_click() s = 0 For i = 1 To 10 step 2 循环变量： s = s + i 步长值： Next i 循环语句： Text1.Text = s End Sub 作业题：用VB程序实现：宝塔共24层，第1层有2件宝物，第2层有4件宝物，第3层有6件宝物， ……第23层有46件宝物，第24层有48件宝物，计算这座宝塔共有多少件宝物 21世纪教育网版权所有 Private Sub form_click() s = 0 For i = 1 To 10 step 2 循环变量： s = s + i 步长值： Next i 循环语句： Text1.Text = s End Sub 21世纪教育网 -- 中国最大型、最专业的中小学教育资源门户网站。 版权所有@21世纪教育网
~~ 您好，已阅读到文档的结尾了 ~~
