A、TrueB、1C、-1D、0
15、执行语句s=Len（Mid（"VisualBasic",1,6））后，s的值是（）（2分）
A、VisualB、BasicC、6D、11
16、执行如下两条语句，窗体上显示的是
a=9.8596
PrintFormat（a,"$00,00.00"）（）（2分）
A、0,009.86B、$9.86C、9.86D、$0,009.86
17、函数INT（-13.2）的结果为：
（）（2分）
A、-13.2B、13.2C、-13D、-14
18、不能正确表示条件“两个整型变量A和B之一为0，但不能同时为0”的布尔表达式（）（2分）
A、A*B=0ANDA<>BB、（A=0ORB=0）ANDA<>B
C、A=0ANDB<>0ORA<>0ANDB=0D、A*B=0AND（A=0ORB=0）
19、假设变量BOOLVAR是一个布尔型变量，则下面正确的赋值语句是（）（2分）
A、BOOLVAR='TRUE'B、BOOLVAR=.TRUE.
C、BOOLVAR=#TRUE#D、BOOLVAR=3<4
20、设有如下变量声明DimTestDateAsDate为变量TestDate正确赋值的表达方式是（）（2分）
A、TestDate=#1/1/2002#B、TestDate=#"1/1/2002"#
C、TestDate=Date（"1/1/2002"）D、TestDate=Format（"m/d/yy","1/1/2002"）
21、下列字符串常量中，最大的是（）（2分）
A、"北京"B、"上海"C、"天津"D、"广州"
22、代数式x1-|a|+ln10+sin（x2+2л）/cos（57o）对应的VisualBasic表达式是（）（2分）
A、X1-Abs（A）+Log（10）+Sin（X2+2*3.14）/Cos（57*3.14/180）
B、X1-Abs（A）+Log（10）+Sin（X2+2*л）/Cos（57*3.14/180）
C、X1-Abs（A）+Log（10）+Sin（X2+2*3.14）/Cos（57）
D、X1-Abs（A）+Log（10）+Sin（X2+2*л）/Cos（57）
23、如果将布尔常量值TRUE赋值给一个整型变量，则整型变量的值为（）（2分）
A、0B、-1C、TRUED、FALSE
24、函数String（n,"str"）的功能是（）（2分）
A、把数值型数据转换为字符串B、返回由n个字符组成的字符串
C、从字符串中取出n个字符D、从字符串中第n个字符的位置开始取子字符串
25、在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：
PrivateSubCommand1_Click（）
a$="VisualBasic"
PrintString（3,a$）
EndSub
程序运行后，单击命令按钮，在窗体上显示的内容是（）（2分）
A、VVVB、VisC、sicD、11
26、将数学表达式Cos2（a+b）+5e2写成VisualBasic的表达式，其正确的形式是（）（2分）
A、Cos（a+b）^2+5*exp
（2）B、Cos^2（a+b）+5*exp
（2）
C、Cos（a+b）^2+5*ln
（2）D、Cos^2（a+b）+5*ln
（2）
27、NULL是指：
（）（2分）
A、0B、空格C、未知的值或无任何值D、空字符串
28、以下（）程序段可以实施X、Y变量值的变换（）（2分）
A、Y=X：
X=YB、Z=X：
Y=Z：
X=Y
C、Z=X：
X=Y：
Y=ZD、Z=X：
W=Y：
Y=Z：
X=Y
29、将任意一个正的两数N的个位数与十位数对换的表达式为（）（2分）
A、（N-INT（N/10）*10）*10+INT（N/10）B、N-INT（N/10）*10）*10+INT（N）/10
C、INT（N/10）+（N-INT（N/10）D、（N-INT（N/10）*10）*10+INT（N/10）
30、设a=2，b=3，c=4，d=5，下列表达式的值是Nota<=cOr4*c=b^2Andb<>a+c（）（2分）
A、-1B、1C、TrueD、False
31、表达式25.28Mod6.99的值是（）（2分）
A、1B、5C、4D、出错
32、设A、B、C表示三角形的3条边，表示条件“任意两边之和大于第三边”的布尔表达式可以用（）表示。
（）（2分）
A、A+B>=COrA+C>=BOrB+C>=AB、Not（A+B<=COrA+C<=BAndB+C<=A）
C、A+B>CAndA+C>BAndB+C>AD、A+B>CAndA+C>BOrB+C>A
33、设A=”abcdefghijklm”，下面（）的函数值不为”jklm”。
（）（2分）
A、Mid（A,10,14）B、Ringht（A,4）C、Mid（A,10,4）D、Left（A,10,4）
34、以下能从字符串“VisualBasic”中直接取出子字符串“Basic”的函数是（）（2分）
A、LeftB、MidC、StringD、Instr
35、执行以下程序段
a$=:
abbacddcba"
fori=6to2step-2
x=mid9a,i,i）
y=left（a,i）
z=right（a,i）
z=ucase（x&y&z）
nexti
printz
输出结果为__________（）（2分）
A、ABAB、BBABBAC、ABBABAD、AABAAB
36、设a="VisualBasic"，下面使b="Basic"的语句是（）（2分）
A、b=Left（a,8,12）B、b=Mid（a,8,5）
C、b=Rigth（a,5,5）D、b=Left（a,8,5）
37、\、/、Mod、*等4个算术运算符中，优先级最低的是（）（2分）
A、\B、/C、ModD、*
38、下列表达式中不能判断x是否为偶数的是（）（2分）
A、x/2=Int（x/2）B、xMod2=0
C、Fix（x/2）=x/2D、x\2=0
39、表达式（7\3+1）*（18\5-1）的值是（）（2分）
A、8.76B、7.8C、6D、6.67
40、设a=2,b=3,c=4,表达式Nota<=cOr4*c=b^2Andb<>a+c的值是（）（2分）
A、-1B、1C、TrueD、False
41、从键盘上输入两个字符串，分别保存在变量str1、str2中。
确定第二个字符串在第一个字符串中起始位置的函数是（）（2分）
A、LeftB、MidC、StringD、Instr
42、货币型数据需（）字节（）（2分）
A、2B、4C、6D、8
43、表达式（-1）*Sgn（-100+Int（Rnd*100））的值是（）（2分）
A、0B、1C、-1D、随机数
44、表达式Mid（“SHANGHAI”,6,3）的值是（）（2分）
A、SHANGHB、SHAC、ANGHD、HAI
45、表达式5Mod3+3\5*2的值是（）（2分）
A、0B、2C、4D、6
46、下列对变量的定义中，不能定义A为变体变量的是（）（2分）
A、DIMAASDOUBLEB、DIMAASVARIANT
C、DIMAD、A=24
47、有如下程序
privatesubform_click（）
dimiasinteger,sumasinteger
sum=0
fori=2to10
ifimod2<>0andimod3=0then
sum=sum+i
endif
nexti
printsum
endsub
程序运行后，单击窗体，输出结果为（）（2分）
A、12B、30C、24D、18
48、要在FORM_LOAD事件过程中使用PRINT方法在窗体上输出一定的内容，应：
（）（2分）
A、设置窗体的VISIBLE属性
B、设置窗体的AUTOREDRAW属性并调用窗体的SHOW方法
C、调用窗体的HIDE方法
D、设置窗体ENABLED属性
49、设有如下声明：
DimXAsInteger如果Sgn（X）的值为-1，则X的值是（）（2分）
A、整数B、大于0的整数C、等于0的整数D、小于0的数
50、表达式2+3*4^5-SIN（X+1）/2中最先进行的运算是（）（2分）
A、4^5B、3*4C、x+1D、SIN
51、以下可以作为VB变量名的一项是（）（2分）
A、SINB、CO1C、COS（X）D、X（-1）
52、执行以下程序后输出的是
PrivateSubCommand1_Click（）
ch$="AABCDEFGH"
PrintMid（Right（ch$,6）,Len（Left（ch$,4））,2）
EndSub（）（2分）
A、CDEFGHB、ABCDC、FGD、AB
53、定义货币类型数据应该用关键字（）（2分）
A、SINGLEB、DOUBLEC、CURRENCYD、BOOLEAN
54、设a=5，b=10，则执行c=Int（（b-a）*Rnd+a）+1后，c值的范围为（）（2分）
A、5～10B、6～9C、6～10D、5～9
55、VB认为下面（）组变量是同一个变量（）（2分）
A、A1和a1B、SUM和SUMMARYC、AVER和AVERAGED、A1和A_1
56、下列不可以通过（）操作将焦点赋给对象。
（）（2分）
A、运行时使用TAB键B、在代码中用CALL语句调用
C、在代码中用SETFOCUS方法D、用访问键或用鼠标单击选择对象
57、变量未赋值时，数值型变量的值为（）（2分）
A、0B、空C、1D、无任何值
58、InputBox函数返回的函数值的类型是（）（2分）
A、数值B、字符串C、数值或字符串D、根据需要可以是任何类型数据
59、文本框控件中将Text的内容全部显示为所定义的字符的属性项是（）（2分）
A、PasswordCharB、需要编程来实现C、PasswordD、以上都不是
60、函数Len（Str（Val（“123.4”）））的值为（）（2分）
A、11B、5C、6D、8
61、OPTIONEXPLICIT语句不可以放在（）（2分）
A、窗体模块的声明段中B、标准模块的声明段中
C、类模块的声明段中D、任何事件过程中
62、以下关系表达式中，其值为False的是（）（2分）
A、"ABC">"AbC"B、"the"<>"they"
C、"VISUAL"=UCase（"Visual"）D、"Integer">"Int"
63、声明符号常量应该用关键字（）（2分）
A、StaticB、ConstC、PrivateD、V26/ariant
64、函数Ucase（Mid（“visualbasic”,8,8））的值为（）（2分）
A、visualB、basicC、VISUALD、BASIC
65、下列语句中正确的是（）（2分）
A、txt1.text+txt2.text=txt3.textB、command1.name=cmdok
C、12label.caption=1234D、a=inputbox（hello）
66、在窗体上画两个文件，其名称分别为TEXT1和TEXT2,然后编写如下程序：
PRIVATESUBFORM_LOAD（）
SHOW
TEXT1.TEXT=""
TEXT2.TEX=""
TEXT1.SETFOCUS
ENDSUB
PRIVATESUBTEXT1_CHANGE（）
TEXT2.TEXT=MID（TEXT1.TEXT,8）
ENDSUB
程序运行后，如果在文本框TEXT1中输入"BEIJINGCHINA"，则在文本框TEXT2中显示的内容是（）（2分）
A、BEIINGCHINAB、CHINAC、BEIJINGD、BEIJINGC
67、INT（100*RND
（1））产生的随机整数的闭区间是（）（2分）
A、[0，99]B、[1，100]C、[0，100]D、[1，99]
68、以下声明语句中错误的是____________（）（2分）
A、CONSTVAR1=123B、DIMVAR2='ABC'
C、DEFINTA-ZD、STATICVAR3ASINTGER
69、设有如下语句：
Dima,bAsInteger
c="VisualBasic"
d=#7/20/2005#
以下关于这段代码的叙述中，错误的是（）（2分）
A、a被定义为Integer类型变量B、b被定义为Integer类型变量
C、c中的数据是字符串D、d中的数据是日期类型
70、下列关于属性设置的叙述错误的是：
（）（2分）
A、一个控件具有什么属性是VB预先设计好的，用户不能改变
B、一个控件具有什么属性是VB预先设计好的，用户可以改变
C、一个控件的属性即可以在属性窗口中设置，也可以用程序代码设置
D、一个控件的属性在属性窗口中设置，还可以利用程序代码为其设置新值
71、表达式"5mod3+3\5*2"的值是（）（2分）
A、0B、2C、4D、6
72、函数InStr（“VB程序设计教程”,”程序”）的值为（）（2分）
A、1B、2C、3D、4
73、设x=4,y=8,z=7，以下表达式的值是xz）OrzA、1B、-1C、TrueD、False
74、代数式exSin（300）2x/（x+y）lnx对应的VB表达式是（）（2分）
A、E^X*Sin（30*3.14/180）*2*x/x+y*log（x）
B、Exp（x）*Sin（30）*2*x/（x+y）*ln（x）
C、Exp（X）*Sin（30*3.14/180）*2*x/（x+y）*log（x）
D、Exp（X）*Sin（30*3.14/180）*2*x/（x+y）*ln（x）
75、设有如下的用户定义类型：
Typestudent
Numberasstring
Nameasstring
Ageasinteger
Endtype
则以下正确引用该类型成员的代码是（）（2分）
A、Student.name="李明"B、DimsAsStudent
s.name="李明"
C、DimsAsTypeStudentD、DimaAsType
s.name="李明"s.name="李明"
76、以下能正确定义数据类型TelBook的代码是（）（2分）
A、TypeTelBookB、TypeTelBook
NameAsString*10NameAsString*10
TelNumAsIntegerTelNumAsInteger
EndTypeEndTelBook
C、TypeTelBookD、TypeTelBook
NameString*10NameString*10
TelNumIntegerTelNumInteger
EndTypeTelBookEndType
77、设"x=4,y=8,z=7"，表达式xz）orzA、1B、-1C、trueD、false
78、如果X是一个正的实数，将千分位四舍五入，保留两位小数的表达式是（）（2分）
A、0.01*int（x+0.05）B、0.01*int（100*（x+0.005））
C、0.01*int（100*（x+0.05））D、0.01*int（x+0.005）
79、函数"string（n,"str"）"的功能是______________（）（2分）
A、把数值型数据转换为字符串B、返回由N个字符组成的字符串
C、从字符串中取出N个字符D、从字符串中第N个字符的位置开始取子字符串
80、设a="MicrosoftVisualBasic"，则以下变量b的值为"VisualBasic"的语句是（）（2分）
A、b=Left（a,10）B、b=Mid（a,10）
C、b=Right（a,11）D、b=Mid（a,11,10）
81、常量-0.00013579的科学计数法是（）（2分）
A、-1,3579E+0.4B、1.3579E-4C、-13.579E-5D、-1.3579E-0.4
82、表达式INT（8*SQR（36）*10^（-2）*10+0.5）/10的值是（）（2分）
A、0.48B、0.048C、0.5D、0.05
83、语句Print5/4*6\5Mod2的输出结果是（）（2分）
A、0B、1C、2D、3
84、产生[10，37]之间的随机整数的VisualBasic表达式是（）（2分）
A、Int（Rnd
（1）*27）+10B、Int（Rnd
（1）*28）+10
C、Int（Rnd
（1）*27）+11D、Int（Rnd
（1）*28）+11
85、在窗体上画一个名称为command1的命令按钮，然后编写如下事件过程：
privatesubcommand1_click（）
forn=1to20
ifnmod3<>0thenm=m+n\3
nextn
printn
endsub
程序运行后，如果单击命令按钮，则窗体上显示的内容是（）（2分）
A、15B、18C、21D、24
86、表达式X+1>X是（）（2分）
A、算术表达式B、非法表达式C、字符表达式D、关系表达式
87、如果TAB函数的参数小于1，则打印位置在第（）列（）（2分）
A、0B、1C、2D、3
88、以下关于变量作用域的叙述中，正确的是（）（2分）
A、窗体中凡被声明为Private的变量只能在某个指定的过程中使用
B、全局变量必须在标准模块中声明
C、模块级变
升级会员 