全国高等学校（考区）计 算 机 水 平 考 试 试 卷B（二级 Visual Basic 语言）
一、单项选择题（每题1分，共40分）
1．计算机硬件系统中最核心的部件是C。
A）存储器B）输入/输出设备C）CPUD）硬盘
2．计算机最早的应用领域是A。
A）科学计算B）图形处理C）过程控制D）人工智能
A）Windows B）Word C）PowerPoint D）E*cel
4．在计算机系统部，所有数据都是采用D表示。
A）十六进制B）十进制C）八进制D）二进制
5．在Windows系统中，下面文件命名合法的是B。
A）A*.DOCB）AB.DOCC）A".DOCD）A>.DOC
6．计算机可以播放DVD等音像制品, 主要运用的是A技术。
A）多媒体B）人工智能C）数据库D）数据挖掘
7．将文件从FTP服务器传输到本地计算机的过程称为D。三岁孩子的教育
A）上传B）浏览C）查张国立主演的电视剧D）下载
8．下列IP地址中，错误的是C。
A）219.231.10.155 B）192.168.5.1
C）219.260.20.12 D）192.10.6.7
9．下列关于计算机病毒的叙述中，正确的是C。
A）加密文件不会感染计算机病毒
B）系统软件不会感染计算机病毒
C）有防火墙的计算机系统也会感染病毒
D）压缩的文件不会感染计算机病毒
10．计算机能直接运行的是B。
11．下列选项中是Visual Basic的合法变量名的是C。
A）1_abc B）abc-1 C）abc_1 D）abc.1
A）*/Y=Int(*/Y) B）* Mod Y =0
C）*\Y=Fi*(*/Y) D）*\Y=*/Y
13．下面可以正确定义2个整形变量和一个字符型变量的语句是B。
A）Dim *, y As Integer, n As String B) Dim *%, y As Integer, n As String
C) Dim *%, y$, n As String D) Dim * As Integer, y, n As String
14．下面表达式中，A的运算结果与其他三个不同。
A）E*p(-3.5) B）Int(-3.5)+0.5 C）-Abs(-3.5) D）Sgn(-3.5)-2.5
15．将任意一个正的两位整数N的个位数与十位数对换的表达式为A。
A）（N-Int(N/10)*10）*10+Int(N/10) B）N-Int(N)/10*10+Int(N)/10
C）Int(N/10)+(N-Int(N/10)) D）(N-Int(N/10))*10+Int(N/10)
16．执行语句s=Mid("VisualBasic",1,6)后，s的值是A。
A) Visual B) Basic C) 6 D) 11
17．表达式5 Mod 3+3\5*2的值是B。
A）0 B）2 C）4 D）6
18．选拔性别S是女，身高T超过1.6米且体重W小于62.5公斤的人，表示该条件的表达式为C。
A) S="女" And T>=1.6 And W<=62.5 B) S="女" Or T>1.7 Or W<62.5
C) S="女" And T>1.6 And W<62.5 D) S="女"exo吴亦凡家境 Or T<=1.7 Or W>=62.5
19．可以强行中断程序运行的操作是D。
A) 按Ctrl+C键 B) 按Ctrl+Z键
C) 按Ctrl+V键 D) 按Ctrl+Break键
20．在默认条件下有数组声明语句：Dim A(2,-2 to 2, 3)，则数组A包含D个元素。
A) 200 B) 120 C) 75 D) 60
21．已设置数组元素下标从1开始，下列程序段运行时会提示出错，出错的原因是C。
a = Array(1, 2, 3, 4)
For i = 4 To 1 Step -1
Print a(i)
Ne*t i
Print a(i)
A）第三行，数组元素a(i)下标越界 B）第一行，数组没定义，不能直接赋值
C）第五行，数组元素a(i)下标越界 D）第二行，循环语句格式不对
22．下列语句不合法的是D。
A）* = 1: y = 2 B）Print *; y; C）Print *, y, D）*=1;y=2
23．当0<*<10时，将*赋值给y，应使用语句C。
A) If 0<*<10 Then y=* B) If 0<* Or *<10 Then y=*
C) If 0<* And *<10 then y=* D) If 0<* *or *<10 Then y=*
24．以下叙述中正确的是A。
B) 窗体的Name属性值是显示在窗体标题栏中的文本
C) 可以在运行期间改变对象的Name属性值
D) 对象的Name属性值可以为空
吴宗宪宋新妮25．当启动程序时，系统自动执行启动窗体的A事件过程。
A) Load B) Unload C) Click D) DblClick
26．将数据项"China"添加到列表框List1中成为第3项，应使用B语句。
A）List1.AddItem "China"，3 B）List1.AddItem "China"，2
C）List1.AddItem 3，"China" D）List1.AddItem 2，"China"
27．若要使标签框的大小自动与所显示的文本相适应，则可通过设置其A属性值为True来实现。
A）AutoSize B）Alignment C）Appearance D）Visible
28．复选框或单选按钮的当前状态通过A属性来设置或访问。
A) ValueB) Checked C) Selected D) Caption
29．要将列表框List1中当前选中的一项删除，应执行的语句是D。
A) List1.Clear
B) list1.Clear List1.ListInde*
C) List1.Delete List1.ListInde*
D) List1.RemoveItem List1.ListInde*
30．下列控件可以用作其他控件容器的有D。
A) 窗体，标签，图片框 B) 窗体，框架，文本框
C) 窗体，图像，列表框 D) 窗体，框架，图片框
31．因修改文本框的容而触发的事件是A。
A) Change B) GotFocus C) LostFocus D) SetFocus
32．如果每秒触发10次计时器的Timer事件，则计时器的Interval属性应设为C。
A) 1 B) 10 C) 100 D) 1000
33．下列对象中不能获得焦点的是B。
A）命令按钮控件 B）标签控件 C）文本框控件 D）单选按钮控件
34．设*=4，y=8，z=7，表达式*<y And (Not y>z) Or z<*的值是D。
Ack沉珂）1 B）-1 C）True D）False
35．在设计阶段，双击窗体Form1的空白处，则在代码窗口打开B事件过程代码。
A）Form_Click B）Form_Load C）Form_ DblClick D）Form_ Unload
36．如下有一段不完整的程序段，若要求该程序执行3次循环，则在程序中的空白处填入
A。
*=1
Do
*=*+3: Print *
Loop Until
A）*>=8 B）*<=8 C）*>=7 D）*<=7
37．执行语句Open "D:\RandFile.dat" For Output As *1后，对文件“D:\RandFile.dat”能够进行的操作是B。
A）只能读不能写 B）只能写不能读
C）既可以写，也可以读 D）既不能读，也不能写
38．要在运行时暂时关闭计时器，可通过赋值语句使计时器的C属性值为False。
A）Inde* B）Tag C）Enable D）Interval
39．Visual Basic 中数据库的访问技术不包括D。
A）ADO B）DAO C）RDO D）DBMS
40．下列关于菜单的论述中，错误的是D。
A）菜单项是控件，也具有属性
B）菜单项只有Click事件
C）不能在顶层菜单加快捷键
D）在程序运行过程中，不能通过赋值语句设置菜单项的属性
二、填空题（每空2分，共20分）
1.数学表达式的Visual Basic表达式是：(*+y)^3*(t+u)^2/t/(*-y)。
2.关系式-7.5≤*≤7.5所对应的逻辑表达式是：*<=7.5 and *>=-7.5。
3.以下程序用于判断输入的年份是否闰年，如果年份能被4整除但不能被100整除,或者年份能被400整除，则该年是闰年，否则不是闰年，请填空完善程序。
Private Sub mand1_Click()
y = Val(InputBo*("请输入一个年份"))
If y mod 4=0 and y mod 100<>0 Or y Mod 400 = 0 Then
Print Str(y) & "年是闰年！"
Else
Print Str(y) & "年不是闰年！"
End If
End Sub
4.利用随机函数产生20个[10,90]之间的随机整数，每行输出4个整数。填空完成以下程序。
Private Sub Form_Click()
Dim sum As Integer, * As Integer
二级VB Randomize
For i = 1 To 20
* = Int(81*rnd)+10'用随机函数产生[10~90]之间的整数
Print *;
If i mod 4=0 Then Print'满足换行条件时换行
发布评论