(
课件网) 循环结构———Do语句 欢迎各位同学通过空中课堂一起来学习! 目录 DIRECTORY 考试要求 学习重点 学习难点 01 02 03 04 课前练习 05 课堂练习 06 课后巩固 考试要求 01 01 考试要求 1.Do语句 (c) 学习重点 02 02 学习重点 1 .掌握Do语句的格式 2.掌握Do语句的用法。 学习难点 03 03 学习难点 1．Do语句的用法。 2. 学会使用Do语句解决实际问题。 课前练习 04 1.某停车场只停放了三轮车(车有3个轮子)和小轿车（车有4个轮子），根据停车场车辆总数和总的车轮数，分别计算出三轮车和小轿车可能的车辆数。程序实现如下功能：在文本框Text1、Text2中分别输入：36、114,单击“计算”按钮Command1后,在标签Label1中显示计算结果，运行结果界面如下图所示。 (1) 在设计应用程序界面时，窗口的标题显示文字“统计车辆数”是修改了窗体(From1)的_____属性。 (2)为实现上述功能，请在划线处填入合适代码。 课前练习 04 1.某停车场只停放了三轮车(车有3个轮子)和小轿车（车有4个轮子），根据停车场车辆总数和总的车轮数，分别计算出三轮车和小轿车可能的车辆数。程序实现如下功能：在文本框Text1、Text2中分别输入：36、114,单击“计算”按钮Command1后,在标签Label1中显示计算结果。 (2)为实现上述功能，请在划线处填入合适代码。 课前练习 04 Dim t As Integer, j As Integer, x As Integer Dim y As Integer, s As String t = ‘车辆总数 j = ‘总车轮数 s = “” for x=_____ ‘三轮车数 y = _____ ‘小轿车数 If_____Then s=”结果：”+Str(x)+”辆三轮车”+Str (y) +”辆小轿车" Exit For End If Next x Label1. Caption = s ① ② ③ ④ ⑤ 1.某停车场只停放了三轮车(车有3个轮子)和小轿车（车有4个轮子），根据停车场车辆总数和总的车轮数，分别计算出三轮车和小轿车可能的车辆数。程序实现如下功能：在文本框Text1、Text2中分别输入：36、114,单击“计算”按钮Command1后,在标签Label1中显示计算结果。 (2)为实现上述功能，请在划线处填入合适代码。 课前练习 04 Dim t As Integer, j As Integer, x As Integer Dim y As Integer, s As String t =Val(Text1.text) ‘车辆总数 j = Val(Text2.text) ‘总车轮数 s = “” for x=0 to t ‘三轮车数 y = t-x ‘小轿车数 If x*3+y*4=j Then s=”结果：”+Str(x)+”辆三轮车”+Str (y) +”辆小轿车" Exit For End If Next x Label1. Caption = s 2.下列程序段是计算哪个公式的 ( ) s=0：t=1 for i=1 to 10 t=t*i s=s+t next i A．s=1+2+3+…+10 B．s=1!+2!+3!…+10! C．s=1*2*3*…*10 D．s =1+2*3+3*4+4*5+……+9*10 作业讲解 04 3.下列是一个Visual Basic程序： Sub Command1_Click() x=4 For i=1 To 10 step 3 If x
