516第四章 选择结构程序设计.ppt

第四章 选择结构程序设计,4.1 条件(If)语句4.2 选择情况(Select)语句,4.1 条件(If)语句,If 语句的块结构格式:单分支,双分支,嵌套,多分支 单分支语句 If Then End If【说明】当成立时，执行 例如：当数A是偶数时，显示相应信息。If A mod 2=0 Then Msgbox(A是偶数)End If,If 语句的块结构格式 双分支语句 If Then Else End If例4.1.电话通话费按时段收费，晚上10时后到第二天6时前每分钟话费由0.6元降为0.3元，变量t表示24小时计算的时间，变量y表示每分钟话费。,If t22 Then y=0.3Else y=0.6End IfIf t6 Then y=0.3End If,复杂If语句格式（嵌套格式）,If ThenElseIf ThenElseEnd IfEnd If功能：执行的条件是为假，且亦为假。执行的条件是为假，而为真。执行的条件是为真，而不作考虑。,例如：If t22 Then y=0.3 Else If t6 Then y=0.3 Else y=0.6 EndEnd If,对上述三种语句作以下说明：,(1)If语句的指表达式，其运算结果为 True 或 False。True代表成立，否则不成立。(2)表达式可以为逻辑、关系表达式甚至为数值表达式。(3)或可以是一个顺序结构，也可以是选择或循环结构。(4)建议用缩进方式书写块结构格式语句。例闰年判断条件 Dim isLeapyear As Boolean，y As IntegerisLeapyear=y Mod 4=0 And y Mod 100 0 Or y Mod 400=0判断数A为偶数的可写为：A mod 2,If语句的行格式,(1)单分支If语句行格式：If Then 说明：内各语句以：分隔,不能在下句写 End If。(2)双分支If语句的行格式：If Then Else 说明：和内各语句以：分隔,不能在下句写 End If。(3)复杂If语句格式（嵌套格式）：If Then Else If Then Else,If语句的行格式 例,例如：A，B两数中，较小的数放A，较大的放B。If AB Then T=A:A=B:B=T 例如：A、B、C三个数从小到大升序排列。If AB Then T=A:A=B:B=TIf AC Then T=A:A=C:C=TIf BC Then T=B:B=C:C=T例如：电话分段收费If t22 Then y=0.3 Else If t6 Then y=0.3 Else y=0.6,4.1.2 块结构的If语句,多分支块结构If语句的一般格式是：If ThenElseIf ThenElseIf ThenElse End If功能：当成立，则执行，否则当成立，则执行，当全部条件都不成立则执行。注意：ElseIf 不可写成lse If,例4.2 模拟互联网聊天室注册过程。注册信息包括“姓名、电话、密码”三项，利用文本框输入。用户名规定只能为10位以内的字母或汉字，电话规定只能为11位以内的数字，密码规定只能为6位以内的数字，否则显示错误信息并重新输入，输入了合法的密码后需再输入一次确认。,例4.3 求解一元二次方程三种根的类型，即不等实根，相等实根和虚根三种。其中，虚根表示为abi形式。,4.2 选择情况(Select)语句,语句格式 Select Case Case Case Case 图4-8 Select语句流程图Case Else End Select功能：计算的值，如果其值是 符合，则执行，符合则执行，所有表达式列表不符合，则执行。,Case 表示形式 Case 5 表示5Case 5 To 10表示5，6，7，8，9，10Case Is 10表示所有大于10的数，Is是关系运算符 Case-10 To-5,-1,-2,Is 10表示-1,-2,-5,-6,-7,-8,-9,-10和所有大于10的数Case Is=5,Is=5,Is=10，后者包括所有实数区域,例4.4 在文本框中输入任意英文句子，统计单词、标点、空格、数字的个数，并显示统计结果。分析：八个标签Label1Label8，设BorderStyle属性值为1，Label5Label8分别用于显示单词、标点、空格、数字的个数，Label1Label4分别显示相应的标题。Text1，用于输入一串字符。程序中用窗体级整型变量a、b、c、d表示分别表示单词、标点、空格、数字的个数，它们的初始值为0。使用Aword窗体级变量用于标记单词状态。是同一单词单词结束,