1、二级 VISUAL+BASIC 笔试-273 及答案解析(总分：100.00，做题时间：90 分钟)一、选择题(总题数：35，分数：70.00)1.在窗体上画一个命令按钮 command1 和两个文本框，名称分别为 Text1 和 Text2。编写如下两个事件过程：Dim Str1 As String，str2 As StringPrivate Sub form_load()Text1.Text=“ “Text2.Text=“ “Text1.Enabled=FalseText2.Enabled=FalseEnd SubPrivate Sub Form_KeyPress(KeyAscii As
2、Integer)str1=str1 str1; “str2 =“; str2End SubFu10.当文本框 ScrollBars 属性设置了非零值，却没有效果，原因是（分数：2.00）A.文本框中没有内容B.文本框的 MultiLine 属性为 FalseC.文本框的 MultiLine 属性为 TrueD.文本框的 Locked 属性为 True11.下面的数组声明语句中正确的是（分数：2.00）A.Dim gg1，5As StringB.Dim gg1 To 5，1 To 5As StringC.Dim gg(1 To 5)As StringD.Dim gg1：5，1：5As Strin
3、g12.以下各项中，Visual Basic 不能接收的图形文件是（分数：2.00）Aico 文件Bjpg 文件Cpsd 文件Dbmp 文件13.一个关系中属性个数为 1 时，称此关系为（分数：2.00）A.对应关系B.单一关系C.一元关系D.二元关系14.下列程序段，在运行时最后输出的内容是a=2c=1AAA：c=c + aIf c10 ThenPrint cGoTo AAAElsePrint “10 以内的奇数显示完毕“End If（分数：2.00）A.3B.7C.9D.10 以内的奇数显示完毕15.完全不考虑程序的内部结构和内部特征，而只是根据程序功能导出测试用例的测试方法是（分数：2.
4、00）A.黑箱测试法B.白箱测试法C.错误推测法D.安装测试法16.最简单的交换排序方法是（分数：2.00）A.快速排序B.选择排序C.堆排序D.冒泡排序17.栈通常采用的两种存储结构是（分数：2.00）A.顺序存储结构和链式存储结构B.散列方式和索引方式C.链表存储结构和数组D.线性存储结构和非线性存储结构18.相对于数据库系统，文件系统的主要缺陷有数据关联差、数据不一致性和（分数：2.00）A.可重用性差B.安全性差C.非持久性D.冗余性19.下列程序执行的结果为x=25：y=20： z=7Print“S(“；x+2*y；“)“（分数：2.00）A.S(47)B.S(165)C.S(25+
5、7*20)D.S(87)20.设有数组定义语句：Dim a(5)As Integer，List1 为列表框控件。下列给数组元素赋值的语句错误的是（分数：2.00）A.a(3)=3B.a(3)=InputBox(“input data“)C.a(3)=List1.ListIndexD.a=Array(1，2，3，4，5，6)21.如果在 c 盘当前文件夹下已存在名称为 studata.dat 的顺序文件，那么执行语句 Open“ c:/ studata.dat“ For Append As #1 之后，将（分数：2.00）A.删除文件中原有内容B.保留文件中原有内容，并在文件尾填加新内容C.保留
6、文件中原有内容，并在文件头填加新内容D.以上均不对22.在窗体上画一个通用对话框，其名称为 CommonDialogl，然后画一个命令按钮，并编写如下事件过程。Private Sub Command1_Click()CommonDialog1.Flags=vbOFNHideReadOnlyCommonDialog1.Filter=“All Files(*.*)|*.*|Text Files(*.txt)|*.txtCommonDialog1.FilterIndex=1CommonDialog1.ShowOpenMsgBox CommonDialog1.FileNameEnd Sub程序运行后，
7、单击命令按钮，将显示一个“打开”对话框，此时在“文件类型”框中显示的是（分数：2.00）A.All Files(*.*)B.Text Files(*.txt)C.*.txtD.All Files(*.*)|Text Files(*.*)23.窗体文件的扩展名是（分数：2.00）AbasBclsCfrmDres24.为用户与数据库系统提供接口的语言是（分数：2.00）A.高级语言B.数据定义语言(DDL)C.数据操纵语言(DML)D.汇编语言25.保存一个工程至少应保存两个文件，这两个文件分别是（分数：2.00）A.文本文件和工程文件B.窗体文件和工程文件C.窗体文件和标准模块文件D.类模块文件
8、和工程文件26.下列程序段的执行结果为m=1n=1Select Case mCase 1Select Case nCase 0print “A“Case 1Print “B“End SelectCase 2Print “C“End Select（分数：2.00）A.AB.BC.CD.027.有如下事件过程。Private Sub Form_KeyDown(KeyCode As Integer，Shift As Integer)If(Button And 3)=3 ThenPrint “OK“End IfEnd Sub程序运行后，为了在窗体上输出“OK”，应当按下的鼠标键是（分数：2.00）A.
9、左键B.右键C.同时按下左键和右键D.按什么都不显示28.线性表的顺序存储结构和线性表的链式存储结构分别是（分数：2.00）A.顺序存取的存储结构、顺序存取的存储结构B.随机存取的存储结构、顺序存取的存储结构C.随机存取的存储结构、随机存取的存储结构D.任意存取的存储结构、任意存取的存储结构29.下面的属性中，用于自动调整图像框中图形内容的大小的是（分数：2.00）A.PictureB.CurentYC.CurrentXD.Stretch30.声明一个变量为局部变量应该用（分数：2.00）A.GlobalB.PrivateC.StaticD.Public31.下列程序段，运行后输出的内容是a=
10、2c=1c=c+aIf c10 ThenPrint cElsePrint aEnd If（分数：2.00）A.3B.7C.9D.632.有如下程序。Private Sub Command1_Click()Dim k As Integer，m As IntegerDim op As Integerk=4：m=1Op=PPC(k，m)：Print op；Op=PPC(k，m)：Print opEnd SubPrivate Function PPC(a As Integer，b As Integer)Static m As Integer，i As Integerm=0：i=2i=i+m+1m=i+
11、a+bPPC=mEnd Function程序运行后，输出的结果为（分数：2.00）A.4 6B.6 6C.8 8D.10 1233.Visual Basic 集成的主窗口中不包括（分数：2.00）A.属性窗口B.标题栏C.菜单栏D.工具栏34.需求分析阶段的任务是确定（分数：2.00）A.软件开发方法B.软件开发工具C.软件开发费用D.软件系统功能35.设有下面的循环。i=0While i=1i=i + 3Print iWend则运行后的输出结果是（分数：2.00）A.1B.2C.3D.4二、填空题(总题数：14，分数：30.00)36.栈和队列通常采用的存储结构是 【1】 。（分数：2.00
12、）填空项 1:_37.在程序设计阶段应该采取 【2】 和逐步求精的方法，把一个模块的功能逐步分解，细化为一系列具体的步骤，进而用某种程序设计语言写成程序。（分数：2.00）填空项 1:_38.软件结构是以 【3】 为基础而组成的一种控制层次结构。（分数：2.00）填空项 1:_39.数据库系统阶段的数据具有较高独立性，数据独立性包括物理独立性和 【4】 两个含义。（分数：2.00）填空项 1:_40.数据库保护分为：安全性控制、 【5】 、并发性控制和数据的恢复。（分数：2.00）填空项 1:_41.在 Visual Basic 的立即窗口内输入以下语句X=97CR?Chr$(X)CR在窗口中
13、显示的结果是 【6】 。（分数：2.00）填空项 1:_42.有如下函数过程。Function UNC(ByVal x As Integer，ByVal y As Integer)As IntegerDo While y0S=x/yx=yy=SLoopUNC=xEnd Function以下事件调用该函数，程序运行结果是 【7】 。Private Sub Command1_Click()Dim a As IntegerDim b As Integera=12b=2x=UNC(a，b)Print xEnd Sub（分数：2.00）填空项 1:_43.菜单项的唯一事件是 【8】 。（分数：2.00）
14、填空项 1:_44.下列程序计算 Sn 的值。Sn=a+aa+aaa+a，其中最后一项为 n 个。例如：a=5，n=4 时，则 Sn=5+55+555+5555。请在空白处填入适当的内容，将程序补充完整。Private Sub Command1_Click( )Dim a As Integer, n As Integer, Cout As IntegerDim Sn As Long, Tn As LongCout = 1Sn =0Tn =0a = InputBox(“请输入 a 的值:“ )【9】 DoTn =Tn * 10 + aSn = Sn + TnCout = Cout + 1【10】
15、 Debug. Print a, n, SnEnd Sub（分数：4.00）填空项 1:_45.已知 B 的 ASCII 码为 66，以下程序统计由键盘输入的字符串中各英文字母的使用次数Dim pp (65 To 90)For i = 65 To 90pp(i) =0Nextx$ = InputBox(“ Enter a string“, x$ )x$ = UCase$ (x$)For i = 1 To Len (x$)n =Asc(Mid$ (x$, i, 1) )If n= 65 And n = 90 Then【11】 End IfNextFor i = 65 To 90Ifpp(i)0T
16、henPrint Chr$ (i) ; pp (i)End IfNext（分数：2.00）填空项 1:_46.下面运行程序后，单击命令按钮，输出出的结果是 【12】 。Private Sub Command1_Click( )Dim a% (1 To 5) ,i%, s#For i = 1 To 5a(i) =iNexts = Fun(a)Print“s=“; s;End SubFunction Fun(a() As Integer)Dim t#, i%t=1For i = LBound(a) To UBound(a)t=t * a(i)NextFun =tEnd Function（分数：2.
17、00）填空项 1:_47.如果存在如下过程：Private Function FMax( a( ) As Integer)Dim First As Integer, Last As Integer, i As IntegerFirst = LBound(a)Last = UBound(a)Max = a(First)For i = First To LastIf a (i)Max Then Max=a (i)NextFMax = MaxEnd FunctionPrivate Sub Commandl Click( )ReDim m (1 To 4) As Integerre(1) =20: m
18、(2) =30: m(3) =50: m(4) =100c = FMax(m)Print cEnd Sub单击命令按钮，其输出结果为 【13】 。（分数：2.00）填空项 1:_48.执行下面程序，第一行输出结果是 【14】 ，第二行输出结果是 47。Option ExplicitPrivate Sub Form_Click( )Dim A As IntegerA=2Call Sub1 (A) End SubPrivate Sub1 (x As Integer)x=x*2+1If x10 ThenCall Sub1 (x)End Ifx=x*2+1Print xEnd Sub（分数：2.00）
19、填空项 1:_49.在 Visual Basic 中按文件的编码方式不同，可将文件分为 【15】 。（分数：2.00）填空项 1:_二级 VISUAL+BASIC 笔试-273 答案解析(总分：100.00，做题时间：90 分钟)一、选择题(总题数：35，分数：70.00)1.在窗体上画一个命令按钮 command1 和两个文本框，名称分别为 Text1 和 Text2。编写如下两个事件过程：Dim Str1 As String，str2 As StringPrivate Sub form_load()Text1.Text=“ “Text2.Text=“ “Text1.Enabled=Fals
20、eText2.Enabled=FalseEnd SubPrivate Sub Form_KeyPress(KeyAscii As Integer)str1=str1 str1; “str2 =“; str2End SubFu解析：命题目的 考核数组作为过程参数的使用方法。解题要点 程序首先调用循环语句为数组 a、b 赋值，其中 a(i)=i；b(i)=i，且数组。的上下界分别为1 和 4，数组 b 的上下界分别为 2 和 6；接着将数组。作为参数调用 YAG 过程，在 YAG 过程中，定义了两个变量及 i，i 作为循环语句 For 的变量，它的初始值和终值分别为数组的上下界，循环体为 t=t*
21、a(i)，即将 a(i)的值乘以 t，然后再赋给 t，当循环结束后，程序返回的就是数组 a 中的各元素的积；同理程序将数组 b 作为参数传递给 YAG 过程后返回数组 b 中各元素的积，运行程序结束后，输出结果为：strX=24。考点链接 对象参数。10.当文本框 ScrollBars 属性设置了非零值，却没有效果，原因是（分数：2.00）A.文本框中没有内容B.文本框的 MultiLine 属性为 FalseC.文本框的 MultiLine 属性为 TrueD.文本框的 Locked 属性为 True 解析：命题目的 考查考生对文本框控件属性的了解程度。解题要点 只有当 Muhiline 属
22、性被设置为 True 时，才能用 ScrollBons 属性在文本框中设置滚动条。错解分析 文本框的 SerollBars 属性与 Multiline 属性是相关联的，只有当 Multiline 属性设为 True时， ScrollBars 属性设置才有效。考点链接 变量的定义、赋值。11.下面的数组声明语句中正确的是（分数：2.00）A.Dim gg1，5As StringB.Dim gg1 To 5，1 To 5As StringC.Dim gg(1 To 5)As String D.Dim gg1：5，1：5As String解析：命题目的 考查考生对数组定义的掌握程度。解题要点 在默认
23、情况下无论是一维还是二维或更多维的数组其缺省下标都从。开始，但有时为了方便，用户可以自定义数组的上下界，这时可用关键字 To 来设置。例如；d(1 To 6)，共含义就是一个名为 d，上界为 6，下界为 1 的数组。错解分析 对于数组定义概念了解不够透彻。考点链接 数组的定义、赋值和应用。12.以下各项中，Visual Basic 不能接收的图形文件是（分数：2.00）Aico 文件Bjpg 文件Cpsd 文件 Dbmp 文件解析：命题目的 考查考生应用图形控件的能力。解题要点 在 Visual Basic 中，可以接受不同的图形文件，见下表。Visual Basic 支持的图形文件文件类型
24、文件扩展名位图文件 .bmp;dib图标文件 .ico;.curWindows 图元文件 .wmf;emfGIF 格式图形压缩文件 .gifJPEG 格式图形压缩文件 .jpg从上表可知.psd 文件不是 Visual Basic 所支持的图形文件。错解分析 图形文件只能装载单层静态图片文件。考点链接 图片框和图像框的应用。13.一个关系中属性个数为 1 时，称此关系为（分数：2.00）A.对应关系B.单一关系C.一元关系 D.二元关系解析：命题目的 使学生加深对关系模型数据库基础知识的记忆。解题要点 在关系模型数据库中，基本结构是二维表，这种二维表称为关系。关系的列称为属性，一个具有 N 个
25、属性的关系称为 N 元关系。考点链接 各种关系查询语言与过程性语言和非过程性语言的关系，过程性语言的特点。14.下列程序段，在运行时最后输出的内容是a=2c=1AAA：c=c + aIf c10 ThenPrint cGoTo AAAElsePrint “10 以内的奇数显示完毕“End If（分数：2.00）A.3B.7C.9D.10 以内的奇数显示完毕 解析：命题目的 考查考生对 GoTo 语句的应用能力。解题要点 在本题中使用了 If 语句与 GoTo 语句。当 c10 时，输出 c，并继续运行；当大于 10 时，显示“10 以内的奇数显示完毕。”并结束程序。因为 c=c+a，c 和 a
26、 都是正数，总有大于 10 的时候，所以最后输出的一定是“10 以内的奇数显示完毕”。错解分析 GoTo 语句的格式是：GoTo 标号|行号，其执行过程是，当程序运行到 GoTo 语句时，程序直接转到 GoTo 语句后面的标号或行号所在的位置，然后继续往下运行程序。考点链接 GoTo 语句的应用。15.完全不考虑程序的内部结构和内部特征，而只是根据程序功能导出测试用例的测试方法是（分数：2.00）A.黑箱测试法 B.白箱测试法C.错误推测法D.安装测试法解析：命题目的 让考生熟练掌握常用的测试方法及其概念。解题要点 黑箱测试方法完全不考虑程序的内部结构和内部特征，而只是根据功能导出测试用例。白
27、箱测试是根据对程序内部逻辑结构的分析来选取测试用例，白箱测试也称为逻辑覆盖测试，故选项 B) 不正确；错误推测法只是黑箱测试所使用的一种具体的方法，故选项 C) 不正确；安装测试是测试层次中的一种，它属于高级测试，故选项 D) 不正确。考点链接 常用的黑箱测试方法及其定义，白箱测试用例的准则。16.最简单的交换排序方法是（分数：2.00）A.快速排序B.选择排序C.堆排序D.冒泡排序 解析：命题目的 让考生加深对各种排序方法特点的了解。解题要点 冒泡排序是一种最简单的交换类排序方法，它是通过相邻数据元素的交换逐步将线性表变成有序。错解分析 交换排序方法有冒泡排序和快速排序，显然选项 B) 和选
28、项 C) 错误，冒泡排序比较简单，其算法也容易理解，但快速排序本身较为复杂，且采用了递归调用，其算法理解也稍难。考点链接 插入排序、选择排序、归并排序、基数排序等排序方法的特点。17.栈通常采用的两种存储结构是（分数：2.00）A.顺序存储结构和链式存储结构 B.散列方式和索引方式C.链表存储结构和数组D.线性存储结构和非线性存储结构解析：命题目的 考查栈的存储结构的基本知识。解题要点 和线性表类似，栈也有两种存储方法，一是顺序栈，二是链式栈。栈的顺序存储结构是利用一组地址连续的存储单元一次存储自栈底到栈顶的数据元素，同时附设指针 top 指示栈顶元素的位置，由于栈的操作是线性表操作的特例，相
29、对而言，链式栈的操作更易于实现。考点链接 这 3 种运算方法在各种存储结构中的应用。18.相对于数据库系统，文件系统的主要缺陷有数据关联差、数据不一致性和（分数：2.00）A.可重用性差B.安全性差C.非持久性D.冗余性 解析：命题目的 让考生了解文件系统和数据库系统的区别。解题要点 文件系统所管理的数据文件基本上是分散的、相互独立的，因此相对于数据库系统，以此为基础的数据处理存在 3 个缺点，数据冗余大、数据的不一致性、程序与数据的相互依赖(简称为数据依赖)。考点链接 文件系统和数据库系统各自的特点，人工管理阶段及数据库系统三代的特点。19.下列程序执行的结果为x=25：y=20： z=7P
30、rint“S(“；x+2*y；“)“（分数：2.00）A.S(47)B.S(165) C.S(25+7*20)D.S(87)解析：命题目的 考查考生对表达式的基本认识。解题要点 题中表达式的计算顺序是：先计算 z* y，然后计算 x+(z*y)，最后的出一个表达式值。错解分析 该题涉及到赋值语句与运算符优先级的顺序，Print 语句具有运算功能，故选项 C) 是错误的；由于运算符的优先级是先乘除后加减，所以选项 B) 为正确，选项 A) 和选项 D) 不正确。考点链接 表达式计算的优先顺序。20.设有数组定义语句：Dim a(5)As Integer，List1 为列表框控件。下列给数组元素赋
31、值的语句错误的是（分数：2.00）A.a(3)=3B.a(3)=InputBox(“input data“)C.a(3)=List1.ListIndexD.a=Array(1，2，3，4，5，6) 解析：命题目的 考查考生对给数组赋值的应用能力。解题要点 Array 函数只能给变体类型变量数组初始化，a 为整型数组，所以选项 D) 错误。错解分析 由于数组代表一组变量，因此，在给它赋值时实际上是给一组变量赋值，这时就涉及到给数组中的哪个变量赋值的问题。我们引用数组下标给数组中的具体变量赋值。考点链接 数组的定义和赋值。21.如果在 c 盘当前文件夹下已存在名称为 studata.dat 的顺序
32、文件，那么执行语句 Open“ c:/ studata.dat“ For Append As #1 之后，将（分数：2.00）A.删除文件中原有内容B.保留文件中原有内容，并在文件尾填加新内容 C.保留文件中原有内容，并在文件头填加新内容D.以上均不对解析：命题目的 考查考生对读取顺序文件的掌握情况。解题要点 Append 语句能向文件中继续加新的内容。错解分析 读取顺序文件要注意该语句中，Append、Input、Output 的区别和各自的作用。考点链接 顺序文件的写操作。22.在窗体上画一个通用对话框，其名称为 CommonDialogl，然后画一个命令按钮，并编写如下事件过程。Priv
33、ate Sub Command1_Click()CommonDialog1.Flags=vbOFNHideReadOnlyCommonDialog1.Filter=“All Files(*.*)|*.*|Text Files(*.txt)|*.txtCommonDialog1.FilterIndex=1CommonDialog1.ShowOpenMsgBox CommonDialog1.FileNameEnd Sub程序运行后，单击命令按钮，将显示一个“打开”对话框，此时在“文件类型”框中显示的是（分数：2.00）A.All Files(*.*) B.Text Files(*.txt)C.*.
34、txtD.All Files(*.*)|Text Files(*.*)解析：命题目的 考查考生对通用对话框的熟悉程度。解题要点 通用对话框控什的 CommonDialogl 的 Filter 属性用来指定在对话框中显示的文件类型。利用该属性可以设置多个文件类型，供用户在对话框的“文件类型”的下拉列表中选择。Filter 的属性值由一对或多对文本字符串组成，每对字符串用管道符“|”隔开，在管道符“|”前面的部分称为描述，后面的部分一般为通配符和文件扩展名，称为“过滤器”。如“*.txt”等，各对字符串之间也用管道符隔开。其格式如下：窗体.对话框名.Filter=“描述符 1|过滤器 1|描述符
35、2|过滤器 2”如果省略窗体，则为当前窗体。本题执行语句后，可以在文件类型栏内通过下拉列表选择要显示的文件类型，而最初默认显示的文件类型(过滤器)可以由 FilterIndex 属性来指定，该属性是一个整数。用Filter 属性设置多个过滤器后，每个过滤器都有一个值，第 1 个过滤器的值为 1，第 2 个过滤器的值为2，用 FilterIndex 属性可以指定作为默认显示的过滤器，本题中的值是 1，所以显示 All Files(*)。错解分析 通用对话框的 Filter 属性是用来显示打开和保存文件类型的。考点链接 通用对话框的 FileName 属性和 DilogTitle 属性的作用。23
36、.窗体文件的扩展名是（分数：2.00）AbasBclsCfrm Dres解析：命题目的 考杳考生对 Visual Basic 程序文件类型的了解情况。解题要点 .bas 为程序模块文件的扩展名：.cls 为类模块文件的扩展名；,res 为相关资源文件的扩展名， frm 为窗体文件的扩展名，所以选项 C) 是正确的。错解分析 标准模块文件的扩展名为：.bas；类模块文件的扩展名为：.cls；窗体文件的扩展名为：.frm。考点链接 Visual Basic 程序包含的文件。24.为用户与数据库系统提供接口的语言是（分数：2.00）A.高级语言B.数据定义语言(DDL)C.数据操纵语言(DML) D
37、.汇编语言解析：命题目的 考查考生对数据库基本知识的了解。解题要点 DBMS 提供数据操纵语言(DML)实现对数据库中数据的操作，数据操纵语言(DML)是用户 (包括应用程序)与数据库系统的接口。数据操纵语言通常包括检索和更新功能。考点链接 程序模块中语言处理部分的分类，各子类的定义及其功能。25.保存一个工程至少应保存两个文件，这两个文件分别是（分数：2.00）A.文本文件和工程文件B.窗体文件和工程文件 C.窗体文件和标准模块文件D.类模块文件和工程文件解析：命题目的 考查考生对使用 Visual Basic 开发应用程序步骤的掌握情况。解题要点 保存一个工程至少应保存窗体文件和工程文件。
38、错解分析 Visual Basic 工程有 6 中文件类型，一个工程最少包含窗体文件和工程文件。考点链接 Visual Basic 工程的类文件的特性。26.下列程序段的执行结果为m=1n=1Select Case mCase 1Select Case nCase 0print “A“Case 1Print “B“End SelectCase 2Print “C“End Select（分数：2.00）A.AB.B C.CD.0解析：命题目的 考查考生对多分支控制结构的嵌套问题的掌握情况。解题要点 Select Case 结构的一般格式为：Select Case exprcase expr1cl
39、ause1case expr2clause2case Elseclause nEnd Select其中 expr 是测试表达式，如果满足 expr n，就执行这条语句，然后退出错解分析 根据题中的条件，m=1、n=1，所以执行语句 Print “* * 1* *“。考点链接 多分支控制结构的应用。27.有如下事件过程。Private Sub Form_KeyDown(KeyCode As Integer，Shift As Integer)If(Button And 3)=3 ThenPrint “OK“End IfEnd Sub程序运行后，为了在窗体上输出“OK”，应当按下的鼠标键是（分数：2
40、.00）A.左键B.右键C.同时按下左键和右键D.按什么都不显示 解析：命题目的 考查考生对窗体键盘事件和鼠标事件的应用情况。解题要点 此题考查的是有关鼠标事件的问题。从题目要求来看，上述事件应是鼠标事件过程，下面来看看有关鼠标事件的具体事件。按下鼠标键事件过程：Private Sub Form_MouseDown(Button As Integer，_ Shift As Integer，X As Single，Y As Single)End Sub松开鼠标键事件过程：Private Sub Form_MouseUp(Button As Integer，Shift_ As Integer，X
41、As Single，Y As Single)End Sub移动鼠标光标事件过程：Private Sub Form_MouseMove(Button As Integer，_ Shift As Integer，X As Single，Y As Single)End Sub以上 3 个鼠标事件过程具有相同的参数，含义如下： Button 表示被按下的鼠标键。Shift 表示 Shift、Ctrl、Alt 键状态。X，Y 鼠标光标的当前位置。现在再来看一下事件过程，可知此事件过程并非鼠标事件过程，并且 Button 也不是事件过程的参数，即此事件过程的两个参数 KeyCode 和 Shift 在程序
42、运行过程中并没有得到任何信息，所以无论按什么键都不显示任何内容。错解分析 此事件过程并非鼠标事件过程，并且 Button 也不是事件过程的参数，即该事件过程中的两个参数在程序运行时没有获得任何信息，所以无论按什么键都不显示任何内容。考点链接 键盘事件 KeyDown、KeyPress 和 KeyUp。28.线性表的顺序存储结构和线性表的链式存储结构分别是（分数：2.00）A.顺序存取的存储结构、顺序存取的存储结构B.随机存取的存储结构、顺序存取的存储结构 C.随机存取的存储结构、随机存取的存储结构D.任意存取的存储结构、任意存取的存储结构解析：命题目的 考查有关线性表存储结构的基本知识。解题要
43、点 顺序存储结构中，数据元素存放在一组地址连续的存储单元中，每个数据元素地址可通过公式 LOC(ai)=LOC(a1)+(i-1)L 计算得到，从而实现了随机存取。对于链式存储结构，要对某结点进行存取，都得从链的头指针指向的结点开始，这是一种顺序存取的存储结构。考点链接 顺序存储结构和链式存储结构的定义和性质，两种存储结构的操作方法。29.下面的属性中，用于自动调整图像框中图形内容的大小的是（分数：2.00）A.PictureB.CurentYC.CurrentXD.Stretch 解析：命题目的 考查考生对图像框属性的了解情况。解题要点 Picture 属性用于窗体、图片框和图像框，它可以通
44、过属性窗口设置，用来把图形放到这些对象中，因此选项 A) 是不正确的；CurrentX 和 CurrentY 用来设置下一个输出的水平坐标和垂直坐标，因此选项 B) 和 C) 都不正确；Stretch 属性用于图像框，用于自动调整图像框中图形内容的大小，既可通过属性窗口设置，也可以通过程序代码设置，该属性的取值为 True 或 False，当其值为 False 时，将自动放大或缩小图像框中的图形以与图像框的大小相适应，因此选项 D) 是正确的。错解分析 Picture 属性是图像框装载图片的属性；CurentX 和 CurentY 不是图像框控件的属性；Stretch 是图片和控件大小适应属性
45、。考点链接 图像框属性的设置。30.声明一个变量为局部变量应该用（分数：2.00）A.GlobalB.PrivateC.Static D.Public解析：命题目的 考查考生对声明变量关键字的掌握程度。解题要点 根据变量的定义位置和所使用的定义变量的语句不同，Visual Basic 中的变量可以分为局部变量、模块变量和全局变量。模块级变量在模块部分用 Private 或 Dim 语句声明；全局变量必须用Public 或 Global 语句声明；局部变量在过程内用 Dim 或 Static 语句声明。错解分析 根据定义变量的关键字不同，变量的作用范围和作用时间也不同，要熟记这些关键字的功能。考
46、点链接 变量的定义、赋值。31.下列程序段，运行后输出的内容是a=2c=1c=c+aIf c10 ThenPrint cElsePrint aEnd If（分数：2.00）A.3 B.7C.9D.6解析：命题目的 考查考生对条件语句的应用情况。解题要点 题中程序段先执行 c=c+a=3，然后判断条件从 c10，310 条件成立，程序执行 Print c。因此，输出内容为 3。错解分析 If 语句是判断每个条件是否成立，第一次碰到条件成立的表达式，执行其后面的语句后退出语句。考点链接 选择语句的使用。32.有如下程序。Private Sub Command1_Click()Dim k As In
47、teger，m As IntegerDim op As Integerk=4：m=1Op=PPC(k，m)：Print op；Op=PPC(k，m)：Print opEnd SubPrivate Function PPC(a As Integer，b As Integer)Static m As Integer，i As Integerm=0：i=2i=i+m+1m=i+a+bPPC=mEnd Function程序运行后，输出的结果为（分数：2.00）A.4 6B.6 6C.8 8 D.10 12解析：命题目的 考查考生对函数及函数参数的运用。解题要点 在 Sub 过程中，程序段先定义了 3
48、个 Integer 型变量 k，m，op，并给 k 赋给初值 4，m 的初值为 1，然后调用事件过程 PPC，并将它的值赋给 op；在事件过程 PPC 中定义了两个形参，参数的传送是通过引用实参，即将 k，m 的地址作为 a，b 的地址；在 PPC 中，将 m，i 定义为静态变量，第一次调用后的值仍然保留，但是 m，i 分别都有赋值语句，将它们的值变为 0，2，所以返回值不变。错解分析 函数 PPC 中的两个参数都是以传值方式传递，注意不要与传地址方式传递混淆。考点链接 过程的定义和调用，以及参数传递方式的选择。33.Visual Basic 集成的主窗口中不包括（分数：2.00）A.属性窗口 B.标题栏C.菜单栏D.工具栏解析：命题目的 考查考生对 Visual Basic 集成开发环境的了解情况。解题要点 在 Visual Basic 集成的主窗口又称为设计窗口，它由标题栏、菜单栏
