A.-1
B.0
C.1
D.FALSE
VisualBasic布尔运算符Xor，Or，Eqv，And中，级别最高的运算符是（D）。
A.Xor
B.Or
C.Eqv
D.And
下列符号（A）是VisualBasic中的合法变量名。
A.x23
B.8xy
C.END
D.X8[B]
变量未赋值时，数值型变量的值为（A）。
A.0
B.空串""
C.Null
D.没任何值
表达式"Turbo"+"c">"Ture"+"Basic"的值是（B）。
A.TRUE
B.FALSE
C.Null
D.出错信息
表达式25.28Mod6.99的值是（B）。
A.1
B.4
C.5
D.出错
表达式Abs（-5）+Len（"ABCDE"）的值是（C）。
A.5ABCDE
B.-5ABCDE
C.10
D.0
在以下4个逻辑表达式中，其逻辑值为“真”的是（D）。
A.Not（3+4<4+6）
B.2>1And3<2
C.1>2Or2>3
D.Not（1>2）
假设变量boolVar是一个布尔型变量，则下面正确的赋值语句是（D）。
A.boolVar="True"
B.boolVar=.True.
C.boolVar=#True#
D.boolVar=3<4
有如下程序：
a$="Flying"：
b$="IS"：
c$="funny!
"
Printa$+""+Lcase$（b$）+""+Ucase$（c$）
End
运行后，输出结果是（B）。
A.FlyingIsfunny!
B.FlyingisFUNNY!
C.FlyingISFUNNY!
D.FLYINGISFUNNY!
设有如下变量声明：
DimTestDateAsDate
为变量TestDate正确赋值的表达方式是（A）。
A.TestDate=#1/2002#
B.TestDate=#"1/1/2002"#
C.TestDate=date（"1/1/2002"）
D.TestDate=Format（"m/d/yy"，"1/1/2002"）
下面的数组声明语句中（B）是正确的。
A.DimA[3，4]AsInteger
B.DimA（3，4）AsInteger
C.DimA[3；4]AsInteger
D.DimA（3；4）AsInteger
下列续行写法正确的是（B）。
A.C=_A+B
B.C=_A+B
C.C=_A+B
D.C=_'此处换行A+B
有如下程序：
Constst$=""CHINA""
St$=""GREAT""
Printst$
运行后输出的结果是（D）。
A.CHINABeijing
B.GREAT
C.Hebei
D.显示出错信息
下列语句正确的是（B）。
A.MsgBox（"请输入查询的姓名：
"，"256+3+48"）
B.MsgBox"请输入查询的姓名：
"，256+3+48
C.X=MsgBox（请输入查询的姓名：
，vbYesNoCancel）
D.X=MsgBox（"请输入查询的姓名：
"，"310"）
下述程序段的运行结果是（A）。
X=-2.3
y=125
z=Len（Str$（x）+Str$（y））
Printz
A.8
B.6
C.4
D.3
下面四个语句中，正确的赋值语句是（A）。
A.a=a+c
B．a+c=a
C．c+a=a
D．a－c=a
将Cos（y）四舍五入保留3位小数的表达式是（C）。
A.Int（（Cos（Y）+0.5）*1000）/1000
B.Int（Cos（Y*1000））/1000+0.5
C.Int（Cos（Y）*1000+0.5）/1000
D.Int（Cos（Y*1000）+0.5）/1000
设a=6，则执行x=iif（a>5,-1,0）后，x的值为（D）。
A.5
B.6
C.0
D.-1
有如下语句：
TypeStudent
NameAsString
AgeAsInteger
SexAsString
EndType
DimStuAsStudent
WithStu
.Name=""张红""
.Age=22
.Sex=""女""
EndWith
执行PrintStu.Age后的结果是（B）。
A.张红
B.22
C.“女”
D.Age
语句X=X+1的正确含义是（C）。
A.变量X的值与X+1的值相等
B.将变量X的值存到X+1中去
C.将变量X的值加1后赋给变量X
D.变量X的值为1
有如下程序：
a=3：
b=4
Printb>a
End
运行后，输出结果是（A）。
A.Ture
B.FALSE
C.4>3
D.显示出错信息
在4个字符""D"",""x""，""A""，""e""中，其ASCII码值最大的是（B）。
A.D
B.x
C.A
D.e
以下语句的输出结果是（C）。
PrintFormat$（32548.5,""000,000.00""）
A.32548.5
B.32548.5
C.32548.5
D.32548.5
在窗体上添加一个命令按钮和一个文本框，并在命令按钮中编写如下代码：
PrivateSubCommand1_Click（）
A=1.2
C=Len（Str$（A）+Space（10））
Text1.text=C
EndSub
程序运行后，单击命令按钮，在文本框中显示（C）。
A.3
B.8
C.14
D.10
在窗体中添加两个文本框（其Name属性分别为Text1和Text2）和一个命令按钮（Name属性为Command1），然后编写如下两个事件过程：
PrivateSubCommand1_Click（）
a=Ucase$（Text1.Text）+Left$（Text2.Text，2）
Printa
EndSub
PrivateSubForm_Load（）
Text1.Text=""aB""
Text2.Text=""123456""
EndSub
程序运行后，单击命令按钮，输出结果为（B）。
A.Ab12
B.AB12
C.AB56
D.Ab56
在窗体中添加两个文本框（其Name属性分别为Text1和Text2）和一个命令按钮（其Name属性为Command1），然后编写如下程序：
PrivateSubCommand1_Click（）
X=0
DoWhileX<10
X=（X+1）*（X+2）
n=n+1
Loop
Text1.Text=Str（n）
Text2.Text=Str（X）
EndSub
程序运行后，单击命令按钮，在两个文本框Text1和Text2中分别显示的值是（B）。
A.10
B.212
C.272
D.312
执行如下语句：
a=InputBox（""Today""，""Tomorrow""，""yesterday""，，，""Daybeforeyesterday""，5）
将显示一个输入对话框，在对话框的输入区中显示的信息是（C）。
A.Today
B.Tomorrow
C.Yesterday
D.Daybeforeyesterday
执行语句s=Len（Mid（"VisualBasic",1,6））后，s的值是（C）。
A.Visual
B.Basic
C.6
D.11
在窗体上画一个文本框、一个标签和一个命令按钮，其名称分别为Text1、Label1和Command1，然后编写如下两个事件过程：
PrivateSubCommand1_Click（）
strText=InputBox（""请输入""）
Text1.Text=strText
EndSub
PrivateSubText1_Change（）
Label1.Caption=Right（Trim（Text1.Text）,3）
EndSub
程序运行后，单击命令按钮，如果在输入对话框中输入abcdef，则在标签中显示的内容是（D）。
A.空
B.abcdef
C.abc
D.def
在窗体上画一个命令按钮，然后编写如下事件过程，程序运行后，单击命令按钮，依次在输入对话框中输入5，4，3，2，1，-1，输出结果为（A）。
PrivateSubCommandl_Click（）
x=0
DOUntilx=-1
a=Val（InputBox（”请输入A的值”））
b=Val（InputBox（”请输人B的值”））
x=Val（InputBox（”请输入X的值”））
a=a+b+x
Loop
Printa
EndSub
A.2
B.3
C.14
D.15
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程:
PrivateSubCommand1_Click（）
c=1234
c1=Trim（Str（c））
ForI=1To4
Print （）
Next
EndSub
程序运行后，单击命令按钮，要求在窗体上显示如下内容
1
12
123
1234
则在下划线处应填入的内容为（B）。
A.Right（c1,I）
B.Left（c1,I）
C.Mid（c1,I,1）
D.Mid（c1,I,I）
下面（D）不是字符串常量。
A."你好"
B.""
C."TRUE"
D.#False#
选拔身高T超于1.7米且体重W小于62.5千克的人，能表示该条件的布尔表达式是（C）。
A.T>1.7AndW<=62.5
B.T<=1.7OrW>=62.5
C.T>1.7AndW<62.5
D.T>1.7OrW<62.5
执行以下程序段后，变量C$的值为（D）。
A$=""VisualBasicPrograming""
B$=""Quick""
C$=B$&Ucase（Mid$（A$，7，6））&Right$（A$，11）
A.VisualBASICPrograming
B.QuickBasicPrograming
C.QUICKBasicPrograming
D.QuickBASICPrograming
要强制显示声明变量，可在窗体模块或标准模块的声明段中加入语句（D）。
A.OptionBase
B.OptionExplicit
C.Option
D.OptionCompare
下列哪项不能作为VB中的变量名（C）。
A.SSSSS
B.P123
C.456ADS
D.xdk
表达式Mid（“Hello”,2,3）的值是（C）。
A.“ll”
B.“llo”
C.“ell”
D.“ello”
表达式Int（4*Rnd+10）值的范围是（D）。
A.[10,14）
B.[11,13）
C.[10,14]
D.[10,13]
表达式2*3^2+2*8/4+3^2的值是（B）。
A.49
B.31
C.45
D.37
设x=4,y=8,z=7，表达式xz）OrzA.True
B.False
C.-1
D.1
可以同时删除字符串前导和尾部空白的函数是（C）。
A.Ltrim
B.Rtrim
C.Trim
D.Mid
函数Len（“123.4”）的值为（B）。
A.11
B.5
C.6
D.8
函数InStr（“VB程序设计教程”,”程序”）的值为（C）。
A.1
B.2
C.3
D.4
下列函数中，返回值的类型与其它3个不同的是（A）。
A.NOW（）
B.HOUR（）
C.YEAR（）
D.DAY（）
InputBox函数返回值的类型为（B）。
A.数值
B.字符串
C.变体
D.数值或字符串（视输入的数据而定）
可获得当前系统时间的函数是（B）。
A.Date（）
B.Time（）
C.IsDate（）
D.Year（）
Abc%，abc!
，abc$，abc#分别声明abc是（A）。
A.整型、单精度、字符串、双精度变量
B.整型、整型、字符串、双精度变量
C.单精度、整型、字符串、双精度变量
D.整型、双精度、字符串、双精度变量
升级会员 