10．设有如下的记录类型：
TypeStudent
NumberAsString*10
NameAsString*20
AgeAsInteger
EndType
则正确引用该记录类型变量的代码是（ ）
（A）Student.Nam=“张三”
（B）DimsAsStudent
s.Name=“张三”
（C）DimsAsTypeStudent
s.Name=“张三”
（D）DimsAsType
s.Name=“张三”
11．以下语句的输出结果是（ ）
PrintFormat$（32548.5,“000,000.00”）
（A）32548.5（B）32,548.5（C）032,548.50（D）32,548.50
12．假定Pic1和Txt1分别是图片框和文本框的名称，下列不正确的语句是（ ）
（A）Print“abcd”（B）Pic1.Print“abcd”
（C）Txt1.Print“abcd"（D）Debug.Print“abcd”
13．下列语句执行后，输出的结果是（ ）
age$=18
Print“你的年龄是：
”;
Printage
（A）你的年龄是：
□18（B）你的年龄是：
□□18
（C）”你的年龄是：
”□18（D）”你的年龄是：
”□□18
注意：
符号“□”表示空格
14．执行语句m=Len（Mid（“西南交通大学03级全体学生”,5,5））后，m的值是（【4】）
（A）交通大学（B）大学03级（C）5（D）8
15．在界面设计阶段，当双击窗体上的某个控件时，所打开的窗口是（【1】）
（A）属性窗口（B）代码窗口
（C）工具箱窗口（D）工程资源管理器窗口
16．以下叙述中正确的是（【2】）
（A）对象的Name属性值可以为空
（B）窗体的Name属性指定窗体的名称，用来标识一个窗体
（C）可以在程序运行期间改变对象的Name属性值
（D）窗体的Name属性的值是显示在窗体标题栏中的文本
17．在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程：
PrivateSubCommand1_Click（）
A=45678
PrintFormat（A,”000.00”）
EndSub
程序运行后，单击命令按钮，窗体上显示的是（【4】）
（A）456.78 （B）45678.00 （C）45678 （D）00456.78
18．在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：
PrivateSubCommand1_Click（）
Move500,500
EndSub
程序运行后，单击命令按钮，执行的操作为（【1】）
（A）命令按钮移动到距窗体左边界、上边界各500的位置
（B）窗体移动到距屏幕左边界、上边界各500的位置
（C）命令按钮向左、右方向各移动500
（D）窗体向左、上方向各移动500
19．刚建立一个新的标准EXE工程后，不在工具箱中出现的控件是（【3】）
（A）通用对话框 （B）单选按钮 （C）图片框 （D）组合框
20．以下叙述中错误的是
（A）VisualBasic是事件驱动型可视化编程工具
（B）VisualBasic应用程序不具有明显的开始和结束语句
（C）VisualBasic工具箱中的所有控件都具有宽度（Width）和高度（Height）属性
（D）VisualBasic中控件的某些属性只能在运行时设置
21．以下叙述中错误的是
（A）窗体文件包含该窗体及其控件的属性
（B）以.BAS为扩展名的文件是标准模块文件
（C）一个工程中可以含有多个标准模块文件
（D）在工程资源管理器窗口中只能包含一个工程文件及属于该工程的其他文件
22．以下关于函数过程的叙述中，正确的是（【4】）
（A）函数过程形参的类型与函数返回值的类型没有关系
（B）在函数过程中，过程的返回值可以有多个
（C）当数组作为函数过程的参数时，既能以传值方式传递，也能以传地址方式传递
（D）如果不指明函数过程参数的类型，则该参数没有数据类型
23．设有如下变量声明：
DimTestDateAsDate
为变量TestDate正确赋值的表达式是（【4】）
（A）TestDate=#“6/22/2003”#
（B）TestDate=#6/22/2003#
（C）TestDate=Date（“6/22/2003”）
（D）TestDate=Format（“m/d/yy”,“6/22/2003”）
24．在窗体上有若干控件，其中有一个名称为Text1的文本框。
影响Text1的Tab顺序的 属性是（【4】）
（A）TabStop （B）Enabled （C）Visible （D）TabIndex
25．以下关于变量作业用域的叙述中，正确的是（【4】）
（A）窗体中凡被声明为Private的变量只能在某个指定的过程中使用
（B）全局变量只能在标准模块中声明
（C）模块级变量只能用Private关键字声明
（D）Static类型变量的作用域是它所在的窗体或模块文件
26．在窗体上画一个名称为Com1的命令按钮，然后编写如下程序：
PrivateSubcom1_Click（）
StaticXAsInteger
StaticYAsInteger
Cls
Y=1:
Y=Y+10:
X=X+Y
PrintX,Y
EndSub
程序运行时，三次单击命令按钮Com1后，窗体上显示的结果为（【5】）
（A）3311 （B）6331 （C）6030 （D）3131
27．以下关系表达式中，其值为False的是（【4】）
（A）”FINE”>”Fine” （B）”good”<>”god”
（C）”BASIC”=Ucase（“Basic”） （D）”good”>”god”
28．设a=3，b=5，则以下表达式值为真的是（【6】）
（A）（-3+5）And（b>0） （B）a>=bAndb>10
（C）（a>b）Or（b>0） （D）（a<0）Eqv（b>0）
29．语句Print6/5*6\5Mod2的输出结果是（【4】）
（A）0 （B）1 （C）2 （D）3
30．以下定义数组或给数组元素赋值的语句中，正确的是（【4】）
（A）DimArrasVariant （B）DimArr（10）asInteger
Arr=Array（1,2,3,4,5,6,7,8）Arr=Array（1,2,3,4,5,6,7,8）
（C）DimArr%（10） （D）Dima（3）,b（3）asInteger
Arr
（1）=”ABCDEFGH”a（0）=0
a
（1）=1
a
（2）=2
b=a
31．在窗体上画一个名称为List1的列表框，为了对列表框中的每个项目都能进行处理， 应使用的循环语句为（【4】）
（A）Fori=0ToList1.ListCount-1 （B）Fori=0ToList1.Count-1
…… ……
NextNext
（C）Fori=1ToList1.ListCount（D）Fori=1ToList1.Count
…………
NextNext
32．以下关于图片框控件的说法中，错误的是（【4】）
（A）可以通过Print方法在图片框中输出文本
（B）清空图片框控件中图形的方法之一是加载一个空图形
（C）图片框控件可以作为容器使用
（D）用Stretch属性可以自动调整图片框中图形的大小
33．设有语句
x=InputBox（“请输入数值”,“0”,“示例”）
则程序运行后，如果从键盘输入100并按回车键，下列叙述中正确的是（【7】）
（A）0是默认值
（B）变量x的值是数值100
（C）变量x的值是字符串“100”
（D）在InputBox对话框标题栏中显示的是“请输入数值”
34．以下叙述中错误的是
（A）窗体或控件的事件的名称可以由编程人员确定
（B）移动鼠标时，会触发MouseMove事件
（C）控件的名称可以由编程人员设定
（D）双击鼠标可以触发DblClick事件
35．从键盘上输入两个字符串，分别保存在变量Str1，Str2中，确定第二个字符串在第一个字符串中起始位置的函数是（【8】）
（A）Mid （B）Instr （C）String （D）Left
36．以下能够触发文本框Change事件的操作是（【9】）
（A）文本框获得焦点 （B）改变文本框的内容
（C）文本框失去焦点 （D）设置文本框的焦点
37．设a=“西南交通大学峨眉校区”，下面使b=“峨眉校区”的语句是（【10】）
（A）b=Left（a,15,8） （B）b=Left（a,7,4）
（C）b=Mid（a,15,8） （D）b=Mid（a,7,4）
38．在窗体上有一个文本框控件，名称为TxtTime；一个计时器控件，名称为Timer1，要求每一秒钟在文本框中显示一次当前时间。
程序为：
PrivateSubTimer1_（）
TxtTime.Text=Time
EndSub
在下划线上应填入的内容是（【11】）
（A）Visible （B）Interval （C）Timer （D）Enabled
39．以下能正确定义数据类型Student的代码是
（A）TypeStudent （B）TypeStudent
NameAsString*10 NameAsString*10
TelNumAsInteger TelNumAsInteger
EndType EndStudent
（C）TypeStudent （D）TypedefStudent
NameString*10NameString*10
TelNumIntegerTelNumInteger
EndTypeStudentEndType
40．为了在按下Esc键时执行某个命令按钮的Click事件过程，需要把该命令按钮的一个属性值设置为True，这个属性是（【12】）
（A）Value （B）Cancel （C）Default （D）Enabled
41．以下叙述中错误的是
（A）打开一个工程文件时，系统自动装入与该工程有关的窗体、标准模块等文件
（B）保存VisualBasic程序时，应分别保存窗体文件及工程文件
（C）事件可以由用户引发，也可以由系统引发
（D）VisualBasic应用程序只能以解释方式执行
42．设窗体上有一个列表框控件List1，且其中含有若干列表项。
则以下能表示当前被选中的列表项内容的是
（A）List1.List （B）List1.Text （C）List1.ListIndex （D）List1.Index
43．图像框Image有一个属性，可以自动调整图形的大小，以适应图像框的尺寸，这个属性是（【13】）
（A）Autosize （B）AutoRedraw （C）Appearance（D）Stretch
44．程序运行后，在窗体上单击鼠标，此时窗体不会接收到的事件是
（A）Load （B）MouseDown （C）MouseUp （D）Click
45．在窗体上画一个命令按钮，名称为Com1，然后编写如下程序：
PrivateSubCom1_Click（）
Fori=1to4
Forj=0toi
PrintChr$（97+j）;
Nextj
Print
Nexti
EndSub
则程序运行结果为（【14】）
（A）ab （B）a （C）aa （D）aa
abcbbbbbb
abcdccccccc
abcdedddddddd
46．设a=100，b=50，c=10，执行语句Printa>b>c后，窗体上显示的是
（A）True （B）False （C）1 （D）出错信息
47．MsgBox函数中用于指定对话框中显示按钮的数目的参数项是（【15】）
（A）Prompt参数 （B）Buttons参数 （C）Title参数 （D）Default参数
48．下列各组函数中，功能相似的一组函数是（【16】）
（A）Str和Val （B）Asc和Chr （C）Int和Fix （D）Lcase和Ucase
49．如果要改变窗体的标题，则需要设置的属性是
（A）Name （B）Caption （C）BackColor （D）BorderStyle
50．下列Format$函数的说明中错误的是（【17】）
（A）一个#格式符表示一个数字位，#的个数即为显示区段的长度
（B）“,”格式符与“.”格式符的作用完全相同
（C）“$”格式符用于在数值前面加上一个$，以表示货币
（D）0格式符与#格式符的功能相似
51．以下能判断是否到达文件尾的函数是
（A）BOF （B）LOC （C）EOF （D）LOF
52．执行下列程序段后，变量c的值为（【18】）
a=123:
b$=“456”:
c=a+b$
（A）0 （B）123456 （C）579 （D）语句c=a+b$错误
53．为了在程序中设置命令按钮为不可见，需要把该命令按钮的一个属性值设置为False，这个属性是（【19】）
（A）Value （B）Visible （C）Cancel （D）Enabled
54．下列控件中，不能接收焦点的控件是（【20】）
（A）Form （B）TextBox （C）CommandBotton （D）Label
55．InputBox函数的返回值类型是（【21】）
（A）数值型 （B）字符串型
（C）变体型 （D）数值或字符串型（视输入的数据而定）
56．如果一个工程含有多个窗体及标准模块，则以下叙述中错误的是
（A）用Hide方法只是隐藏一个窗体，不能从内存中清除该窗体
（B）不能把标准模块设置为启动模块
（C）如果工程中含有SubMain过程，则程序一定首先执行该过程
（D）任何时刻最多只有一个窗体是活动窗体
57．运行下列程序段后，x的值是（【22】）
x=8
Fori=1to5
x=x+x\3
Next
（A）13 （B）22 （C）29 （D）38
58．在窗体上画一个名称为Command1的命令按钮，然后编写如下的事件过程：
PrivateSubCommand1_Click（）
m=6789
c=Trim（Str（m））
Fori=1To4
Print（【23】）
Next
EndSub
程序运行后，单击命令按钮，要求在窗体上显示如下内容：
6
67
678
6789
则在【23】处应该填入的内容为
（A）Left（c,i） （B）Right（c,i） （C）Mid（c,i,i） （D）Mid（c,i,1）
59．在窗体上画一个命令按钮，然后编写如下的事件过程：
PrivateSubCommand1_Click（）
a=Val（InputBox（“请输入a的值”））
b=Val（InputBox（“请输入b的值”））
c=Val（InputBox（“请输入c的值”））
Ifa>bThent=a:
a=b:
b=t
Ifa>cThent=a:
a=c:
c=t
Ifb>cThent=b:
b=c:
c=t
Printa,b,c
EndSub
程序运行后，单击命令按钮，依次在输入对话框中输入10、5、20，则输入结果为（【23】）
（A）20 10 5 （B）5 10 20 （C）10 5 20 （D）20 5 10
60．在窗体上画一个名称为Command1的命令按钮，然后编写如下的事件过程：
PrivateSubCommand1_Click（）
X=-4
IfSgn（X）Then
Y=Sgn（X^2）
Else
Y=Sgn（x）
EndIf
PrintY
EndSub
程序运行后，单击命令按钮，窗体上显示的是（【4】）
（A）1 （B）-1 （C）-4 （D）16
61．下列不能打开代码窗口的操作是（【24】）
（A）单击窗体的任何地方
（B）双击窗体的任何地方
（C）单击工程窗口中的“查看代码”按钮
（D）单击“视图”下拉菜单中的“代码窗口”选项
62．在立即窗口中输出变量a的值，正确的语句是（【25】）
（A）Debuga （B）Debug.Printa （C）Print.Debuga （D）Printa
63．在窗体上画一个名称为Drive1的驱动器列表框，一个名称为Dir1的目录列表框。
当改变当前驱动器时，目录列表框应该与之同步改变。
设置两个控件同步的命令放在一个事件过程中，此事件过程是（【26】）
（A）Drive1_Change （B）Drive1_Click
（C）Dir1_Click （D）Dir1_Change
64．窗体的MouseUp事件过程
Form_MouseUp（ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle）
有4个参数，关于这些参数，正确的描述是
（A）通过Button参数判定当前按下的是哪一个鼠标键
（B）Shift参数只能用来确定是否按下Shift键
（C）Shift参数只能用来确定是否按下Alt和Ctrl键
（D）参数x,y用来设置鼠标当前位置的坐标
65．InputBox函数有6个参数，其中不能省略的参数项是（【26】）
（A）Default参数 （B）Title参数 （C）Xpos，Ypos参数 （D）Prompt参数
66．在窗体上画一个名称为Command1的命令按钮，然后编写如下的事件过程：
OptionBase1
PrivateSubCommand1_Click（）
Dima
s=0
a=Array（1,2,3,4）
j=1
Fori=4To1Step-1
s=s+a（i）*j
j=j*10
Nexti
Prints
EndSub
（A）34 （B）12 （C）1234 （D）4321
67．不能从一个已知字符串中得到一个子字符串的函数是（【27】）
（A）Trim （B）Right （C）Mid （D）Left
68．设组合框Combo1中有3个项目，则以下能删除最后一项的语句是
（A）Combo1.RemoveItemText
（B）Combo
升级会员 