vb大一选程序结构习题答案答案.docVIP

4.2习题 一、选择题 1. 以下不正确的单行结构条件语句是（ D ）。 （A） If xy Then Print ＂xy＂ （B） If x Then t=t*x （C） If x Mod 3=2 Then Print x （D） If x0 Then y=2*x-1: Print x End If 2. 给定程序段 Dim a As Integer, b As Integer, c As Integer a=1：b=2：c=3 If a=c-b Then Print ＂#####＂ Else Print ＂*****＂ 以上程序（ C ）。 （A） 没有输出（B） 有语法错（C） 输出#####（D） 输出***** 3. 运行下面程序后，在弹出的消息窗口中显示的是（ D ）。 Private Sub Form_Click() score=Int(Rnd)+5 Select Case score Case 5 a$=Good Case 4 a$=Ok Case 3 a$=Pass Case Else a$=Bad End Select MsgBox a$ End Sub A、Bad 　 B、Pass　　 　 　 C、Ok 　 　 D、Good 4. 下面语句书写正确的是（ D ）。 (A) If amax Then max=a Else max=b End If (B) If amax Then max=a Else max=b End If (C) If amax Then max=a Else max=6 ( D) If amax Then max=a Else max=6 End If 5. 执行下列程序段输出的结果为（ C ）。 a=3 IF a0 Then Print＂###＂ Else Print＂$$$＂ End If A) ###$$$ B) $$$### C) ### D) $$$ 6. 下面程序段运行后,显示的结果是( B ) dim x if x then print x else print x+1 (A) 1 (B) 0 (C) -1 (D) 显示出错信息 7: 语句IF x=1 THEN y=1, 下列说法正确的是( C ) (A) X=1和Y=1均为赋值语句 (B) X=1和Y=1均为关系表达式 (C) X=1为关系表达式,Y=1为赋值语句 (D) X=1为赋值语句,Y=1为关系表达式 8. 用IF语句表示分段函数，下列程序段不正确的是( A ) (A) If x=1 then f=sqr(x+1) (B) If x=1 then f=sqr(x+1) F=x*x+3 if x1 then f=x*x+3 (C) F=x*x+3 (D) f=sqr(x+1) If x=1 then f=sqr(x+1) If x1 then f=x*x+3 9. 下面IF语句统计满足性别（sex）为男，职称（duty）为副教授以上，年龄（age）小于40岁条件的人数，不正确的语句是( D ) (A) If sex=”男” and age40 and instr(duty,”教授”)0 then n=n+1 (B) If sex=“男” and age40 and (duty=“教授” or duty=“副教授”) then n=n+1 (C) If sex=“男” and age40 and right(duty,2)=“教授” then n=n+1 (D) If sex=“男” and age40 and duty=“教授” and duty=“副教授” then n=n+1 10. 下面程序段求两个数中的大数，( D)不正确。 (A) Max=IIF(xy,x,y) (B) Ifxy then MAX=X ELSE MAX=Y (C) MAX=X IF Y=X THEN MAX=Y (D) IF Y=X THEN MAX=Y MAX=X 二、填空题 1. 下面事件过程的功能是：输入三个整数x、y和z，按从大到小顺序输出这三个数，在横线上填