江苏省计算机二级VB笔试题库含答案

江苏省高等学校非计算机专业学生 计算机基础及应用能力等级考试试卷

二级Visual Basic全真模拟试卷一

（本试卷包括计算机基础知识部分和程序设计部分，考试时间共120分钟）

说明：

1．本试卷满分为60分，分选择题和填空题，试卷不分A、B类型。

2．选择题用答题卡答题。每一项有A、B、C、D四个可供选择的答案，请选择其中一个你认为正确的答案，用HB铅笔涂写在答题卡的相应答题号内。每选对一项得1分，不选或选错不得分。

3．填空题用答题纸答题。请将答案填写在答题纸的相应答题号内，每个答案只占一行,不得换行。每填对一个答案得1分，不填或填错不得分。

4．请认真填写并仔细核对答题卡和答题纸上的学校名称、准考证号和姓名是否填写正确。

第一部分 计算机基础知识

1．信息处理系统是综合使用信息技术的系统。下面有关信息处理系统的叙述中错误的是____1____。

A．信息处理系统从自动化程度来看，有人工的、半自动化的和全自动化的 B．应用领域很广泛。例如银行是一种以感知与识别为主要目的的系统

C．信息处理系统是用于辅助人们进行信息获取、传递、存储、加工处理及控制的

一种系统

D．从技术手段上来看，有机械的、电子的和光学的;从通用性来看，有专片和通用

的

2．下面关于集成电路的叙述中，错误的是 2 。

A．集成电路是20世纪50年代出现的

B．现代集成电路使用的半导体材料通常是硅或砷化镓

C．集成电路的许多制造工序必须在恒温、恒湿、超洁净的无尘厂房内完成

D．集成电路按用途可分为通用和专用两大类。微处理器和存储器芯片都属于专用

集成电路

3．在通信系统的性能指标中， 3 是指数据传输中出错数据占被传输数据总数的比例。

A．信道带宽 B．误码率 C．数据率 D．端-端延

迟

4．以下数据最大的是 4 。

A．01110110B B．120D C．7DH D．177Q 5．从逻辑功能上来讲，计算机硬件主要包括中央处理器（CPU）、内存储器、外存储器、输入设备和输出设备等，它们通过 5 互相连接。

A．总线 B．控制线 C．数据线

D．地址线

6． 6 接口是一种新的I/O接口，它是一种可以连接多个设备的总线式串行接

口，2.0版的数据传输速率可高达480Mb/s（60MB/s），最多可以连接127个设备。

1

A．USB B．IEEE1394 C．SCSI D．并行 7．下列不属于无线局域网设备的是 7 。

A．无线网卡 B．蓝牙 C．无线HUB D．无线网桥 8． FAT16、FAT32、NTFS是三种不同的文件系统，Windows 2000/XP操作系统支持___8___。

A．FAT32 和FAT16文件系统

C．FAT32和NTFS文件系统

统

9．下列关于CD-ROM存储器描述中，错误的是 9 。 A．CD盘上凹坑内表示0，凹坑外表示1

B．CD盘上记录数据的是一条由里向外连续的螺旋道

C．CD-ROM需要记录的信息实现要制作到光盘上，用户不能抹除，也不能再写入 D．CD-ROM成本低，可靠性好，非常耐用，即使盘面有指纹或灰尘存在，数据仍

能读出

10． 10 属于文字处理软件。

A．PageMarker和Word B．Word和3D MAX C．Photoshop和WPS D．Paintbrush和Flash 11．下列属于自由软件的操作系统是 11 。

A．UNIX B．OS/2 C．WINDOWS D．LINUX 12．下列关于操作系统任务管理的说法，错误的是 12 。

A．Windows操作系统支持多任务处理

B．分时是指将CPU时间划分成时间片，轮流为多个程序服务 C．分时处理要求计算机必须配有多个CPU

D．并行处理可以让多个处理器同时工作，提高计算机系统的效率

13．分析某个算法的优劣时，从需要占用的计算机资源角度，应考虑的两个方面是 13 。

A．正确性和简明性 B．空间代价和时间代价 C．可读性和开放性 D．数据复杂性和程序复杂性 14．下列关于病毒的描述中，正确的是 14 。

A．计算机病毒也称为木马

B．邮件病毒很厉害，只要收到带病毒的邮件，不管看不看，计算机都会染上病毒 C．如果一台计算机染上了病毒，它旁边的计算机很有可能被传染，因此两台计算

机之间要有一定的距离

D．计算机病毒是一些人蓄意编制的一种寄生性的计算机程序 15．不能作为广域网的数据传输介质的是 15 。

A．电话线 B．微波 C．双绞线 D．光缆 16．下面对于WWW和Email的说法中，错误的是 16 。

A．网页是一种采用HTML超文本标记语言描述的超文本文档, HTML文档包括头

部和正文两大部分

B．电子邮件一般由三个部分组成：邮件的头部、邮件的正文、邮件的附件

C．现在的电子邮件正文中只能发送普通文本，图片等多媒体信息只能在附件中才

能发送

D．Web是按客户/服务器模式工作的

17．下面关于汉字编码标准的叙述中，正确的是 17 。

A．同一个汉字的不同造型（如宋体、楷体等）在计算机中的内码不同 B．Unicode是我国最新发布的也是收字最多的汉字编码国家标准 C．GB18030与GB2312和GBK汉字编码标准不兼容 D．在GB18030汉字编码国家标准中，共有2万多个汉字

18．适用于交互式多媒体应用，包括虚拟现实、远程教学、交互式电视等的视频压缩标

2

B．NTFS文件系统 D．FAT16、FAT32和NTFS文件系

准是 18 。

A．MPEG-1 B．MPEG-4 C．MPEG-3 19．下列信息系统中 19 属于三次信息的处理系统。

A．管理层业务处理系统 B．信息分析系统 C．专家系统 D．信息检索系统

D．MPEG-2

20．关于Excel 97/2000/2003的数据筛选，下列说法中正确的是 20 。

A．筛选后的表格中只含有符合筛选条件的行，其它行被删除 B．筛选条件只能是一个固定的值

C．筛选后的表格中只含有符合筛选条件的行，其它行被暂时隐藏 D．筛选条件不能由用户自定义，只能由系统确定

第二部分 Visual Basic程序设计

一、选择题（用答题卡答题，答案依次填在21～30答题号内）

21．创建应用程序的界面时，在窗体上设置了一个文本框，运行程序后，文本框没有出现在窗体上，可能的原因是 。

A．该文本框的Value属性被设置为False

B．该文本框的Enabled属性被设置为False

C．该文本框的Visible属性被设置为False D．该文本框的Default属性被设置为True

22．下列不是Visual Basic事件名称的是 22 。

A．Change B．Click C．Scroll D．ChDir 23．由系统提供的，可在任何一个VB程序中随时使用的程序段的函数是 23 。

A．内部函数 B．公共函数 C．逻辑函数 D．关系函数 24．SQL缩写所表示的意思是 24 。

A．开放式容器 B．结构查询语言 C．数据库联接 D．数据库编程

25．Write#语句与Print#语句功能基本相同，它们之间的主要差别之一正确的是 25 。

A．Write#语句写数值型的，而Print#语句写非数值型的

B．如果是字符串数据，Write#语句写数据后在其两边加双引号，而Print#语句没

有

C．Write#语句按紧凑格式写文件，而Print#语句按标准格式写文件 D．Write#语句按标准格式写文件，而Print#语句按紧凑格式写文件

26．Datetime是Data类型的变量，以下赋值语句中错误的是 26 。

A．Datetime=#5/8/03# B．Datetime=#September l,2003# C．Datetime=#10:21:00AM# 27．运行下列程序：

Private Sub Form_Click()

Dim sum As Integer Dim i As Integer

sum = 0

For i = 12.4 To 3.1 Step -3.8 sum = sum + i Next i

Debug.Print sum

3

D．Datetime=\

End Sub

单击窗体后，则在立即窗口上输出结果是 27 。

A．15 B．-0.7 C．24 28．运行下列程序：

Private Sub Command1_Click()

Dim x As Integer, n As Integer n = 0 Do

n = n + 2 x = x + n Loop While n < 10 Debug.Print x

End Sub

单击Command1命令按钮后，则在立即窗口上输出结果是是 28 。 A．2 29．运行下列程序：

B．10

C．12

D．30

D．0

Private Sub Command1_Click() a = 100 b = 24 a = a Mod b b = b \\ a

a = b - a

Debug.Print a End Sub

单击Command1命令按钮后，则在立即窗口上输出结果是 29 。 A．2 B．24 C．50 30．下列程序运行后，信息框显示的内容是 30 。

Private Sub Command1_Click() Dim s1 As String Dim s2 As Integer

s1 = \

s2 = Len(s1) + InStr(1, s1, \ MsgBox s2 End Sub

A．Hello-World\\ B．2003

C．16

D．29

D．100

二、填空题（请将答案填写在答题纸的相应答题号内，每个答案只占一行）（每空1分，

共30分）

1．freefile函数的作用是返回一个可供Open语句使用的，整型数据的 （1） 。 2．执行MyResult = 12.6 Mod 5后，变量MyResult将返回结果是 （2） 。

3．菜单控件的Checked属性用于将复选标记放到菜单项的左侧，以便表示菜单项的 （3） 。

4

4．数组组中的控件通过索引值来区别，设置索引号的属性是 （4） 。 5．InputBox函数来返回值的类型是 （5） 。 6．运行下列程序：

Private Sub Form_Click() Sum = 0

For i = 1 To 100

If Mid(CStr(i), 1, 1) = \ Sum = Sum + 1 End If Next i Print Sum xz

单击窗体后，则在窗体上显示的结果是 （6） 。 7．运行下列程序：

Private Sub Command1_Click() b = 1

Do While b < 20 b = b * b + 1 a = a + b Loop

MsgBox a End Sub

单击Command1命令按钮后，则弹出的消息对话框中显示 （7） 。

8．窗体上有4个文本框控件数组text1()和一个命令按钮，程序运行前如图1所示，程序运行后如图2所示。给定的程序不完整，将程序补充完整。

图1 图2

Dim x(3) As Integer

Private Sub Command1_Click() ）Val(Text1(i).Text) （9）x(i)>x(j)

（10）Len(s1) To 1 Step-1

For i = 0 To 3 x(i) = （8） Next i

For i = 0 To UBound(x) - 1 For j = i To UBound(x) If （9） Then t = x(i) x(i) = x(j)

5

25．B 26．B 27．C 28．D 29．A 30．D

二、填空题： （1）文件号 （2）3 （3）开/关 （4）Index （5）字符串 （6）12 （7）33

（8）Val(Text1(i).Text) （9）x(i)>x(j)

（10）Len(s1) To 1 Step-1 （11）n(k) Mod 2<>0 （12）b^2-4*a*c （13）col>0 （14）b<>0 （15）Cls

（16）String(i,\（17）7 （18）2.2 （19）6.6 （20）26.4 （21）j=1 （22）k=1 （23）p=1 （24）Max=b(n) （25）3 （26）1 （27）1 （28）FreeFile （29）fn （30）Str

11

江苏省高等学校非计算机专业学生 计算机基础及应用能力等级考试试卷

二级Visual Basic全真模拟试卷二

（本试卷包括计算机基础知识部分和程序设计部分，考试时间共120分钟）

说明：

1．本试卷满分为60分，分选择题和填空题，试卷不分A、B类型。

2．选择题用答题卡答题。每一项有A、B、C、D四个可供选择的答案，请选择其中一个你认为正确的答案，用HB铅笔涂写在答题卡的相应答题号内。每选对一项得1分，不选或选错不得分。

3．填空题用答题纸答题。请将答案填写在答题纸的相应答题号内，每个答案只占一行,不得换行。每填对一个答案得1分，不填或填错不得分。

4．请认真填写并仔细核对答题卡和答题纸上的学校名称、准考证号和姓名是否填写正确。

第一部分 计算机基础知识

1．下列关于“信息系统”的叙述中错误的是 1 。

A．图书馆是一种以信息收藏和检索为主的系统 B．雷达是一种以感知与识别为主要目的的系统 C．信息系统可以有人工的，也可以有自动的 D．电视系统是一种双向的、点到点的信息系统 2．下列叙述中，错误的是 2 。

A．微电子技术以集成电路为核心

B．硅是微电子产业中常用的半导体材料 C．现代微电子技术已经用砷化镓取代了硅 D．制造集成电路都需要使用半导体材料

3．下面对于多路复用技术的说法中，正确的是 3 。

A．将同一信号沿多条线路传输，以提高可靠性 B．将同一信号多次传输，以提高正确率

C．将多路信号沿同一条线路传输，以提高利用率 D．可分为时分和频分多路复用两种 4．十进制算式3×512+7×64+5的运算结果对应的二进制数是 4 。

A．11111101001 B．11111000101 C．11111100101 D．11000111101

5．从逻辑功能上来讲，计算机硬件主要包括 5 、内存储器、外存储器、输入设备和输出设备等，它们通过总线互相连接。

A．中央处理器 B．控制器 C．运算器 D．寄存器 6．现在PC机上常用的总线是1991年开始使用的 6 局部总线。

A．ISA B．EISA C．PCI D．AGP 7． 7 文档最重要的特性是它能支持超链。链源可以是文本中的任何一个字、词或句子，甚至可以是一幅图象。链宿可以是另一个Web服务器上的某个信息资源，也可以是文本内部标记书签的某个地方。

12

A．TELNET B．HTML C．URL D．WWW 8．CPU中有一个程序计数器（又称指令计数器），它用于存放 8 。

A．下一条要执行的指令的内存地址 B．正在执行的指令的内容 C．下一条要执行的指令的内容 D．正在执行的指令的内存地址 9．关于PC机组成，下列说法错误的是 9 。

A．CPU和存储器芯片分别通过主板上的CPU插座和存储器插座安装在主板上 B．PC机常用的外围设备主要通过一些扩充卡（如声音卡、视频卡等）与主板相连

C．CRT显示器通过插入AGP插槽的图形卡与主板相连 D．扩充卡的功能不能集成在主板上 10． 10 属于绘图软件。

A．Word和FrameMaker B．AutoCAD和Foxmail

C．Photoshop和CoreDraw D．PageMaker和Dreamweaver 11．下面对于操作系统的一些说法，正确的是 11 。

A． 文件管理可以实现文件的共享、保密和保护 B．“虚拟内存”其实是外存

C．用户必须了解设备及接口的技术细节才能使设备和计算机协调工作 D．作业管理的任务主要是管理内存资源的合理使用 12．下面关于Windows的说法中，错误的是 12 。

A．Windows采用并发多任务方式支持系统中多个任务的执行 B．Windows可以在任何一台计算机上运行

C．Windows 2000 server不是目前Windows系列操作系统的最新版本 D．Windows XP既适合家庭用户，也适合商业用户 13．实现算法所需的存储单元多少称为算法的 13 。

A．可实现性 B．困难度 C．空间复杂度 D．时间复杂度

14．适用于DVD、高清晰度电视的视频压缩标准是 14 。 A．MPEG-4 B．MPEG-1 C．MPEG-3 D．MPEG-2 15．目前我国家庭计算机用户接入互联网的下述几种方法中，最快的是 15 。

A．电话拨号 B．ADSL C．一线通 D．光纤入户 16．已知接入Internet网的计算机用户为jkf，而连接的服务商主机名为seu.edu.cn，则他相应的E-mail地址为 16 。

A．seu.edu.cn@jkf B．jkf@seu.edu.cn C．@jkfseu.edu.cn D．jkf.seu@edu.cn

17．按照汉字的“输入?处理?输出打印”的处理流程，不同阶段使用的汉字编码分别对应为 17 。

A．国标码?交换码?字形码 B．输入码?国标码?机内码 C．输入码?机内码?字形码 D．拼音码?交换码?字形码 18．下列关于图像的说法，错误的是 18 。

A．尺寸大的彩色图片数字化后，其数据量必定大于尺寸小的图片的数据量 B．图像的数字化过程大体可分为四步：扫描、取样、分色、量化 C．像素是构成图像的基本单位

D．黑白图像或灰度图像只有一个位平面 19．计算机信息系统（简称“信息系统”）是一类以提供信息服务为主要目的的数据密集型、人机交互的计算机应用系统。在下列有关信息系统的叙述中，错误的是 19 。

A．在信息系统中，绝大多数数据是持久的，不随程序运行的结束而失效 B．信息系统开发方法有多种，例如生命周期法、原型法等

C．MRPⅡ的英文说法是Material Requirement Planning Ⅱ，制造业物料需求计划

Ⅱ

13

D．电子商务，简称EC，是指对整个贸易活动实现电子化

20．在使用Excel 97/2000/2003处理数据时，下列叙述中正确的是 20 。

A．单元格的引用分为绝对引用和相对引用两种 B．一个工作表最多有65536行，256列 C．一个工作簿中可以无工作表

D．在Excel中输入公式后，该表达式的计算结果就被存储在单元格中

第二部分 Visual Basic程序设计

一、选择题（用答题卡答题，答案依次填在21～30答题号内）

21．若需要在同一窗口内安排两组相互独立的单选按钮（OptionButton），适当的控件将它们分隔开。下列不能将单选按钮分组的控件是 21 。

① TexBox ②PictureBox ③ Image ④Frame ⑤ListBox

A．①②③ B．①③⑤ C．②④⑤ D．③④⑤

22．Visual Basic指定参数x的自然对数值，返回一个Double的函数是 22 。 A．Log(x) B．Lg(x) C．Exp(x) 23．运行程序时，显示下图1内容的语句是 23 。

A．b = InputBox(\输入一个整数\程序示例\

B．b = InputBox(\程序示例\输入一个整数\C．b = MsgBox(\输入一个整数\程序示例\D．b = MsgBox(\程序示例\输入一个整数\

D．Ln(x)

图1

24．各种运算符间的优先顺序，从高到低是 24 。

A．比较运算符→算术运算符→逻辑运算符

B．比较运算符→逻辑运算符→算术运算符 C．算术运算符→比较运算符→逻辑运算符 D．算术运算符→逻辑运算符→比较运算符

25．将表达式转换为Double类型的函数是 25 。

A．Cbool B．Cbyte C．Cdbl 26．运行下列程序：

Private Sub Form_Click()

Dim sum As Double, i As Integer For i = 1 To 20 If i Mod 5 = 0 Then sum = sum + i End If Next i Print sum End Sub

14

D．Cstr

单击窗体后，则在窗体上显示的结果是 26 。 A．50 B．100 C．4 27．如果在立即窗口中执行以下操作：

x=1 '表示回车，下同 y=2

Print x > y 则输出结果是 27 。 A． -1 B．1 C．False 28．运行下列程序：

Private Sub Form_Click()

a = 32: b = 5 Do

a = a / 2 b = b + 1 Loop While b < 10 Print a

End Sub

单击窗体后，则在窗体上显示的结果是 28 。

A．1 B．2 C．5 29．运行下列程序：

Option Base 1

Private Sub Form_Click() y = 43

x = Array(21, 4, 50, 18, 23, 44, 87, 32, 67, 70) For i = 1 To 10 If x(i) < y Then z = x(i) + 1 y = x(i) Else

z = z + y End If Next i Print z End Sub

单击窗体后，则在窗体上显示的结果是 29 。

A．43 B．21 C．37 30．运行下列程序：

Private Sub form_Click() t = Val(InputBox(\请输入一个数：\ x = t - 1 Select Case t Case 1 To 10 y = 4 * t Case Is > 10

D．5050

D．True

D．11

D．44

15

二级Visual Basic全真模拟试卷二参考答案 一、选择题： 1．D 2．C 3．C 4．B 5．A 6．C 7．B 8．B 9．D 10．C 11．A 12．B 13．C 14．D 15．D 16．B 17．C 18．A 19．C 20．B 21．B 22．A 23．B 24．C 25．C 26．A 27．C 28．A 29．C 30．A 二、填空题： （1）?

（2）工程执行全编译 （3）双精度浮点数 （4）Cbool （5）MultiLine （6）13 （7）14 （8）13 （9）Main:2 2 3 （10）15 （11）78

21

（12）fun1(x,y)

（13）a

（14）fun1=b

（15）0 To 9

（16）flg=1

（17）a+b<>sum

（18）flg=1

（19）a=2/t

（20）Exit Do

（21）s=CStr(i)

（22）Exit For

（23）sum1=0

（24）2001

（25）87

（26）2002

（27）True

（28）ReDim s(t)

（29）String(2*i+1,\

（30）Print s(i)

22

江苏省高等学校非计算机专业学生 计算机基础及应用能力等级考试试卷

二级Visual Basic全真模拟试卷三

（本试卷包括计算机基础知识部分和程序设计部分，考试时间共120分钟）

说明：

1．本试卷满分为60分，分选择题和填空题，试卷不分A、B类型。

2．选择题用答题卡答题。每一项有A、B、C、D四个可供选择的答案，请选择其中一个你认为正确的答案，用HB铅笔涂写在答题卡的相应答题号内。每选对一项得1分，不选或选错不得分。

3．填空题用答题纸答题。请将答案填写在答题纸的相应答题号内，每个答案只占一行,不得换行。每填对一个答案得1分，不填或填错不得分。

4．请认真填写并仔细核对答题卡和答题纸上的学校名称、准考证号和姓名是否填写正确。

第一部分 计算机基础知识

1．数据通信中的数据传输速率是最重要的性能指标之一，它指单位时间传送的二进位数目，下面是一些计量单位

（1）Kb/s （2）MB/s （3）Mb/s （4）Gb/s 其中常用的是 1 。

A．（1） B．（2）和（4） C．（1）、（2）、（3）和（4） D．（1）、（3）和（4） 2．下面有关于微电子技术的说法，错误的是 2 。

A．集成电路将永远遵循Moore定律 B．IC卡是“集成电路卡”的缩写

C．现代PC机所使用的电子元件都是超大规模和极大规模集成电路 D．现代集成电路使用的半导体材料通常是硅（Si） 3．下列关于PC机主板的叙述中，错误的是 3 。

A．CPU和RAM存储器均通过相应的插座安装在主板上

B．芯片组是主板的重要组成部分，所有控制功能几乎都集成在芯片组内 C．软盘驱动器也安装在主板上 00011001 D．为便于安装，主板的物理尺寸已标准化 4．已知X的补码为10011000，其原码为 4 。

A．11101000 B．11100111 C．10011000 D．11100110 5． 5 是一种新型的非易失性存储器，但又像RAM一样能快速方便地写入信息。

A．DRAM B．FlashRAM C．SRAM D．CACHE 6．下列4项中，错误的IP地址是 6 。 A．202.22.201.10

D．111.57.0.49

B．60.268.24.128

C．123.45.67.09

7．一幅1280×1024的24位真彩色图像，如果未经压缩，则它的数据量为 7 。

A．3.75MB B．768KB C．24KB D．1.44MB 8．目前许多外部设备（如打印机、数码相机、扫描仪等）采用了USB接口。下面关于

23

USB的叙述中，错误的是 8 。

A．USB接口有两种规格，2.0版的数据传输速度要比1.1版快得多 B．主机不能通过USB连接器引脚向外设供电 C．利用“USB集线器”，一个USB接口能连接多个设备 D．USB属于一种串行接口

9．下列说法中，错误的是 9 。

A．硬盘安装在机箱内，属于主机的组成部分

B．硬盘驱动器和盘片是密封在一起的，不能随意更换盘片的 C．硬盘是多张盘片组成的盘片组

D．硬盘的技术指标除容量外，另一个是转速

10． 下列属于应用软件的是 10 。

①Word ②Windows XP ③Linux

④Visual Basic ⑤MSN Messenger 7.5 ⑥图书管理系统 A．①③④⑤ B．①④⑤⑥

C．①⑤⑥ D．①⑥

11．在下列有关Ｗindows98／2000／XP操作系统的叙述中，错误的是 11 。 A．它们都支持即插即用（ＰnＰ）功能 B．它们都支持支持FAT32文件系统

C．优盘中被删除的文件可从―回收站‖中回复出来 D．它们都是32位操作系统

12．下列各条中，对计算机操作系统的作用完整描述的是 12 。

A．它是用户与计算机的界面

B．它对用户存储的文件进行管理，方便用户

C．它管理计算机系统的全部软、硬件资源，合理组织计算机的工作流程，以达到

充分发挥计算机资源的效率，为用户提供使用计算机的友好界面

D．它执行用户键入的各类命令

13．比较算法和程序，以下说法中正确的是 13 。

A．程序中的指令和算法中的运算语句都必须用高级语言表示 B．算法和程序都必须满足有穷性

C．算法可采用“伪代码”或流程图等方式来描述 D．算法就是程序

14． 14 由两部分组成，第一部分指出客户端希望得到主机提供的哪一种服务，第二部分是主机名和网页在主机上的位置。

A．HTTP B．TELNET C．URL D．WWW 15．在数据库系统中，最常用的一种基本数据模型是关系数据模型。在这种模型中，表示实体集及实体集之间联系的结构是 15 。

A．网络 B．图 C．二维表 D．树 16．发送邮件时，邮件传送程序必须与远程的邮件服务器建立TCP连接，并按照 16 协议传输邮件。如果接受方邮箱在服务器上确实存在，才进行邮件的发送，以确保邮件不会丢失。

A．POP3 B．TCP C．SMTP D．IP

17．在中文Windows 98/2000/XP环境下，设有一段文本，该文本中有4个汉字和2个西文字符，则这段文字的内码，最有可能是 17 。

A．CB F5 D0 B4 50 B．9B 95 90 94 50 43 8A 87 D6 B8 C．CB 45 D0 B4 50 43 CA C7 46 B8 D．CB F5 D0 B4 50 43 CA C7 D6 B8 18．在下列有关声卡的描述中，错误的是 18 。

24

A．声卡的主要功能是控制波形声音和MIDI声音的输入输出 B．波形声音的质量与量化位数、采样频率有关

C．声卡中数字信号处理器在完成数字声音的解码及编辑操作中起着重要作用 D．声卡所要求的数据率不高，用ISA 总线进行传输 19．信息分析系统是一种高层次的信息系统，为管理决策人员掌握企事业单位运行规律和趋势、制订规划、进行决策的辅助系统，可分为 19 和经理支持系统。

A．信息处理系统 B．决策支持系统 C．学生信息系统 D．图书管理系统

20．在使用Excel 97/2000/2003处理数据时，下列叙述中不正确的是 20 。

A．在Excel中提供了许多内置函数, 函数范围包括数据库、数学和三角函数、查

询与引用函数等

B．在默认情况下，每一个工作簿文件会打开3个工作表文件，分别以Sheet1、Sheet2、

Sheet3来命名

C．每个工作表中的行和列数量是没有限制的

D．在Excel中，输入公式前要先输入一个等号“＝”才行

第二部分 Visual Basic程序设计

一、选择题（用答题卡答题，答案依次填在21～30答题号内）

a?b1?21．代数式

A．sqr((1+(s+t)/(x+y))/log(s)) B．(1+(s+t)/(x+y))/log(s)/2 C．sqr((1+(s+t)/(x+y))/ln(s)) D．sqr((1+s+t/x+y)/log(s))

22．设变量D为Date型、A为Integer型、S为String型、L为Long型，下面赋值语句中不能执行的是 22 。

A．D=#11:30:00 PM# B．A= \C．S=Date D．L=\

23．在窗体上有一个框架框(名称为Frame1)，一个计时器(名称为Timerl)，计时器的时间间隔属性Interval=100，在图片框中有一个复选按钮(名称为Check1)和一个命令按钮(名称为Command1)，用户界面如图1所示。

c?dln(a)对应的Visual Basic6.0表达式是 21 。

图1

其中，计时器有Timer1_Timer事件过程如下：

Private Sub Timer1_Timer()

If Frame1.Left >= Form1.Width Then Frame1.Left = 0 Frame1.Move Frame1.Left + 50 End Sub

运行后，窗体中的现象是 23 。

A．仅框架框移动

B．框架框携带复选按钮和命令按钮同时移动

25

C．框架框携带复选按钮同时移动 D．框架框携带命令按钮同时移动

24．Loc函数作用是，返回一个 24 。

A．Long型数据，在已打开的文件中指定当前读／写位置 B．Long型数据，计算其文件长度 C．Integer型数据，表示文件号的范围

D．Long型数据，表示用Open语句打开的文件的大小 25．文件操作的一般顺序是 25 。

A．操作→关闭文件

B．打开文件→操作→关闭文件 C．打开文件→操作

D．打开文件→关闭文件→操作 26．运行下列程序：

Private Sub Form_Click() For i = 0 To 2

Print Tab(4 - i); String(i * 2 + 1, \ Next i Print End Sub

单击窗体后，则在窗体上显示的结果是 26 。

A．AAA B． AAA AAA AAA AAA AAA C． A D．AAA AAA AAA AAAAA AAA 27．运行下列程序：

Private Sub form_Click()

x = InputBox(\请输入一个数：\ Select Case x

Case Is > 0: y = x + 1: x = y + 1 Case Is = 0: y = x + 2: x = y + 2 Case Else: y = x + 3: x = y + 3 End Select Print x; y End Sub

从键盘输入1，输出的结果是 27 。

A．3 2 B．2 3 C．2 2 D．1 4 28．在当前窗体有一个文本框Text1，在D盘的根目录存在数据文件data.txt，数据文件的内容是

abc 10 20 30 efg 40 50 60

若运行程序，要在文本框中显示的内容是 28 。

Private Sub Form_Click()

Open \ Do Until EOF(10)

Line Input #10, lines

Text1.Text = Text1.Text + Mid(lines, 5, 2) Loop Close #10 End Sub A．abc B．1040 C．efg D．10 20 29．运行下列程序：

Private Sub form_Click()

26

Dim x x = 0

Do While x < 10 x = x + 3 Loop

MsgBox x End Sub

单击窗体后，则在窗体上显示的结果是 29 。

A．0 B．3 C．10 30．运行下列程序：

Private Sub form_Click()

s = InputBox(\请输入一个字符A：\ Select Case Asc(s) Case Is > 65

n = String(3, UCase(s)) Case Is = 65

n = String(3, LCase(s)) Case Else n = s End Select Print n End Sub

从键盘输入A，输出的结果是 30 。

A．aaa B．AAA C．65

D．12

D．a

二、填空题（请将答案填写在答题纸的相应答题号内，每个答案只占一行）（每空1分，

共30分）

1．由Visual Basic系统中，引发事件的对象叫做 （1） 。 2．在VB6.0中，CInt(-3.4)的函数值是 （2） 。 3．Stretch的属性只使用于 （3） 控件。

4．在用Open语句打开文件时，设定为二进制访问模式是 （4） 。

5．指示复选框处于选定、未选定或禁止状态(暗淡的)中的属性是 （5） 。 6．下列程序运行时，单击鼠标的右键时，窗体上打印出的数值是 （6） 。

Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As

Single)

Cls

Print Button End Sub

7．下列程序运行后，输出的图形是一个 （7） 。

Private Sub Form_Click() Dim Cx, Cy

Cx = ScaleWidth / 2 Cy = ScaleHeight / 2

Line (Cx, 0)-(Cx, ScaleHeight) Line (0, Cy)-(ScaleWidth, Cy) End Sub 8．运行下列程序,单击Command1命令按钮后，则在窗体上显示第一行和第二行的结果分别是 （8） 和 （9） 。

Private Sub Command1_Click() t = 1: x = 2: y = 3: z = 4

If t > 0 Or t = x And x <> y Or y > z Then

27

t = fun1(t, z)

Print t Else

t = fun1(x, y) Print t

End If Print x Print y End Sub

Function fun1(ByVal x As Integer, ByVal y As Integer) As Integer Do While y <> 0 t = x \\ y x = y y = t Loop

fun1 = x End Function 9．当下列程序运行，单击窗体后，分别输入72和24，信息框上显示的结果是 （10） 。

Private Sub Form_Click() Dim x As Integer, y As Integer

x = Val(InputBox(\输入整数72\y = Val(InputBox(\输入整数24\z = fun1(x, y) MsgBox Str(z)

End Sub

Private Function fun1(ByVal a As Integer, ByVal b As Integer) As Integer Do

r = a Mod b a = b b = r Loop Until r = 0 fun1 = a

End Function 10．运行下列程序，单击窗体后，则在窗体上显示第一行和第二行的结果分别是 （11） 和 （12） 。

Private Sub Form_Click() x = 3: y = 7: z = 2: t = 5 Do

y = y + x x = x + y

Call sub1(x, y, z, t) Print x; z; t Loop While x < 54 End Sub

28

Private Sub sub1(x, y, z, ByVal w) z = x y = z

w = x + y + z x = w End Sub 11．下列程序运行后，在窗口显示结果的第二行和第三行分别是 （13） 和 （14） 。

Option Base 1

Private Sub Command1_Click() Dim a

a = Array(1, 2, 3, 4, 5) Call sub1(a, 3) For i = 1 To 5 Print a(i) Next i End Sub

Public Sub sub1(x, n) If n > 1 Then t = x(1)

x(1) = x(n - 1) x(n - 1) = t

Call sub1(x, n - 1) End If End Sub

12．下列程序的窗口上有一个列表框List1，程序运行单击窗体后列表框最后一行的值为 （15） ，List1.ListCount的值为 （16） 。

Option Base 1

Private Sub form_Click() For i = 1 To 10

List1.AddItem i Next i Sum = 0

For i = 0 To List1.ListCount - 1 Sum = Sum + List1.List(i) Next i

List1.AddItem Sum End Sub

13．下列程序运行后，在对话框内输入4后，结果如图2所示。给定的程序不完整，将程序补充完整。

图2

Private Sub form_Click() Dim s() t = Val(InputBox(\请输入整数4\ k = 2 * t （17）

29

For i = 0 To 2 * t Select Case i

Case Is = 0, 2 * t

s(i) = String(2 * t, \ （18） Case Is < t

s(i) = String(k, \ Case Else

s(i) = String(i, \ End Select （19） Next i

For i = 0 To 2 * t Print s(i) Next i End Sub

14．有下列程序，利用下列公式，即级数求和的方法，求cos(x)值。

计算精度为1×10。程序运行后的结果如图3所示。给定的程序不完整，将程序补充完整。

－6

cos(x)?1?x22!?x44!?x66!??

图3

Option Base 1

Private Sub Command1_Click()

Dim x As Single, n As Long, sum As Single x = Val(Text1.Text) sum = 1 k = -1

n = 2

（20） Do

s = s * x * x t = s / fun1(n) sum = sum + k * t n = n + 2

k = （21） Loop Until t < 0.000001 Text2.Text = sum End Sub

Private Function fun1(n As Long) As Long Dim i As Long If n = 0 Or n = 1 Then （22）

30

A．1280×960 B．1600×1200 C．2048×1536 D．2592×1944

8． 8 音乐与高保真的波形声音相比，虽然在音质方面还有一些差距，也无法合成出所有各种不同的声音，但它的数据量很少，又易于编辑修改，还可以与波形音乐同时播放。

A．MIDI B．Rel C．MPEG D．JPEG 9．如果一个图像的颜色深度为24，这该图像能表示的最大颜色数目为 9 。

A．24种 B．256种 C．1千6百多万种 D．10亿种以上 10．下列应用软件中___10___属于网络通信软件。

A．FrameMaker 7.0 B．Flash C．Outlook Express D．Frontpage 11．虚拟存储系统能够为用户程序提供一个容量很大的虚拟地址空间，但其大小有一定的范围，它受到___11__的限制。

A．内存容量大小

B．外存空间及CPU地址表示范围 C．交换信息量大小 D．CPU时钟频率

12．下列关于PC机的叙述中，下面说法中正确的是 12 。

A．CMOS中存放着基本输入/输出系统（BIOS） B．PC机只能安装MS-DOS或Windows操作系统

C．PC机主板型号与CPU型号是一一对应的，不同的主板对应不同的CPU D．CMOS芯片需要一个电池给它供电，否则其中数据会因主机断电而丢失 13．算法是问题求解规则的一种描述，下面哪些选项属于其基本性质 13 。

A．确定性、有穷性、能行性、输入、输出 B．确定性、无穷性、能行性、输入、输出 C．不确定性、无穷性、能行性、输入、输出 D．不确定性、有穷性、能行性、输入、输出 14．计算机网络是利用通信设备和网络软件，把地理位置分散而 14 的计算机（及智能设备）以相互共享资源和进行信息传递为目的连接起来的一个系统。

A．相互连接 B．功能齐全 C．功能独立

D．价格便宜

15．关于有线电视电缆调制解调技术的描述中，正确的是 15 。

A．使用电缆调制解调技术，上网速度很快，但在上网的同时不能看电视

B．电缆调制解调技术是多用户共享带宽，用的人多了，单个用户的速度会下降 C．使用电缆调制解调技术非常的方便，只要有有线电视的地方就能上网 D．电缆调制解调器的下载速度快，上传速度慢 16．通过Internet发送或接收电子邮件(E-mail)的首要条件是应该有一个电子邮件(E-mail)地址，它的正确形式是 16 。

A．用户名#域名 B．用户名@域名 C．用户名/域名 D．用户名.域名

17．微软公司自Windows 95简体中文版始，系统采用 17 代码，该代码共收录汉字21003个、符号883个，并提供1894个造字码位，简、繁体字融于一库。

A．UCS B．BIG5 C．GBK D．CJK

18．目前，数据相机所采用的既支持无损压缩又支持有损压缩的图像文件格式是 18 。

A．TIF B．JPEG C．BMP D．GIF

19．用于辅助人们进行信息获取、传递、存储、加工处理、控制及显示的综合使用各种信息技术的系统，可以通称为 19 。

A．自动办公系统 B．信息管理系统

36

C．信息处理系统 D．人工智能系统 20．在电子表格软件Excel环境下，下列叙述中不正确的是 20 。

A．在一个单元格内最多可以存放255个西文字符

B．在输入由数字组成的字符输入项时，应为数字字符串加双引号 C．利用“填充柄”可向单元格输入系列数据

D．单元格引用分为相对引用、绝对引用和混合引用

第二部分 Visual Basic程序设计

一、选择题（用答题卡答题，答案依次填在21～30答题号内）

21．在 Select Case a结构中，描述判断条件 1 ≦ a ≦ 10 的测试项应该写成 21 。

A．Case 1 <= a <= 10 B．Case 1 ≦ a And a ≦ 10 C．Case Is >= 10 or Is >= 1 D．Case 1 To 10

22．用Hide方法隐藏窗体时，它就从屏幕上被删除，并将其Visible属性设置为 22 。

A．1 B．0 C．False D．True

23．Lof函数作用是，返回一个 23 。

A．Long型数据，在已打开的文件中指定当前读／写位置

B．Long型数据，表示用Open语句打开的文件的大小 C．Integer型数据，表示文件号的范围

D．Boolean型数据，表明是否已经到文件的结尾

24．以下四个控件中具有Pattern属性的是 24 。

A．目录列表框 B．驱动器列表框 C．文件列表框

D．列表框

25．为菜单上访问键被显示成带下划线的字母，请在要作为访问键的字母前面键入一个

25 号。

A．\ B．\ C．\ 26．运行下列程序：

Private Sub Command1_Click() x = 3

If x < 3 Then Print x + 3; If x < 4 Then Print x + 4; If x < 5 Then Print x + 5; If x < 6 Then Print x + 6; Print End Sub

单击Command1命令按钮后，则在窗体上显示的结果是 26 。

A．6 7 8 9 B．7 8 9 C．8 9 27．运行下列程序：

Private Sub Command1_Click() s$ = \ k = InStr(s$, \ Do While k > 0 n = n + 1

s$ = Mid(s$, k + 1) k = InStr(s$, \ Loop Print n End Sub

单击Command1命令按钮后，则在窗体上显示的结果是 27 。

D．\

D．9

37

A．1 B．2 C．3 D．4 28．运行下列程序：

Private Sub Command1_Click() s1 = \

For i = 1 To Len(s1) t = Mid(s1, i, 1)

s2 = s2 + Chr(Asc(t) + 1) Next i

Debug.Print s2 End Sub

单击Command1命令按钮后，则在立即窗口上输出结果是 28 。

A．Cbtjd B．65 C．Basic D．出错 29．运行下列程序：

Private Sub Command1_Click() x = \祝你成功\ y = \ For i = 1 To 4

z = z + Mid(x, i, 1) + Left(y, 1) Next i Print z End Sub

单击Command1命令按钮后，则在窗体上显示的结果是 29 。

A．祝你成功1234 B．祝1你2成3功4 C．1234祝你成功 D．祝1你1成1功1 30．运行下列程序：

Private Sub Command1_Click() x = 1

z = InputBox(\请输入一个整数2\ Select Case z Case Is > 0 y = x + 1 Case Is = 0 y = x - 2 Case Else y = x + 5 End Select Print x; y End Sub

从键盘输入2，输出的结果是 30 。

A．0 1 B．1 2 C．1 3 D．5 5 二、填空题（请将答案填写在答题纸的相应答题号内，每个答案只占一行）（每空1分，

共30分）

1．将一表达式转成Byte类型的函数是 （1） 。

2．解锁Unlock语句的功能是释放由 （2） 设置的对一个文件的多重访问保护。 3．为了改变Label控件中显示的文本，可使用 （3） 属性。

4．第一次显示某窗体时，将引发Initialize、Activate和Load三个事件，最先引发的事件是 （4） 事件。

5．窗体上有一个shape控件，其shape属性设置为2-Oval，则显示为一个 （5） 图形。

6．下列程序的执行结果是 （6） 。

Private Sub Form_Click()

38

Dim s As Integer, k As Integer s = 1: k = 1

Do While k < 10 s = s + k k = k + 1 Loop Print s End Sub

7．下列程序程序单击窗体后，则在窗体上的text1和text2中的内容分别是 （7） 和 （8） 。

Private Sub Form_Click() Dim s As Variant, s1 As String s = #5/24/2003# Text1.Text = Day(s)

s1 = CStr(s)

s1 = Left(s1, 1) + Space(3) + Right(s1, 1) Text2.Text = s1

End Sub

8．下列程序的功能是，找出1～10之间所有的因子之和，并在图片框Picture1中显示出来，如图1所示。给定的程序不完整，将程序补充完整。

图1

Private Sub form_Click()

Dim a() As Integer, Id As Integer For I = 1 To 10

Picture1.Print I; \ （9）

For j = 2 To I - 1

If I Mod j = 0 Then

Id = Id + 1

ReDim Preserve a(Id) a(Id) = j End If Next j

For j = 1 To Id （10） Next j

Picture1.Print

39

Next I

End Sub

9．给定程序其功能是：建立并打印主对角线的元素为1外，主对角线之上的元素为5，主对角线之下的元素为0的方阵，如图2所示。给定的程序不完整，将程序补充完整。

图2

Option Base 1

Private Sub Form_Click() Dim A(5, 5) For i = 1 To 5

For j = 1 To 5 If i = j Then

（11）

ElseIf （12） Then A(i, j) = 5 Else

A(i, j) = 0 End If Next j Next i

For i = 1 To 5

For j = 1 To 5 Print A(i, j); Next j

（13） Next i End Sub

10．1955年，卡普耶卡(D.R.Kaprekar)研究了对四位数的一种变换：任给出四位数k0，用它的四个数字由大到小重新排列成一个四位数m，再减去它的反序数rev(m)，得出数k1=m-rev(m)，然后，继续对k1重复上述变换，得数k2。如此进行下去，卡普耶卡发现，无论k0是多大的四位数，只要四个数字不全相同，最多进行7次上述变换，就会出现四位数6174。例如：k0=5298，k1=9852-2589=7263，k2=7632-2367=5265，k3=6552-2556=3996，k4=9963-3699=6264，k5=6642-2466=4176，k6=7641-1467=6174。给定下列程序实现其功能。给定的程序不完整，将程序补充完整。

Option Base 1

Private Sub Form_Click() Dim n(4) As Integer Randomize

k = （14） m = 0 Do

Print k

For i = 1 To 4

n(i) = k Mod 10 （15） Next i

For i = 1 To 3 For j = i To 4

40