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) 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
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"
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
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的值为______。
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 6
C)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"
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
B)Microsoft
C)Basic
D)34
54. 在窗体上画一个文本框，然后编写如下事件过程：
Private Sub Form_Click()
x = InputBox("请输入一个整数")
Print x + Text1.Text
End Sub
程序运行时，在文本框中输入456，然后单击窗体，在输入对话框中输入123，单击“确定”按钮后，在窗体上显示的内容是_______。
A)123
B)456
C)579
D)123456
55. 可以同时删除字符串前导和尾部空白的函数是_______。
A) Ltrim
B) Rtrim
C) Trim
D) Mid
56. \、/、Mod、*四个算术运算符中，优先级别最低的是_______。
A) \
B) /
C) Mod
D) *
57. 在VisualBasic中，日期 ／时间型常量要用_______括起来
A) "
B)#
C) *
D) {}
58. 设a%=20,b$=”30”,则下列输出结果是”2030”的语句是_______。
A)Print str(A)
B)Print “a”+b
C)Print a+b
D)Print a & b
59. 下列关于变体数据类型的叙述中正确的是_______。
A) 变体是一种没有类型的数据
B) 给变体变量赋某一种类型数值后，就不能再赋给另一种类型数值
C) 一个变量没有定义就赋值，该变量即为变体类型
D) 变体的空值就表示该变体值为0
60. 表达式Fix(-32.68)+Int(-23.02)的值为 _______。
A) -55
B) -56
C) -57
D) –58
来源:-计算机二级考试
61. 在VB中，若要强制变量必须先定义才能使用，应该用_______语句说明。
A) Public Const
B) Option Explicit
C) Type 数据类型名
D) DefDbl
62 执行以下程序段后，变量c$的值为_______。
a$="Visual Basic Programing"
b$="Quick"
c$=b$ & UCase(Mid$(a$,7,6)) & Right$(a$,11)
A) Visual BASIC Programing
B) Quick Basic Programing
C) QUICK Basic Programing
D) Quick BASIC Programing
63 .语句Print 5 * 5 \ 5 / 5的输出结果是_______。
A) 5
B)25
C) 0
D)1
64. 语句Print Sgn(-6^2)+Abs(-6^2)+Int(-6^2)的输出结果是_______。
A) -36
B)1
C) -1
D)-72
65. 假定Picture1和Text1分别为图片框和文本框的名称，下列不正确的语句是_______。
A) Print 2.5
B)Picture1.Print 2.5
C) Debug. Print 2.5
D) Text1.Print 2.5
66. 以下声明语句中错误的是_______。
A)Const var1=123
B)Dim var2 = ’ABC’
C)Dim var3%
D)Static var3 As Integer
67. 下列可作为Visual Basic变量名的是______。
A)A#A
B)4A
C)?xy
D)constA
68. 下列符号______不是VB中的合法变量名。
A)ABCabc
B)bd_1234
C)22wed
D)cmd$
69. 下列叙述中不正确的是______。
A)变量名的第一个字符必须是字母
B)变量名的长度不超过255个字符
C)变量名可以包含小数点或者内嵌的类型声明字符
D)变量名不能使用关键字
70. 下列符号常量的声明中，______是不合法的。
A)Const a As Single=1.1
B)Const a As Integer="15b"
C)Const a As Double=1
D)Const a As String = "Sin1"
71. 下面______不是字符串常量
A)"语言"
B)" "
C)"5"
D)#False#
72. 以下不合法的常量是 ______。
A)10^2
B)100
C)100.0
D)10E+01
73. 设有如下声明：
Dim X As Integer
如果Sgn(X)的值为-1，则X的值是______。
A)整数
B)大于0的整数
C)等于0的整数
D)小于0的数
74. Rnd函数不可能产生______的值。
A)0
B)1
C)0.1234
D)0.00005
75. 在Visual Basic中，如果一个变量未作类型声明而直接使用，则该变量的数据类型是______。
A)字符串型
B)数值型
C)变体类型
D)可以是任何类型
来源:-计算机二级考试
76. 设有如下语句：
Dim a,b As Integer
c="VisualBasic"
d=#7/20/2005#
以下关于这段代码的叙述中，错误的是______。
A)a被定义为Integer类型变量
B)b被定义为Integer类型变量
C)c中的数据是字符串
D)d中的数据是日期类型
77. Abs(-8)+Len("ABCD")的值是______。
A)12
B)14
C)8ABCD
D)-8ABCD
78. 设A="963214587",则表达式Val(Left(A,4)+Mid(A,4,2))的值为_____。
A)963214
B)963221
C)963216321
D)963213214
79. 如果X是一个正实数，将百分位四舍五入，保留一位小数的表达方式是______。
A)0.1*Int(X+0.05)
B)0.1*Int(10*(X+0.05))
C)0.1*Int(10*X)
D)Int(X+0.05)
80. 从键盘上输入两个字符串，分别保存在变量str1、str2中。确定第二个字符串在第一个字符串中起始位置的函数是______。
A) Left
B)Mid
C)String
D)Instr
81．已知A$=“12345678”，则表达式Val(Left(A$，4)+Mid(A$，4，2))的值为________。
A) 123456
B) 123445
C) 8
D) 6
82．在直角坐标系中，x、y是坐标系中任意点的位置，用x与y表示在第一或第三象限的表达式，以下不正确的是______。
A)(x>0 and y>0) and (x<0 and y<0)
B)(x>0 and y>0) and (x<0 and y<0)
C)x*y>0
D)x*y=Abs(x*y)
83．语句：Print “Sqr(9)=” ; Sqr(9)的输出结果是_______。
A)Sqr(9)= Sqr(9)
B)Sqr(9)=3
C)”3”=3
D)3= Sqr(9)
84．下面程序段的输出结果为________。
X = 10 ：Y = 20
Print X ；”+” ；Y ；”= ”；
Print X + Y
A)10 + 20 = 30
B)10 + 20 = 30
C)X+ Y = 30
D)10 + 20 = 30
85．若要处理一个值为50000的整数，应采用哪种VB基本数据类型描述更合适？_______
A)Integer
B)Long
C)Single
D)String
86．以下函数表达式中，其值等于-3的是________。
A)Int(-3.5)
B)Fix(-3.5)
C)Round(-3.5)
D)Abs(-3.5)
87．以下函数表达式中，其值不等于3的是________。
A)Int(3.5)
B)Fix(3.5)
C)Round(3.5)
D)Abs(-3)
88．以下函数表达式中，其值不等于-4的是________。
A)Int(-3.5)
B)Fix(-4.5)
C)Round(-3.5)
D)Abs(-3.5)
89．以下函数表达式中，其值等于4的是________。
A)Int(3.5)
B)Fix(3.5)
C)Round(3.5)
D)Abs(3.5)
90．以下函数表达式中，其值等于3.5的是________。
A)Int(3.5)
B)Fix(3.5)
C)Round(3.5)
D)Abs(3.5)
来源:-计算机二级考试
二、 填空题
1. 整型变量X中存放了一个两位数，要将两位数交换位置，例如13变成31，实现的表达式是___【1】____。
2. 数学表达式 的VB表达式是___【2】____。
3. 数学表达式 的VB表达式是___【3】____。
4. 表示x是5的倍数或9的倍数的逻辑表达式是___【4】____。
5. 已知a=3.5，b=5.0，c=2.5，d=true，则表达式a>=0 AND a+c > b+3 OR NOT d的值是___【5】____。
6. 表达式Ucase(Mid(“abcdefgh”，3，4))的值是___【6】____。
7. 要以××××年××月××日形式显示当前机器内日期的Format函数格式为__【7】____。
8. 计算距中华人民共和国建国60周年有多少天的函数表达式是___【8】____。
9. 计算离你毕业2012年6月30日还有多少个星期的函数表达式是___【9】____。
10. 表示s字符变量是字母(不区分大小写)的逻辑表达式是__【10】____。
11. a$=Lcase("Hello") a$的返回值是：_【11】___；
b$=Ucase("Hello") b$的返回值是：__【12】__。
12. 与数学表达式 对应的Visual Basic表达式是 【13】 。
13. 若A=20，B=80，C=70，D=30，则表达式A+B>160 Or (B+C>200 And Not D>60)的值是_【14】___。
14. 描述“X是小于100的非负整数”的Visual Basic表达式是【15】 。
15. 产生一在[3，X]区间的随机整数应使用表达式_【16】_。
来源:-计算机二级考试
参考答案
一、单选题123456789101112131415
BADBADBBDACCACA
161718192021222324252627282930
CCADACDBABDBCBC
313233343536373839404142434445
CADACBBBCDBCBAB
464748495051525354555657585960
CBBAABBCDCCBDCB
616263646566676869707172737475
BDBCDBDCCBDADBC
767778798081828384858687888990
AABBDBABABBCDCD
二、填空题【1】(X mod 10) * 10 + x\10
【2】Sqr(x+e(3))/abs(x-y)-log(3*x)
【3】(a + B)/(1/(c+5)-c*d/2)
【4】x mod 5 OR x mod 9
【5】False
【6】CDEF
【7】Format(date,“yyyy年mm月dd日”)
【8】DateDiff(“d”,#10/1/2009#,now)+1
【9】DateDiff(“w”,now,#6/10/2012#)
【10】UCase(s)>=’A’ AND UCase(s)>=’Z’
【11】"hello"
【12】"HELLO"
【13】(Cos^2(a+B))/(3*x)+5~(Cos(a+B)*Cos(a+B))/(3*x)+5
【14】False
【15】X<100 and="" x="">=0 and X=int(X)或X%<100 and="" x="" 0="">=0
【16】INT(3+(X-3)*RND)~INT(3+(X-3)*RND(P))
来源:-计算机二级考试
扫一扫
被折叠的 条评论
为什么被折叠?
到【灌水乐园】发言
