VB语言程序设计选择结构程序设计.ppt

选择结构程序设计,第四章,本章内容,4.1条件表达式4.2条件语句4.3多分支语句4.4选择性控件4.5计时器控件4.6程序举例,1.关系运算符及关系表达式（简单条件）,条件表达式,关系运算符的优先级别相同。,关系表达式说明,(1)在关系表达式中两个操作数进行大小比较，结果为逻辑值。(2)如果两个操作数是数值型，则按其大小比较。(3)如果两个操作数是字符串，则按字符的ASCII码值从左到右逐一比较，最先出现的不一样字符之间的关系决定了两个字符串比较的结果。“AB”Text2若是数字字符，不能比较Val(Text1)Val(Text2)转换数值，再比较大小,结果：True,关系表达式说明,(4)如果两个操作数是日期型，将日期看成“yyyymmdd”的8位整数，按数值大小比较。#09/18/2006#09/23/2006#结果为：False,2.逻辑运算符及逻辑表达式（复杂条件）,2.逻辑运算符及逻辑表达式,例：检查变量x是否大于等于3且小于等于7正确：3=3Andx=7)错误：3=x=7或3=xOrx132And21,结果：True,结果：False,结果：True,结果：False,a小数,b大数,比a大，比b小用And,x=b,表达式的组成及种类,表达式的种类：算术运算符与算术表达式字符串连接运算符与字符串连接表达式关系运算符与关系表达式逻辑运算符与逻辑表达式。,运算符的优先级,当一个表达式中存在多种运算符时，按如下优先级的先后顺序进行运算：算术运算符字符运算符关系运算符逻辑运算符函数幂()取负(-)乘、浮点除(*、/)整除()取模(mod)加减(+、-)连接(2)“表达式列表I”为下列四种形式：一个值如：Case2一组值(用逗号分隔)如：Case2,4,6,8表达式1To表达式2如：Case60To100(必须把较小值写在前面，即表达式1表达式2)Is关系表达式如：Is60(只能是简单条件,不能为组合条件),CaseIs100,SelectCasehCaseIs12Print早上好！CaseIs18Print下午好！CaseElsePrint晚上好！EndSelect,SelectCase格式,SelectCasehCaseIs18Print下午好！CaseIs0Thens等于0时先判m是否大于0m=m-1m大于0时减1s=59EndIfEndIfText1.Text=Format(m,00)数字字串，2位格式Text2.Text=Format(s,00)Ifs=0Andm=0ThenBeep响铃，即让喇叭发一声响MsgBox计时结束EndEndIfEndSub,先在窗体上显示以下考题：鸡兔同笼，已知鸡和兔总头数为h=23，总脚数为f=56，求鸡兔各有多少只?再提供输入框由学生回答问题，然后采用输出框显示对答案的评判意见。分析：设鸡数为j1，兔鸡数为t1，则有j1+t1=hj1=(4*h-f)/22*j1+4*t1=ft1=(f-2*h)/2,例4.10求鸡数和兔数,当用户单击“答题”按钮时，程序提供输入对话框，由用户输入答案，再通过输出框显示评判意见。采用的程序代码如下：PrivateSubForm_Load()ShowPrintFontSize=18PrintSpc(9);考一考你FontSize=13PrintPrintSpc(5);鸡兔同笼，已知鸡和兔总头数为23，PrintSpc(3);总脚数为56，求鸡兔各有多少？EndSub,PrivateSubCommand1_Click()“答题”h=23:f=56总头数及总脚数j1=(4*h-f)/2求出的鸡数t1=(f-2*h)/2求出的兔数j2=Val(InputBox(鸡的只数是多少？,请回答)t2=Val(InputBox(兔的只数是多少？,请回答)SelectCaseTrue选择真值Casej1=j2Andt1=t2MsgBox回答完全正确!Casej1=j2MsgBox鸡数回答正确，但兔数不对!Caset1=t2MsgBox兔数回答正确，但鸡数不对!CaseElseMsgBox回答错误!EndSelectEndSub,(1)创建应用程序的用户界面和设置对象属性单选按钮组Option1、Option2、Option3及Option4分别代表+、-、*(乘)和/(除)运算(2)编写程序代码,例4.11输入两个运算数和运算符(+、-、*或/)，组成算式并计算结果，然后显示出来,PrivateSubCommand1_Click()“计算”按钮DimaAsSingle,bAsSingle,tAsSingle,sAsStringa=Val(Text1.Text)b=Val(Text2.Text)SelectCaseTrueCaseOption1.Value+运算s=“+“：t=a+bCaseOption2.Value-运算s=“-“：t=a-bCaseOption3.Value*运算s=*:t=a*bCaseOption4.Value/运算s=/“:t=a/bEndSelectText3.Text=a&s&b&=&tEndSub,PrivateSubCommand2_Click()Text1.Text=Text2.Text=Text3.Text=EndSubPrivateSubCommand3_Click()EndEndSub,PrivateSubForm_Load()Option1.Value=True+运算EndSub,56、请根据以下要求设计VisualBasic应用程序（包括界面和代码）。在名称为Form1的窗体上画一个名称为Frame1、标题为框架的框架，在框架内添加两个名称分别为Option1、Option2的单选按钮，其标题分别为第一项、第二项。要求通过设置控件的属性将第二项设置为被选中，框架为不可用。运行程序后的窗体如图所示。注意：存盘时必须存放在考生文件夹下，工程文件名为sj87.vbp，窗体文件名为sj87.frm。,修改属性值：Frame1.Caption=”框架”Frame1.Enabled=FalseOption1.Caption=”第一项”Option2.Caption=”第二项”Option2.Value=True,59、在名称为Form1的窗体上画一个名称为Text1的文本框；画两个标题分别为对齐方式、字体，名称分别为Frame1、Frame2的框架；在Frame1框架中画三个单选按钮，标题分别为左对齐、居中、右对齐，名称分别为Option1、Option2、Option3；在Frame2框架中画两个单选按钮，标题分别为宋体、黑体，名称分别为Option4、Option5。要求：编写五个单选按钮的Click事件过程，使程序运行时，单击这些单选按钮，可以对文本框中的文字实现相应的操作（如图所示）。注意：要求程序中不得使用变量，每个事件过程中只能写一条语句。存盘时必须存放在考生文件夹下，工程文件名为sj93.vbp，窗体文件名为sj93.frm。,