体验顺序、分支结构程序设计
信息技术闽教版 八年级上
活动背景
程序不仅要有友好的界面,而且还要有一定的功能,而程序的功能是通过程序设计者编写程序代码来实现的。
从这个活动开始,我们将重点学习VB程序设计的三种基本程序结构,即顺序结构、分支结构与循环结构,编写有一定功能的程序。
探究活动
本活动将通过设计“时间单位换算”程序和“体型判断”程序程序运行界面分别如图1和图2所示,带你体验顺序结构与分支结构程序的设计过程。
活动目标
1.了解什么是变量及如何定义变量。 2.了解赋值语句的格式及作用。
3.了解如何利用文本框输入与输出信息。
4.了解ＩＦ语句格式。
5.编写简单的顺序、分支结构程序。
任务一：感受顺序结构程序的作用
探究活动
单位换算问题是小学常见的一类数学问题,如:3800秒=( )时( )分( )秒。我们可以编写一个程序,程序运行界面如图所示,输入一个单位为秒的时间,如3800,单击“确定”按钮后,程序自动将输入的时间转换成x时y分z秒的表示形式。
输入以秒为单位的时间t;
01
02
03
04
先求分钟数y,即用t除以60,余数为要求的秒2,商为分钟数；
再将分钟数t转换成小时数x,即用t除以60,余数为要求的分钟y,商为要求的小时；
以“x时y分z秒”的形式输出答案。
算法分析:对于任意的时间t(秒),先将t按1分钟等于60秒算成分钟数y(整数),再将y分钟按1小时等于60分钟换算成小时x(整数)。算法描述如下：
该算法由4个步骤组成,这种自上而下依次执行的程序结构称为顺序结构。
活动主题:
编写“时间单位换算”程序
1.认识变量
在程序中,输入的数据、运算的中间结果或最终结果一般都先暂时存储在内存单元中。这些内存单元中的值是可以改变的,我们把这种值会改变的内存单元称为变量。
程序通过变量名来引用变量,通过对变量的赋值来实现将某一类型的数据存入存储单元。在程序运行中,可对变量的值进行修改。
变量名可以很简单,如在程序中甚至可以只用一个字母(如把计数器变量命名为1,也可以用一个较容易记忆的名字,如Tel、 Number_1等。
VB中变量名可以由字母、数字和下划线等组成,但必须以字母开头。在VB中变量名不区分字母的大小写,如ABC、abC、AbC等均看作同一个变量,但变量名不能与系统已用的其他名字(称为关键字，如dim)重名。
引用变量前,一般要先定义变量(说明变量名称和数据类型),其格式为:dim变量名As类。
例如: Dim a As Integer,即定义a为整型变量。
一条Dim语句可以定义多个变量,变量之间用逗号“,”分隔
例如:Dim a As Integer, b As Integer。
常用的变量类型
类型 符号 取值范围 实例
整型 integer -32768~+32767 如:245,-99
长整型 Long -2147483648~+2147483647 如:58723
实型
(单精度) Single 有效位是7位以内的十进制数(科学记数法) 如:123875,
1.75643E+9
日期型 Date 可以有各种表示形式 #2007-03-05#
字符型 String 要加英文的双引 " China","中国”,"3
逻辑型 Boolean True或Fale 性别:true或 false
在过程里定义的变量,只有在过程被调用时才有效,调用结束后在过程里定义的变量就无效了。而在所有过程之前定义的变量称为全局变量,对所有过程都有效
2.认识赋值语句
赋值语句是高级语言中最常用也是最基本的语句。用赋值语句可以对变量进行赋值,也可以给对象的属性赋值,达到修改属性值的目的。
赋值语句的格式:
变量=表达式 或: 对象属性=表达式
其中,“=”表示赋值号。在赋值号的左边必须是变量或对象的属性,在赋值号的右边是表达式,表达式可以是常量、变量、函数或它们的组合等。计算机在执行赋值语句时,先计算出“=”号右边表达式的值,然后再将值赋给“=”号左边的变量或对象的属性。
例如:
iNumber＿1=45
Length=(45+17)*3.3
Labell.Caption=time
3.认识 TextBox(文本框)控件
TextBox控件是一种通用控件,它可以用于输入文本或显示文本。如果要用 TextBox控件显示不希望用户更改的文本,那么就要把TextBox控件的Locked属性设为True。
Text Box控件中显示的实际文本是受Text属性控制的。Text属性有种设置方式:设计程序时在“属性”窗口进行设置;运行程序时通过代码设置;在程序运行过程中由用户输入。在程序运行时,读取TextBox控件的Text属性,就可检索到当前的 TextBox内容。
因此,我们可以通过运行程序从文本框接收用户输入的信息,可以通过给文本框的Text属性赋值来输出信息。
例如,要将文本框 text1中的值赋值给r变量的语句为
r=text1.text
要将s的值在文本框text2中输出的语句为
Text2.text=s
4.认识 CommandButton(命令按钮)控件
CommandButton控件是VB应用程序中使用最多的控件之一,用于接收用户的命令。命令按钮的最主要事件是“Click”事件,当用户按下某个命令按钮时,VB系统就会执行其“Click”事件中的代码,以完成预期的命令效果。
命令按钮对象的 Caption属性决定了按钮上显示的文本内容。此外,当一个窗体中有多个按钮时,可设置其中一个按钮的 Default属性为Ture,以便运行时直接按回车键即可选择该按钮对象。还可设置其中一个按钮的 Cancel属性为True,以便在运行程序时直接按Esc键即可选中该按钮对象(这个按钮一般用于退出程序)。
5.设计程序运行界面
新建一个标准EXE工程,添加如表8-2所示的控件,并设置控件相应的属性。
“时间单位换算”程序用到的控件及其属性说明
对象 属性 设置值 属性说明
Form1 Caption 时间单位换算 窗口标题的文本
Label1 Caption 请输入一个时间(秒) 标签控件上的文本
Label2 Caption 结果时分秒 标签控件上的文本
Text1 Text (空) 文本框中的文本
Text2 Text (空) 文本框中的文本
Command1 Caption 确定 按钮上的文本
Command2 Caption 退出 按钮上的文本
6.编写事件过程
运行“时间单位换算”程序时,用户先在程序运行界面显示的输入一个时间(秒):”文本框中输入一个以秒为单位的时间,单击“确定”按钮,程序在界面上显示的另一个“结果时分秒:”文本框中输出换算结果。因此我们要在“确定”( Command1)按钮的Click事件过程中编写相应的程序。
双击“确定”按钮,VB系统在代码窗口新建 Command1 Click()空过程(子程序)。在插入点光标所在地方输入如下程序段:
Private Sub Command1 Click ()
Dim t As Long,x Integer As,y Integer As,z Integer As
'************输入数据************
t= Val (Text1.text)
'****************************
'************计算************
Z=t Mod 60 '先将t除以60,余数为z
t=t \ 60 '时间t换算成分钟,商即为分钟数
y=t Mod 60 '再将t除以60,余数为y
X=t \ 60 '时间t转换成小时,商为x小时
'****************************
'************输出************
Text2.Text=x & "小时” & y & "分钟" & z & "秒"
End Sub
对于“退出”按钮,我们只要在它的 Click事件过程中写一个语句end”即可。该语句表示结束程序的运行。
7.调试、运行程序
选择“运行”菜单中的“启动”命令,单击工具栏上的运行按钮或直接按F5键,运行程序。程序运行结束后,按工具栏上的结束按钮或运行窗口中的关闭按钮,结束VB应用程序的运行。
按如图所示的操作提示,在程序运行界面的文本框中输入个以秒为单位的时间,单击“确定”按钮,程序将显示时间换算结果。如果显示结果不正确,说明算法或程序有错,逐步仔细检查算法、变量声明、赋值语句、控件属性设置等,直到找到出错原因,修改代码,再测试。
一般来说,编写好程序,要准备不同情况的数据,对程序进行充分测试,检查程序的正确性。
创新活动
问题:求圆柱的侧面积,计算公式为:s=2*pi*r*h。请编写一个求圆柱侧面积的程序,界面如图所示,用户在“请输入底面半径”“请输入高”的文本中分别输入半径与高的值,单击“侧面积为”按钮,显示圆柱侧面积s的值。
任务二:感受分支结构程序的作用
探究活动
大家都有参加过学校体检吧。医院需要有一种自动量身高、体重的仪器,它不仅能帮你自动量出身高、体重,而且会对你的体型进行判断。请你给这个仪器编写一个程序,程序运行界面如图所示,当它获得用户的身高、体重数据后,能对用户的体型做出判断。
判断体型的标准有很多,以下是一个比较流行的成年人体型判断标准：
标准体重s=(身高-100)*0.9。
如果体重大于标准体重的1.1倍,则为“偏重”。
如果体重小于标准体重的09倍,则为“偏轻”。
否则,为“正常”。
显然,这是一个有三种不同情况需要判断和选择,才能解决的问题。
活动主题:
编写“体型判断”程序
在日常生活中,经常会面临不同的选择。例如,如果周末不下雨,就去西湖公园看菊花展,否则就在家看书。
计算机在解决两者选一或多种情况选择一种的问题时,需要用分支语句来实现。分支语句通过对具体条件进行判断,决定程序的执行流程,执行不同的操作。通常,分支语句是用关系表达式或逻辑表达式来表示条件。
1.了解关系表达式
用“>”“<”“>=”“<=”“=”“<”等关系(比较)运算符将两个表达式连接起来的式子称为关系表达式。
如a+b<3,"ABC"<=" BCD"
关系表达式是用来比较关系运算符两端式子的大小关系成立与否。所以它的值是逻辑型,即True或 False。
如:关系表达式1+2>3的值为 False。
如果关系式中的两个表达式都是数值型,则进行数值比较;两个表达式都是字符串,则进行字符串比较(按ASCI码大小)。
如"abc"<"bc"的值为True,"a"<"A"的值为 False。
2.了解逻辑表达式式
用逻辑运算符、小括号将逻辑型常量或关系表达式等连接起来的式子称为逻辑表达式。或者说,值为逻辑型的表达式都称为逻辑表达式。其中,逻辑运算符有:and(且)、or(或)、not(非)。
例如,((a+b) mod 2=0) and (b>o),是一个逻辑表达式
逻辑表达式常用在分支语句和循环语句中,作为分支或循环的条件。
条件与其对应的逻辑表达式
条件 逻辑表达式
a,b,c三条边能构成一个三角形 (a+b>c) and (b+c>a) and ( c+a>b)
1 < = × < = 10 (x>=1) and (x<=10)
x,y,z不全是负数 Not((x<0) and (ycO) and (z<0))
3.熟悉简单的IF语句格式
在VB中,IF语句有两种结构
单分支结构
双分支结构
单分支结构的IF语句格式1：
If<条件> Then语句
功能:当条件为真时执行Then后的语句,然后执行下一行语句;当条件为假时,直接执行下一行语句。
单分支结构的IF语句格式2：
If<条件>Then
<语句组>
End If
功能:当条件为真时执行Then后的语句组,然后执行End后的语句;当条件为假时,直接执行Endf后的语句。
语句组可以有一个以上的语句,每个语句独立一行。
双分支结构的I语句格式1:
If<条件>"Then<语句1>Else<语句2>
功能:当条件为真时,执行Then后的语句1,然后执行下一行的语句;当条件为假时,执行Esc后的语句2,然后执行下一行的语句。
双分支结构的I语句格式2:
If<条件>Then
<语句组1>
Else
<语句组2>
End If
功能:当条件为真时,执行Then后的语句1,然后执行 End If后的语句;当条件为假时,执行Else后的语句组2,然后执行 End If后的语句。
4.设计程序运行界面式
新建一个标准EXE工程,添加如表所示的控件,并设置控件相应的属性。
对象 属性 设置值 属性说明
Form1 Caption 体型判断程序 窗口标题的文本
Frame1 Caption 请输入您的身高(cm) 框架控件上的文本
Text1 Text (空) 文本框中的文本
Frame2 Caption 请输入您的体重(kg) 框架控件上的文本
Text2 Text (空) 文本框中的文本
Text3 Text (空) 文本框中的文本
Command1 Caption 判断结果==> 按钮上的文本
“体型判断”程序用到的控件及其属性说明
5.编写事件过程式
运行“体型判断”程序时,用户先在对应的文本框中输入身高与体重,单击“判断结果=>”按钮,程序在文本框text3中输出判断结果。因此我们要在“判断结果==>”( Command1)按钮的Click事件过程中编写相应程序,参考程序如下:
Private Sub Command1_Click （）
'身高、体重、标准体重定义为单精度实型变量
Dim high As Single, weight As Single, stand As Single
high= Text１.Text '将文本框text中的身高值赋给high变量
weight=Text2.Text '将文本框text2中的体重值赋给 weight变量
stand=(high-100)*0.9 '将求出的标准体重值赋给 stand变量
If( weight>1.1* stand)Then '如果体重>标准体重的1.1倍
Text3.Text="偏重" '在text3文本框中输出字符串"偏重"
Else '否则
If(weight <0.9* stand) Then
Text3. Text="偏轻"
Else
Text3. Text="正常"
End If 'if语句结束
End If
End Sub
6.调试、运行程序
用下表所示的程序测试数据样例,测试你编写的“体型判断”程序,观察程序运行结果是否正确。
序号 身高(cm) 体重(kg) 体型
1 170 70 偏重
2 170 65 正常
3 170 50 偏轻
“体型判断”程序的测试数据样例
创新活动
问题描述:编写一个三角形判断程序,接受用户输入3条线段的长度,判断用这3条线段是否可以构成一个三角形。可以,请输出可能构成的三角形(直角三角形或等边三角形或等腰三角形或等腰直角三角形或其他):不可以,请输出三条线段长度。
谢谢
21世纪教育网（www.21cnjy.com) 中小学教育资源网站
有大把高质量资料？一线教师？一线教研员？
欢迎加入21世纪教育网教师合作团队！！月薪过万不是梦！！
详情请看：
https://www.21cnjy.com/help/help_extract.php
