(A), (B): (C)、 (D);
C. a>6 And a<15 D. a>6 And Not (a>=15)
26.一条语句要在下一行继续写,用 ( )符号作为续行符。
11.逻辑运算符And,Or和Not的优先顺序,从高到低是( )
(A)+ (B) — (C) _ (D)…
A. Or-And-Not B.And-Not-Or
27.下面( )是合法的变量名。
C. Not-And-Or D.Not-Or-And
(A)X_yz (B)123abc (C)integer (D)X-Y
12.计算b的自然对数使用的Visual Basic表达式是( )
28.下面( )是不合法的整型常数。
A. Log(b) B.Lg(b) C. Loge(b) D.Lge(b)
(A)%100 (B)&O100 (C)&H100 (D)100
29.下面( )是合法的字符常量。
2223
第
1
页
共
7
页
。)
(A)ABC$ (B)”ABC” (C)=ABC= (D)ABC
30.下面( )是合法的单精度型变量。
(A)num$ (B)1.25E3 (C)xinte! (D)30!
31、Ucase(“ABCabc”)函数的结果为( )
(A) “abcabc” (B) “ABCABC”
(C)“ABCabc” (D)“abcABC”
32、在VB中,print”12”+45语句执行的结果是( )
(A)“1245” (B)57 (C)1245 (D)出错
33、执行len(mid(“abcd”,2)+right(“abcd”,2))语句的结果是( )
(A)“cdcd” (B)5 (C)8 (D)出错
34、在VB中,表达式3*25 mod 3 的值是( )
(A)1 (B)0 (C)3 (D)错误
35、用于获得字符串S最右边4个字符的函数是( )
(A)left(s,4) (B)left(4,s)
(C)right(s,4) (D)right(4,s)
36、可以产生30~50(含30和50)之间的随机整数的表达式是( )
(A)int(rnd*21+30) (B)int(rnd*21)
(C)int(rnd*50+30) (D)int(rnd*30+50)
37、表达式sgn(-3)+abs(-3)的值是( )
(A)3 (B)2 (C)6 (D)4
38、e
2
+e
5
的函数表达式为( )
(A)e^2+e^5 (B)exp(2)+exp(5)
(C)e*e+e*e*e*e*e (D)e
7
39、下列常量中,是日期型常量的为( )
(A)“1245” (B)true 布尔型 (C)1245数值型 (D)#2008/11/10#
40、数学表达式sin30
o
写成VB表达式为( )
(A)sin(30*3.14/180) (B)sin(30
o
)
(C)sin30
o
(D)sin30
41、下列程序段的执行结果为( )
x=5
y=-20
if x>0 then x=y-3 else y=x+3
print x-y;y-x
A、-3 3 B、 5 -8 C、3 -3 D、25 -25
2223
42、x=3
y=2
if x*y<1 then y=y-1 else y=-2
print y-x>0
A、True B、False C、-1 D、1
43、当条件为5A、if 5B、if 5C、if 5D、if 544、关于多分支选择结构的Case语句,下列写法中,错误的是( )
A、Case 1,5,7,9 B、Case 8 to 10
C、Case 10 to 2 D、Case is <”man”
45、如在下面的程序中输入15,则其运行结果为( )
Dim a as integer
a=inputbox(“清输入A的值:”)
Select Case a
Case 1 to 4
Print “D”
Case 5 to 10
Print “C”
Case Is =15
Print “B”
Case Else
Print “A”
End Select
第
2
页
共
7
页
A)D B)C C)B D)A
46、下列程序段的执行结果为( )
Dim a,b,c as integer
a=5:b=9:c=14
a=a+b
c=c-b
if a-c>b-c then a=b+c
if a+b>b+c then c=a-c
Print a,b,c
A、 3 6 9 B、 14 9 9
C、 80 14 14 D、 14 9 5
47、下列程序段的运行结果为( )
Dim a as integer
x=int(rnd*3)
Select Case x
Case 5
Print “优秀”
Case 4
Print “良好”
Case 3
Print “通过”
Case Else
Print “不通过”
End Select
A、优秀 B、良好 C、通过 D、不通过
48.语句if 3*4>=10 then a=1 else a=2 执行后,a的值为(
2223
A、12 B、10 C、1 D、2
49.执行以下程序段后,整型变量C的值为( )
a=24: b=328
select case b10
case 0
c=a*10+b
case 1 to 9
c=a*100+b
case 10 to 99
c=a*1000+b
end select
A.537 B.2427 C.24328 D.240328
50. 要在消息框中显示所示信息,编写的程序代码为 。
A)MsgBox "信息提示", 32, "输入有误,请重新输入"
B)MsgBox "信息提示", 16, "输入有误,请重新输入"
C)MsgBox "输入有误,请重新输入!", 32+VBokcancel, "信息提示"
D)MsgBox "输入有误,请重新输入!", 16+VBokonly, "信息提示"
51.在窗体中添加一个命令按钮,名称为Command1。然后编写如下程序:
Private Sub Command1_Click()
X=1:y=2:z=3
X=y:y=z:z=x
第
3
页
共
7
页
)。
Print z
End Sub
程序执行后,输出的结果是_____。
A)3 B)0 C)2 D)1
52.以下能从字符串“VisualBasic”中直接取出字符串“Basic”的函数是_____。
59.针对语句 If I=1 Then J=1, 下列说法正确的是 。
A.I=1和J=1均为赋值语句
B.I=1和J=1均为关系表达式
C.I=1为赋值语句,J=1为关系表达式
D.I=1为关系表达式,J=1为赋值语句
A)Left B)String C)Mid D)Instr
53.在Visual Basic中,下列____是合法的变量名。
A、na+e B、e*3r C、r_3 D、5we
54.如果x=4,那么以下运算结果为True的表达式是( )
A.(x<=4)and(x>=6) B.(x>=4)Or(x>=6)
C.(x<4)or(x>=6) D.not(x>=4)
55.在Visual Basic中,下列____表达式的值不等于4。
A、int(4.1) B、int(4.9) C、Abs(int(-3.9)) D、Abs(int(-4.5))
56.下列Visual Basic程序段运行后,变量M的值为____。
a=2 : b=1 : c=5
If a
If cA、2 B、1 C、5 D、以上答案均不是
57、下列Visual Basic程序段运行后,变量a, b的值为____。
a=3 : b=4:
If a>b Then x=a : a=b : b=x
A、3 4 B 、4 3 C、3 3 D 、4 4
58、下列Visual Basic程序段运行后,变量max 的值为____。
a=5 : b=10 : max=a
If b>max Then max=b
A、5 B、10 C、5 和10 D、以上都是
2223
60.执行如下程序,其结果是_______。
Private Sub Command1_Click()
Dim y As integer
y = 1 > 6 And "a" > "b"
Print y
End Sub
A.0 B.True C.False D.-1
61.为了给x、y、z三个变量赋初值1,下面正确的赋值语句是 ( )
(A) x=1:y=1:z=1 (B) x=1,y=1,z=1
(C) x=y=z=1 (D) xyz=1
62. VB提供了结构化程序设计的三种基本结构,三种基本结构是 ( )
(A)递归结构、选择结构、循环结构
(B)选择结构、过程结构、顺序结构
(C)过程结构、输入输出结构、转向结构
(D)选择结构、循环结构、顺序结构
63.设a=6,则执行 x=IIF(a>5,-1,0) 后,x的值为______。
A、-1 B、6 C、0 D、5
64.假定有如下语句:
Private Sub Form_Click()
b = 1 : a = 2
Print IIf (a >= b,a,b)
第
4
页
共
7
页
发表评论