51、函数String(n, \的功能是(B)。 A、把数值型数据转换为字符串 B、返回由n个字符组成的字符串 C、从字符串中取出n个字符

D、从字符串中第n个字符的位置开始取子字符串

52、语句Print Format(“Hello World”,“>”)的输出结果是(C)。 A、hello WORLD

B、hello world D、HELLO world C、Private

D、Variant

C、HELLO WORLD A、Static

53、声明符号常量应该用关键字(B)。

B、Const

54、要强制显示声明变量，可在窗体模块或标准模块的声明段中加入语句(B)。 A、Option Base 0 C、Option Base 1 A、A#A A、True A、124abc A、5

B、Option Explicit D、Option Compare

C、?xy

D、constA

55、下列可作为Visual Basic变量名的是(D)。

B、4A

56、设a=10，b=5，c=1，执行语句Print a > b > c后，窗体上显示的是(B)。

B、False

C、1 C、124

D、出错信息 D、abc

D、-1

57、执行x$=String(6, \后，x的值是(B)。

B、111111

B、6

58、设a=6，则执行 x=IIf(a>5,-1,0)后，x 的值为（D）

C、0

59、执行语句：c$=“Glad”& Mid$(“Nice to meet you”,5,3)，则变量c$的值为(C)。 A、Nice to meet you C、Glad to A、ABC$

B、Glad Nice to meet you

D、Glad

C、' ABC'

D、ABC

60、下面(D)是合法的字符常数。

B、\

61、对于语句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 为关系表达式

62、设有声明：Dim X As Integer,如果Sgn(X) 的值为-1，则X的值是(D)。 A、任何整数 A、，

B、0

C、等于0的整数 C、、

D、小于0的数

D、；

63、在一行内写多条语句时，每个语句之间用(B)符号分隔。

B、：

64、从键盘上输入两个字符串，分别保存在变量str1、str2中。确定第二个字符串在第一个字符串中起始位置的函数是(D)。 A、Left

B、Mid

C、String

D、Instr

65、设S=\中华人民共和国\，表达式Left（S,1）+Right（S,1）+Mid（S,3,2）的值为（B） A、\中华民国\ C、\中共人民\ A、Filename

B、\中国人民\D、\人民共和\

C、254D

D、Print

66、下列可作为 Visual Basic中的变量名的是(A)。

B、A(A+B)

67、下面(A)是合法的变量名。

A、X_yz A、xyz123

B、123abc C、Integer

D、X-Y D、Bernald

68、以下变量命名非法的是（C）。

B、printaa

C、boolean

69、设有变量声明:Dim TestDate As Date,为变量TestDate正确赋值的表达方式是(A)。 A、TextDate=#1/1/2002# B、TestDate=#“1/1/2002”# C、TextDate=date(“1/1/2002”)

D、TestDate=Format(“m/d/yy”,“1/1/2002”)

70、设a=2,b=3,c=4,d=5，表达式a>b AND c<=d的值是(B)。 A、True A、4

B、False

B、3

C、-1

D、1

D、7

71、表达式6*8 Mod 9的值是(B)。

C、6

72、 假设变量bool_x是一个布尔型(逻辑型)的变量，则下面正确的赋值语句是（D） A、bool_x = \ C、bool_x = #False# A、b=Left(a,8,12) C、b=Rigth(a,5,5) A、32548.5

B、bool_x = .False. D、bool_x = False

B、b=Mid(a,8,5) D、b=Left(a,8,5)

C、032,548.50

D、32,548.50

73、设a=“Visual Basic”，下面使b=“Basic”的语句是(B)。

74、语句Print Format$(32548.5,“###,###.###”)的输出结果是（B）。

B、32,548.5

75、以下声明语句中错误的是(D)。 A、Const var1=123 C、Dim x_y_z% A、Ltrim

B、Dim var2 = 'ABC'

D、Static var3 As Integer

C、Trim

D、Mid

76、可以同时删除字符串前导和尾部空白的函数是(C)。

B、Rtrim

77、下列可为合法变量名的是(D)。 A、Integer B、False A、0 A、14

B、空

C、public

D、thanksgiving

D、无任何值

D、2

78、变量未赋值时，数值型变量的值为( A)。

C、1 C、20

79、表达式16/4-2^5*8/4 Mod 5\\2的值为(B)。

B、4

确的80、下面If语句统计满足性别为男、职称为副教授以上、年龄小于40岁条件的人数，不正语句是（D）。 A、If sex=\男\＜40 And (duty=\教授\副教授\ Then n=n+1 B、If sex=\男\＜40 And InStr(duty,\教授\＞0 Then n=n+1 C、If sex=\男\＜40 And Right(duty,2)= \教授\ Then n=n+1 D、If sex=\男\＜40 And duty=\教授\副教授\81、设a=3,b=5，则以下表达式值为真的是(B)。 A、a>=b And b>10 B、(a>b)Or(b>0) C、(a<0)or(b<0) D、(-3+5>a)And(b>0)

82、执行语句a=InputBox(\before yesterday\将显示一个输入对话框，在对话框的输入区中显示的信息是(A)。 A、Today

B、Tomorrow C、Yesterday

D、Day before Yesterday

83、VB提供了结构化程序设计的3种基本结构，这3种基本结构是（B）。 A、递归结构，分支结构，循环结构 B、选择结构，过程结构，顺序结构 C、过程结构，输入、输出结构，转向结构 D、分支结构，循环结构，顺序结构

84、下面If语句统计满足性别为男、职称为副教授以上、年龄小于40岁条件的人数，不正确的语句是（D）。 A、If sex=“男”And age＜40 And InStr(duty,“教授”)＞0 Then n=n+1

B、If sex=“男”And age＜40 And (duty=“教授”Or duty=“副教授”) Then n=n+1 C、If sex=“男”And age＜40 And Right(duty,2)= “教授” Then n=n+1

D、If sex=“男”And age＜40 And duty=“教授”And duty=“副教授” Then n=n+1 85、当语句w=IIf(4>10,”Red”,“Green”)执行后，变量w中的值是（C）。 A、Null B、“Red” C、“Green” D、-1

86、赋值语句：a=123+MID(“123456”,3,2)执行后，a变量中的值是（D）。 A、“12334” B、123 C、12334 D、157

87、设有语句x=InputBox(“AAAA”，“BBBB”，“”),程序运行后，所产生的对话框的标题应为(C)。 A、AAAA B、空 C、BBBB

D、出错，不能产生对话框 88、下面正确的赋值语句是（C）。 A、x+y=30 B、y=π*r*r C、y=x+30 D、3y=x

89、VB提供了结构化程序设计的三种基本结构，三种基本结构是(D)。 A、递归结构、选择结构、循环结构 B、选择结构、过程结构、顺序结构 C、过程结构、输入输出结构、转向结构 D、选择结构、循环结构、顺序结构

90、下面程序段求两个数中的大数，不正确的是（D）。 A、Max=IIf(x＞y,x,y)

B、If x＞y Then Max=x Else Max=y C、Max=x：If y＞=x Then Max=y D、If y＞x Then Max=y ：Max=x

91、下列程序段： Dim x If x Then Print x Else Print x+1 运行后，显示的结果是（A）。

A、1 B、0 C、-1 D、出错

92、以下不属于vb的三种基本结构的是（C）？ A、顺序结构 B、选择结构 C、递归结构 D、循环结构

93、语句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为关系表达式

94、赋值语句：a=123 & MID(“123456”,3,2)执行后，a变量中的值是（C）。 A、“12334” B、123 C、12334 D、157

95、下面程序段显示的结果是（A）。 Dim x x=Int(Rnd)+5 Select Case x Case 5 “优秀” Case 4 Print“良好” Case 3 Print“通过” Case Else Print“不通过” End Select A、优秀 B、良好 C、通过 D、不通过

96、为了给x,y,z这3个变量赋初值1，下面正确的赋值语句是（A）。 A、x=1：y=1：z=1 B、x=1,y=1,z=1 C、x=y=z=1 D、xyz=1

97、下列语句正确的是（C） A、If A≠B Then Print \不等于B\ B、If A<>B Then Printf A不等于B