1、3.13 选择结构程序设计初步1谢谢观赏2019-8-23读程序：指出错误Dim h As SingleDim w As SingleDim b As Singleb=w/hh=Val(Text1.Text)w=Val(Text2.Text)Label4.Caption=Str(b)2谢谢观赏2019-8-23读程序：指出错误Private Sub Command2_Click()Label4.Caption=你好中国End Sub为什么没有任何显示？3谢谢观赏2019-8-23区分输入输出语句n输入：H=val(text1.text)n输出：Label3.caption=str(c)Text
2、1.text=str(c)List1.add str(c)4谢谢观赏2019-8-23算法的三种基本结构n顺序结构n选择（分支）结构n循环结构5谢谢观赏2019-8-23分支结构【方式方式 2】NY 开始开始结束结束条件条件执行执行aNY 开始开始结束结束条件条件执行执行a执行执行bNY 开始开始结束结束执行执行aY执行执行b执行执行CN条件条件条件条件【方式方式 3】【方式方式 1】6谢谢观赏2019-8-23NY 开始开始结束结束条件条件执行执行a块if结构If 条件 then 语句系列1End if行if结构If 条件 then 语句If len(sfz)18 Then msgbox(请
3、正确输入！)End IfIf h=0 Then msgbox(请正确输入！)7谢谢观赏2019-8-23思考n什么情况下会出现：“块if没有end if”？n什么情况下不能用“行if”？If len(sfz)18 Then msgbox(请正确输入！)exit SubEnd If8谢谢观赏2019-8-23NY 开始开始结束结束条件条件执行执行a执行执行b块if结构If 条件 then 语句系列1Else 语句系列2End if行if结构If 条件 then 语句系列1 else 语句系列2If Mid(sfz,17,1)Mod 2=0 Then s=s+女Else s=s+男End IfIf
4、 Mid(sfz,17,1)Mod 2=0 Then s=s+女 Else s=s+男9谢谢观赏2019-8-23NY 开始开始结束结束执行执行aY执行执行b执行执行CN条件条件条件条件块if结构If 条件 then 语句系列1Elseif 条件 then 语句系列2Else 语句系列3End if If fs=90 Then Label6.Caption=优秀！ElseIf fs=60 Then Label6.Caption=及格！Else Label6.Caption=不及格！End If10谢谢观赏2019-8-23思考：n小于90并且大于等于60的表达式要怎么写？fs=60 and f
5、s fs=6011谢谢观赏2019-8-23思考：nfs=60要不要写成”fs=60 and fs=90 Then Label6.Caption=优秀！ElseIf fs=60 Then Label6.Caption=及格！Else Label6.Caption=不及格！End If12谢谢观赏2019-8-23鸡兔同笼问题的研究n问题描述：n一笼子里关着兔子和鸡，兔子和鸡共有h只，腿一共有L条，请你求出兔有几只，鸡有几只。n要求：n如果求出来的鸡或兔子数量不是自然数，那么显示“请输入正确数值”，并把几个输入文本框内容清空，否则分别输出鸡和兔的数量。n以对话框的形式提示信息：nMsgbox “
6、请输入正确的总数与腿数”13谢谢观赏2019-8-23鸡兔同笼流程图鸡兔同笼流程图开始结束输入h和l的值输出c和r的值r=(l-2*h)/2c=h-r?YN请正确输入h和l的值14谢谢观赏2019-8-23判断一个数是自然数判断一个数是否为非负数判断一个数x是非负整数判断一个数x为是否为整数如果 int(x)=x,则 x就是一个整数。方法一：如果x=0,则 x就是一个非负数。方法二：如果 abs(x)=x,则 x就是一个非负数如果int(abs(x)=x,则x就是自然数15谢谢观赏2019-8-23VB常用数学函数函数名函数的功能示例Sqr(x)求x的算术平方根Sqr(16)的返回值为4Int
7、(x)向下取整，取不大于x的最大整数int(5.6)的返回值为5int(-5.6)的返回值为-6Abs(x)取绝对值Abs(-5.5)的返回值为5.5Exp(x)求e的X次方Log(X)求以e为底的X的对数Exp(Log(4)的返回值是4Log(Exp(6)的返回值是616谢谢观赏2019-8-23关系运算符关系运算符:返回的值为返回的值为True或或False基本运算 运算符优先级表达式表达式的值相等=7A=0不相等7A 0小于7“abc”7A 13小于等于=7A=7A=32A=10FalseTrueTrueFalseTrueFalse17谢谢观赏2019-8-23课堂练习na.若小于18则
8、为营养状况较差nb.若在18-23.9之间则为标准nc.若大于23.9者，即可诊断为肥胖症营养过剩。计算结果提示18谢谢观赏2019-8-23基本要求n采用“块if”的写法。nIf语句中，不能出现“:”。n让代码的缩进符合要求。19谢谢观赏2019-8-23进阶要求20谢谢观赏2019-8-23NY 开始开始结束结束条件条件执行执行a执行执行b块if结构If 条件 then 语句系列1Else 语句系列2End ifNY 开始开始结束结束条件条件执行执行a块if结构If 条件 then 语句系列1End if行if结构If 条件 then 语句行if结构If 条件 then 语句系列1 else 语句系列2小结21谢谢观赏2019-8-23
