VB第四章选择结构测试题.docxVIP

第 高一第二学期VB测试题 一、选择题（每题2分，共20分） 1.在条件语句If x=1 Then y=2中，下列说法正确是__ ____。 A. x=1和y=2均为赋值语句 B. x=1和y=2均为关系表达式 C. x=1为关系表达式，y=2为赋值语句 D. x=1为赋值语句，y=2为关系表达式 2.下面程序段运行后，显示的结果是___ ____。 Dim x If x Then Print x Else Print x+1 A. 1 B. 0 C. -1 D. 显示出错信息 3.运行下列程序段，显示的结果是__ __。 x=Int(Rnd)+5 Select Case x Case 5 Print 优秀 Case 4 Print 良好 Case 3 Print 通过 Case Else Print 不通过 End Select A. 优秀 B. 良好 C. 通过 D. 不通过 4.执行如下程序段时，从键盘输入-5，输出的结果是__ ___。 x=-5 s=Val(InputBox(请输入s的值:)) Select Case s Case Is0 y=x+1 Case Is=0 y=x+2 Case Else y=x+3 End Select Print x;y A. -5 -2 B. -5 -4 C. -5 -3 D. -5 -5 5.用Select Case语句选择|x|=10情况的语句为：Case___ ____。 A. Not (-10 To 10) B. -10 To 10 C. Is Abs(x)10 D. Is -10 Or 10 6、有如下程序： a=1:b=2:c=3 a=a+b:b=b+c:c=b+a If a3 Or b3 Then a=b-a:b=c-a:c=b+a End If Print a+b+c 运行后，输出的结果是（ ） A）16 B）3 C）6 D）8 7、有如下程序： a=1:b=2:c=3 a=a+b:b=b+c:c=b+a If a3 Or b3 Then a=b-a:b=c-a:c=b+a End If Print a+b+c 运行后，输出的结果是（ ） A）16 B）3 C）6 D）8 8、执行下列程序，从键盘输入10，运行结果是_________。 Private Sub Command1_Click() S=InputBox(请输入一个数字：) Select Case S Case Is0 Print0 Case Is3 Print3 Case Is5 Print5 End Select End Sub (A)0 (B)3 (C)5 (D)0 9、在窗体上画一个命令按钮和一个文本框,名称分别为Command1和Text1，然后编写如下程序: Private Sub Command1_Click() t=”假期的旅游路线：” a=InputBox(请输入日期(1~31)) Select Case a Case Is=0,Is=31 t=t+有误 case Is=10,20 t=t+北京 case Is=20 t=t+大连 case Is=31 t=t +”定州” End Select Print t End Sub 程序运行，输入的20，这结果为 (A)假期的旅游路线：北京大连 (B)假期的旅游路线：大连北京 (C)假期的旅游路线：北京 (D)假期的旅游路线：大连 10.要使变量x赋值为1～100间（含1，不含100）的一个随机整数，正确的语句是______。 A. x=Int(100*Rnd) B. x=Int(101*Rnd) C. x=1+Int(100*Rnd) D. x=1+Int(99*Rnd) 二、填空题（每空5分，共80分） 1．若x=1，执行语句If x Then x = 0 Else x = 1，则x的值为__ _____。 2．VB程序的三种基本结构是：顺序、选择和_______。 3．设a=6，则执行x=IIf(a5,-1,0)后，x的值为_______。 4. 执行下面的程序段后，b的值为