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.cap
2、tion=str(c) Text1.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
3、) 18 Then msgbox (请正确输入！)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 =
4、0 Then s = s + 女Else s = s + 男End IfIf 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
5、= 不及格！ End If10谢谢观赏2019-8-23思考：n小于90并且大于等于60的表达式要怎么写？fs = 60 and fs 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要
6、求：n如果求出来的鸡或兔子数量不是自然数，那么显示“请输入正确数值”，并把几个输入文本框内容清空，否则分别输出鸡和兔的数量。n以对话框的形式提示信息：nMsgbox “请输入正确的总数与腿数”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就是一个非负
7、数如果int(abs(x)=x,则x就是自然数15谢谢观赏2019-8-23VB常用数学函数函数名函数的功能示例Sqr(x)求x的算术平方根Sqr(16)的返回值为4Int(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不相等7
8、A 0小于7“abc”7A 13小于等于 =7A=7A=32A=10FalseTrueTrueFalseTrueFalse17谢谢观赏2019-8-23课堂练习na.若小于18则为营养状况较差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
