346VB选择语句

1、新时代领航信息技术基础能力训练必修一版权所有 侵权必究3.4.6vb选择语句(1课时)学习指导学习指导1选择语句也称“分支结构语句”或“条件判断语句”，用来表示选择(条件)控制结构，使得程序在执行过程中，根据不同的判断结构，选择执行不同的处理。选择语句主要有if语句，在vb中，if语句又分为两种形式：行if语句。行if语句必须在一行内写完。该语句的执行过程是：先计算条件表达式的值，如果条件表达式的计算结果是true，就执行then后面的语句，否则执行else后面的语句。如果else和它的后随语句不出现，则条件表达式值为true时执行then后面的语句，否则就什么也不执行，程序转向if语句后面的

2、后继语句。行if语句格式如下：if条件表达式 then语句1else 语句2或if条件表达式then 语句块if语句。块if语句的格式如下：if 条件表达式1 then语句块1elseif 条件表达式2 then语句块2elseif 条件表达式n then语句块nelse 语句块0end if这儿的语句块可以由一个或多个语句组成。如果只有两种不同情形的分别处理，则中间所有的elseif部分都不必书写，只保留语句块1和语句块0相应的部分即可，即块if语句可以简化为以下格式：if 条件表达式1 then语句块1else 语句块0end if当条件表达式为true或false时进行处理的语句都只有一

3、个时，可采用行if语句，也可采用块if语句；而如果分支中进行处理的语句不止一个时，必须采用块if语句。2inputbox函数(1)作用：显示一个输入框，并提示用户在文本框中输入文本和数字或选中某个单元格区域，当按下确定按钮后返回包含文本框内容的值。(2)语法：inputbox(“提示文本”，”标题”)参数说明：提示文本是必选项。例如有以下vb程序段：private sub command1_click()dim sngcjsngcj inputbox(”请输入学生成绩：”， ”输入成绩”)end sub执行后，会跳出如下输入对话框。此时，输入的内容将返回到变量sngcj中3msgbox函数(1

4、)作用：在对话框中显示消息，等待用户单击按钮，并返回一个 integer 告诉用户单击哪一个按钮。(注：在程序调试阶段，此函数非常有用。) (2)语法： msgbox(提示文本， 按钮， 标题) 参数说明：提示文本为必填项，按钮为选填，默认值为0。例如有以下vb程序段：private sub command1_click()dim sngcjsngcj msgbox(”你确认要退出吗？”， 1, ”关闭”)end sub运行时，会跳出如下图所示对话框。4print命令作用：在窗体中显示指定的信息语法：print 变量、表达式或字符串学习提示学习提示本节课学习中要求掌握vb选择语句的使用。掌握i

5、nputbox函数，msgbox函数及print命令的使用。并能使用if语句灵活处理生活中的实际问题。难点是块if语句的灵活使用。1在vb中，针对语句if i1 then j1，下列说法正确的是()ai1和j1均为赋值语句bi1和j1均为关系表达式ci1为关系表达式，j1为赋值语句di1为赋值语句，j1为关系表达式【答案】c基础训练基础训练2运行下列vb程序段后，显示的结果为()dim x as integerif x then print x else print x1a1 b0 c1 d显示错误【答案】a3下面vb语句正确的是()aif x y then print “x不等于y” bif

6、 x y print x不等于ycif x y then print “x不等于y” dif x y print x不等于y【答案】c4符合vb语句正确描述：如果x3y且xy，则yx3是()a b.（，）c.*d.：【答案】a5.下面程序段()能够正确实现目的：如果x0 then xy3 else yx3print xy；yxa3 3 b5 8 c3 3 d25 25【答案】c7在条件选择语句ifelseifelseend if中，当if结构内有多个条件都为true时，则()avb依次执行条件为true的后面的语句块bvb执行第一个为true的条件后面的语句块cvb执行最后一个为true的条件

7、后面的语句块d. vb执行任一个为true的条件后面的语句块【答案】b8有如下vb程序段：private sub command1_click()dim sngcjsngcj inputbox(”请输入学生的成绩：”， ”输入成绩”)if sngcj 85 thenmsgbox (”成绩优秀”)elseif sngcj 60 and sngcj 85 thenmsgbox (”成绩优秀”)elseif sngcj 60 and sngcj 85 thenmsgbox (”成绩合格”)elsemsgbox (”成绩较差”)end ifend sub当用户在界面输入“70”后，此时将会显示()的提

8、示信息a成绩优秀 b成绩合格 c成绩较差 d成绩不合格【答案】b9下列vb程序的功能是输入一串字符，判断该字符串字符数奇偶。private sub command1_click()dim nvalue as string, nlength as stringnvalue text1.textif len(nvalue) mod 2 0 then nlength ”single”else nlength ”double”end if label2.caption nlengthend sub运行程序后在文本框text1中输入“basic”，单击“command1”按钮，标签label2中输出()

9、asingle bdouble c1 d2【答案】a10下列vb事件过程private sub command_click()msgbox str(123 456)end sub运行时，在输出对话框中显示的提示信息是()a123123 b”246” c显示出错信息 d579【答案】d11利用if语句补充完整如下计算分段函数代码：y private sub form_click()dim x as integer, y as integerx inputbox(”请输入一个数值”)if x 20 then_elseif x 10 then_elseif _ then_end ifprint ”x”； x, ”y”； yend sub【答案】（1）y=x*x+3*x+2（2）y=sqr(3*x)-2（3） x0（4）y=1/x+abs(x)12变量a，b，c分别保存一元二次方程的二次项、一次项系数和常数项(其中a0)，变量x1和x2分别保存方程的两个根。完善下列程序，使程序运行时能根据方程的a，b，c值计算根并输出相应信息。d_if d0 thenx1_x2_text4.textstr(x1)text5.textstr(x2)label6.caption”有两个不同的实数根”elseif_then x1(b)/(2*a) x2=x1 text4.text=str(x1) text5.