⼀、单选题
1．在⼀⾏内写多条语句时，每个语句之间⽤________来分隔。 A），
B）：
C）、
二级VB D）；
2．下⾯________是合法的变量名。
A） X_yx
B） 123abc
C） integer
D） X-Y
3．下⾯________是不合法的整常数。
A） 100
B） &O100
C） &H100
D） 0
4．下⾯________是合法的字符常数。
A） ABC$
B） "ABC"
C） ’ABC’
D） ABC
5．下⾯________是合法的单精度型变量。
A） num!
B） sum%
C） xint$
D） mm#
6．下⾯________是不合法的单精度常数。
A） 100!
B） 100.0
C） 1E+2
D） 100.0D+2
7．表达式16/4-2^5*8/4 MOD 5\2的值为________。
A） 14
B） 4
C） 20
8．数学表达式3≤x＜10在VB中的逻辑表达式为________。
A） 3<=x<10
B） 3<=x AND x<10
C） x>=3 OR x<10
D） 3<=x AND <10
9．与数学表达式ab/3cd对应，不正确的VB表达式为________。
A） a*b/(3*c*
D）
B） a/3*b/c/d
C） a*b/3/c/d
D） a*b/3*c*d
10. RND函数不可能是下列________值。
A） 1
B） 0
C） 0.123
D）0.00005
11. Int(198.55*100+0.5)/100的值为________。
A） 198
B） 199.6
C） 198.55
D）200
12. Int(198.555*100+0.5)/100的值为_______。
A）198
B）199.6
C）198.56
D）200
13. Print DateAdd("m"，1，#1/30/2000#)语句显⽰的结果为________。
A） 00-2-29
B） 00-2-28
C） 00-2-30
D）00-1-31
14. 表达式DateDiff("y"，1，#12/30/1999#，#1/13/2000#)的结果为________。 A） 1
B） 11
D） 99
15. 表达式Len（"123程序设计ABC"）的值是________。
A） 10
B） 14
C） 20
D） 17
16 .表达式LenB（"123程序设计ABC"）的值是________。
A） 10
B） 14
C） 20
D） 17
17. 下⾯正确的赋值语句是________。
A） x + y = 30
B） y = p*r*r
C） y = x + 30
D） 3y = x
18. 为了给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
19. 赋值语句：a = 123 + MID("123456",3,2)执⾏后，a变量的值是是________。 A） “1234”
B） 123
C） 12334
D） 157
20. 赋值语句：a = 123 & MID("123456",3,2)执⾏后，a变量的值是是________。 A） “12334”
B） 123
C） 12334
D） 157
21. 表达式 12000 + "123" & 100 的结果为 ________。
A） 12000123100
B）出错
C） 12123100
D） 12223
22. 表达式String(3, "ABCDED")的值为 ________。
A） C
B） "ABC"
C） ABC
D） "AAA"
23. 表达式InStr(3, "EFABCDEFG","EF")的值为 ________。
A） 1
B） 7
C） 2
D） “EF”
24. 以下合法的Visual Basic 标识符是______。
A）ForLoop
B）Const
C）6abc
D）b#x
25.Visual Basic中的数值可以⽤⼗六进制或⼋进制表⽰，⼗六进制数以&H开头，⼋进制数以______开头。 A）$O
B）&O
C）$E
D）&E
26. 设有如下声明：
Dim X As Integer
如果Sgn（X）的值为-1，则X的值是______。
A）整数
B）⼤于0的整数
C）等于0的整数
D）⼩于0的数
27. 产⽣[5，46]之间随机整数VB表达式是______。
A）Int(Rnd(1)*42)+6
B）Int(Rnd(1)*42)+5
C）Int(Rnd(1))+41
D）Int(Rnd(1)*41)+5
28. 设a="Visual Basic"，下⾯使b=" Basic"的语句是_______。
A） b=Left$(a,8,5)
B） b=Right$(a,5,5)
C） b=Mid$(a,8,5)
D） b=InStr(a,8)
29. 表达式Int(-17.8)+Sgn(17.8)的值是______。
A）18
B）-17
C）-18
D）-16
30. 表达式Val(".123E2CD")的值是______。
A）123
B）0
C）12.3
D）123E2CD
31．设a=5，b=10，则执⾏c=int((b-A）*Rnd+A）+1后，c值的范围为______。 A）5～10
B）6～9
C）6～10
D）5～9
32. 设有如下变量声明
Dim TestDate AS Date
能为变量TestDate正确赋值的是______。
A）TestDate=#1/1/2007#
B）TestDate=#"1/1/2007"#
C）TestDate=date("1/1/2007")
D）Testdate=Format("m/d/yy","1/1/2007")
33. 在窗体中添加⼀个命令按钮，并编写如下程序：
Private Sub Command1_Click()
a%=2/3
b%=32/9
Print a%,b%
End Sub
运⾏下列程序，输出结果为______。
A）0 4
B）0 3
C）1 3
D）1 4
版权声明：本站内容均来自互联网，仅供演示用，请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198，我们将在24小时内删除。
发表评论