Visual Basic 语言基础
一、 单选题
1．在一行内写多条语句时，每个语句之间用________来分隔。
A） ，            B） ：              C） 、              D） ；
2．下面________是合法的变量名。
A） X_yx        B） 123abc            C） integer            D） X-Y
3．下面________是不合法的整常数。
A） 100            B） &O100            C） &H100
D） %100
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              D） 2
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              C） 14              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"visual basic pdf
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表达式是______。
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
34. 以下关系表达式中，其值为False的是______。A）"ABC">"AbC"                                        B）"the"<>"they"
C）"VISUAL"=UCase("Visual")                    D）"Integer">"Int"
35. 若N=365，下述的语句中______显示的值是33。
A）Print n - Int(n / 100) * 100
B）Print Int(n / 10) - Int(n / 100) * 10
C）Print Int(n / 10) - Int(n / 100)
D）Print Int(n - Int(n / 10) * 10) / 10
36. 表达式2*3^2+2*8/4+3 ^2的值为______。
36. 表达式2*3^2+2*8/4+3 ^2的值为______。
A）64                B）31                  C）49
D）22
37. 表达式Str(Len("1234"))+Str(5.9)的值为______。
A）45.9              B）4  5.9            C）12345.9
D）1234  5.9
38. 语句Print 5/4*6\5 Mod 2的输出结果是______。
A）0                  B）1                      C）2                  D）3
39. 表达式2+3*4^5+Sin(x+1)/2中最先进行的运算是______。
A）4^5            B）3*4                  C）x+1
D）Sin()
40.表达式A%*B&-D#\3.0+F!的结果是______。
A）整型            B）长整型          C）单精度型
D）双精度型
41. 如果x是一个正实数，对x的第3位小数四舍五入的表达式是
______。
A）0.01*Int(x+0.005)                                B）
0.01*Int(100*(x+0.005))
C）0.01*Int(100*(x+0.05)                          D）
0.01*Int(x+0.05)
42. 表达式Int(8 * Sqr(36 * (10 ^ (-2)) * 10 + 0.5)) / 10
的值是______
A）1          B）1              6C）1.6          D）
0.16
43. 若N=235，下述的语句中______显示的值为3。
A）PRINT N-INT（N/100）*100
B）PRINT INT（N/10）-INT（N/100）*10
C）PRINT INT（N/10）-INT（N/100）
D）PRINT INT（N-INT（N/10））/10
44. 在窗体上画一个名称为Command1 的命令按钮，然后编写如下
事件过程：
Private Sub Command1_Click()
a$ = "VisualBasic"
Print String(3, a$)
End Sub
程序运行后，单击命令按钮，在窗体上显示的内容是______。
A）VVV              B）Vis                  C）sic                D）ll
45. 函数String(n,"str")的功能是______。
A）把数值型数据转换为字符串
B）返回由n个字符组成的字符串
C）从字符串中取出n个字符
D）从字符串中第n个字符的位置开始取子字符串
46. 以下程序段在立即窗口中输出______。
A="your"
B="sname"
B="sname"
C="iscr"
Print Right(A,3)
Picture1.Print Mid(B,2,4)
Debug.Print Left(C,2)
A）name        B）our            C）is            D）
ournameis
47. 设a="MicrosoftVisualBasic"，则以下使变量的b值为"VisualBasic"的语句是______。
A）b=Left(a,10)      B）b=Mid(a,10)        C）
b=Right(a,10)    D）b=Mid(a,11,10)
48. 设a=10,b=5,c=1，执行语句Print a>b>c后，窗体上显示的是
______。
A）True          B）False          C）1          D）出
错信息
49. 设x=4，y=6，则以下不能在窗体上显示出"A=10"的语句是
______。
A）Print A=x+y                            B）
Print"A=";x+y
C）Print  "A="+Str(x+y)                    D）Print"A="&x
十y
50. 下面表达式中,______的运算结果与其他三个不同。
A）Exp(-3.5)
B）Int(-3.5)+0.5
C）-Abs(-3.5)
D）Sgn(-3.5)-2.5
51. 设a=5,b=4,c=3,d=2，下列表达式的值是_______
3>2*b Or a=c And b<>c Or c>d
A）1                    B）True                C）False                D）2
52. 设a="MicrosoftVisualBasic", 则以下使变量b的值为"VisualBasic"的语句是_______。
A）b=Left(a,10)                                  B）
b=Mid(a,10)
C）b=Right(a,10)
D）b=Mid(a,11,10)
53. 假定有如下的窗体事件过程：
Private Sub Form_Click()
a$ = "Microsoft Visual Basic"
b$ = Right(a$, 5)
c = Mid(a$, 1, 9)
MsgBox a$, 34, b$
End Sub
程序运行后单击窗体，则在弹出的信息框中的标题栏中显示的信
息是_______。
A）Microsoft Visual

版权声明：本站内容均来自互联网，仅供演示用，请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198，我们将在24小时内删除。