《do循环语句73566教学内容》由会员分享，可在线阅读，更多相关《do循环语句73566教学内容（6页珍藏版）》请在金锄头文库上搜索。
1、Do 循环语句,问题：已知S=1+2+3+N，找出一个最大的整数N，使得S30000。编写程序解决这个问题。,For 循环语句主要用于描述预先知道循环次数的循环结构，是一种计数循环。,For循环语句的基本格式 For 循环变量 = 初值 To 终值 Step 步长 语句组 Next 循环变量,Do 循环语句的基本格式 Do 循环体 Loop until 循环终止条件,其中： 循环体是一组vb语句 循环终止条件是一个逻辑表达式,Do 循环语句的执行过程： （流程图见教材p-54图2-15） 每次进入循环都是从do命令开始，先执行一次循环体，然后判断是否满足终止条件，若满足条件则退出循环，否则继续
2、进行循环。,Do循环语句四种形式的比较。,当型循环：（while） 当条件成立时执行循环体 直到型循环：（until） 直到条件成立时退出循环体,特别注意：当型循环和直到型循环的判断条件相反,判断条件放在loop后至少执行循环一次，放在do后面有可能一次也不执行,程序一： Private Sub Command1_Click() s = 0 n = 1 Do s = s + n n = n + 1 Loop While s 30000 Print 最大的整数n为; n - 2 End Sub,问题：已知S=1+2+3+N，找出一个最大的整数N，使得S30000。编写程序解决这个问题。,程序二：
3、 Private Sub Command1_Click() s = 0 n = 1 Do While s 30000 s = s + n n = n + 1 Loop Print 最大的整数n为; n - 2 End Sub,程序三： Private Sub Command1_Click() s = 0 n = 1 Do s = s + n n = n + 1 Loop until s = 30000 Print 最大的整数n为; n - 2 End Sub,程序四： Private Sub Command1_Click() s = 0 n = 1 Do until s = 30000 s =
4、 s + n n = n + 1 Loop Print 最大的整数n为; n - 2 End Sub,作业：已知S=1+3+5+n，找出一个最小的整数n，使得S30000。编写程序解决这个问题。,Private Sub Command3_Click() s = 0 n = 1 Do s = s + n n = n + 2 Loop Until s 30000 Print “最小的整数n为; n - 2 End Sub,Private Sub Command3_Click() s = 0 n = 1 Do s = s + n n = n + 2 Loop while s = 30000 Print “最小的整数n为; n - 2 End Sub,
