1、二级 VISUAL+BASIC 笔试-147 及答案解析(总分：100.00，做题时间：90 分钟)一、选择题(总题数：35，分数：70.00)1.窗体上有一个命令按钮和一个文本框，程序执行后，在文本框中输入 12345，单击命令按钮后的输出结果为( )。Private Sub Command1_Click()Dim A As Integer,B As IntegerText1.SelStart=2:Text1.SelLength=2A=Val(Text1.SelText):B=Len(Text1.Text)Print A*BEnd Sub（分数：2.00）A.68B.115C.1700D.1
2、702.确定一个控件在窗体上的位置的属性是( )。（分数：2.00）A.Width 或 HeightB.Width 和 HeightC.Top 或 LeftD.Top 和 Left3.在软件生命周期中，能准确地确定软件系统必须做什么和必须具备哪些功能的阶段是( )。（分数：2.00）A.需求分析B.详细设计C.软件设计D.概要设计4.下列程序段执行后，输出的结果是( )。For k1=0 To 4y=20For k2=0 To 3y=10For k3=0 To 2y=y+10Next k3Next k2Next k1Print y（分数：2.00）A.90B.60C.40D.105.在软件生产
3、过程中，需求信息的来源是( )。（分数：2.00）A.程序员B.项目经理C.设计人员D.软件用户6.软件需求分析阶段的工作，可以分为四个方面：需求获取、编写需求规格说明书、需求评审和( )。（分数：2.00）A.阶段性报告B.需求分析C.需求总结D.都不正确7.已知在菜单编辑器中设计了窗体的快捷菜单，其主菜单为 a1，且取消其“可见”属性，如图所示。运行时，以下( )事件过程可以使快捷菜单的菜单项响应鼠标右键单击。（分数：2.00）A.B.C.D.8.使用( )方法，可清除列表框中所有的列表项。（分数：2.00）A.RemoveB.ClearC.RemoveItemD.Move9.在窗体上画两
4、个名称分别为 Hscroll1、Hscroll2 的滚动条控件；6 个名称分别为Label1、Label2、Label3、Label4、Label5、Label6 的标签，其中，Label4Label6 分别显示“A”、“B”、“A*B”等文字信息，标签 Label1、Label2 分别显示其右侧的滚动条 Value 属性值，Label3 显示A*B 的计算结果，如下图所示。当移动滚动框时，在相应的标签中显示滚动条的值。当单击命令按钮“计算”时，对标签 Label1、Label2 中显示的两个值求积，并将结果显示在 Label3 中。以下不能实现求积功能的事件过程是( )。（分数：2.00）A
5、.B.C.D.10.以下程序执行后，在窗体上输出的图案是( )。Form1.ClsFor a=1 To 5Print Space(5-（分数：2.00）A.;String(a,“*“)Next aA) *B.*C.*D.*11.程序运行时，当在空文本框中依次输入 1234 时，窗体上显示的是( )。Private sub Text1_Change()Print Text1;End Sub（分数：2.00）A.1234B.12C.1121231234D.1012.在窗体上有一个名称为 CD1 的通用对话框和一个名称为 Command1 的命令按钮。要求单击命令按钮时，打开一个保存文件的通用对话框
6、。该窗口的标题为“保存”，缺省文件名为“ABC”，在“文件类型”栏中显示*.txt。则能够满足上述要求的程序是( )。（分数：2.00）A.Private Sub Command1_Click()CD1.FileName=“ABC“CD1.Filter=“All Files|*.*|(*.txt)|*.txt|(*.doc) |*.doc“CD1.FilterIndex=1CD1.DialogTitle=“保存“CD1.Action=2End SubB.Private Sub Command1_Click()CD1.FileName=“ABC“CD1.Filter=“All Files|*.*
7、|(*.txt)|*.txt|(*.doc) |*.doc“CD1.FilterIndex=2CD1.DialogTitle=“保存“CD1.Action=2End SubC.Private Sub Command1_Click()CD1.FileName=“保存“CD1.Filter=“All Files|*.*|(*.txt)|*.txt|(*.doc) |*.doc“CD1.FilterIndex=2CD1.DialogTitle=“ABC“CD1.Action=2End SubD.Private Sub Command1_Click()CD1.FileName=“ABC“CD1.Fil
8、ter=“All Files*.*|(*.txt)|*.txt|(*.doc) |*.doc“CD1.FilterIndex=1CD1.DialogTitle=“保存“CD1.Action=1End Sub13.表达式 Int(-15.8)+Fix(-15.8)+Int(15.8)+Fix(15.8)的运算结果是( )。（分数：2.00）A.-1B.-2C.0D.114.下列关于函数过程的叙述中，正确的是( )。（分数：2.00）A.如果不指明函数过程参数的类型，则该参数没有数据类型B.函数过程的返回值可以有多个C.函数过程形参的类型与函数返回值的类型没有关系D.当数组作为函数过程的参数时，既
9、能以传值方式传递，也能以引用方式传递15.对关系 S 和 R 进行集合运算，结果中既包含 S 中的所有元组也包含 R 中的所有元组，这样的集合运算称为( )。（分数：2.00）A.并运算B.交运算C.差运算D.积运算16.下列工具中，不属于结构化分析的常用工具的是( )。（分数：2.00）A.数据流图B.数据字典C.判定树D.N-S 图17.在窗体上有一个名称为 Command1 的命令按钮，并有如下程序：Private Sub Command1_Click()Static X As IntegerStatic Y As IntegerClsY=1:Y=Y+5:X=5+X:Print X,YE
10、nd Sub程序执行时，单击命令按钮 Command1 三次后，窗体上显示的结果为( )。（分数：2.00）A.15 16B.5 6C.15 15D.15 618.下列选项中，不属于数据模型所描述的内容的是( )。（分数：2.00）A.数据类型B.数据操作C.数据结构D.数据约束19.一个工程中包含两个名称分别为 Form1、Form2 的窗体、一个名称为 Func 的标准模块。假定在Form1、Form2 和 Func 中分别建立了自定义过程，其定义格式为：Form1 中定义的过程：Private Sub Fun1()End SubForm2 中定义的过程：Private Sub Fun2(
11、)End SubFunc 中定义的过程：Private Sub Fun3()End Sub在调用上述过程的程序中，如果不指明窗体或模块的名称，则以下叙述中正确的是( )。（分数：2.00）A.上述 3 个过程都可以在工程中的任何窗体或模块中被调用B.Fun1 和 Fun2 过程能够在工程中各个窗体或模块中被调用C.上述 3 个过程都只能在各自被定义的模块中调用D.只在 Fun3 过程能够被工程中各窗体或模块调用20.下面程序运行时，若输入“Visual Basic Programming”，则在窗体上输出的是( )。Private Sub Command1 Click()Dim Num(25)
12、As Integer,Chr1 As StringChr1=UCase(InputBox(“请输入字母字符串“)For k=1 To Len(Chr1)n=Asc(Mid(Chr1,k,1)-Asc(“A“)If n=0 ThenNum(n)=Num(n)+1End IfNext km=Num(0)Fork=1 To 25If mNum(k)Thenm=Num(k)End IfNext kPrint mEnd Sub（分数：2.00）A.3B.2C.1D.021.窗体上有一个名称为 Cb1 的组合框，程序运行后，为了输出选中的列表项，应使用的语句是( )。（分数：2.00）A.Print Cb
13、1.SelectedB.Print Cb1.List(Cb1.ListIndex)C.Print Cb1.Selected.TextD.Print Cb1.List(ListIndex)22.设有关键码序列(，)，采用堆排序法进行排序，经过初始建堆后关键码值 B 在序列中的序号是( )。（分数：2.00）A.1B.3C.7D.923.表达式 Str(Len(“123“)+Str(77.7)的值是( )。（分数：2.00）A.3+77.7B.377.7C.80.7D.12377.724.单击命令按钮时，下列程序段的执行结果为( )。Private Sub Command1_Click()Prin
14、t Func1(24,18)End SubPublic Function Func1(m As Integean As Integer)As IntegerDo While mnDo While mn:m=m-n:LoopDo While mn:n=n-m:LoopLoopFunc1=mEnd Function（分数：2.00）A.8B.6C.4D.225.下列循环能正常结束的是( )。（分数：2.00）A.x=5Dox=x+1Loop Until x0B.x=1Dox=x+2Loop Until x=10C.x=10Dox=x+1Loop Until x0D.x=6Dox=x-2Loop U
15、ntil x=126.设 a=6，则执行 x=IIf(a5，-1，0)后，x 的值为( )。（分数：2.00）A.5B.6C.0D.-127.以下( )控件没有 Caption 属性。（分数：2.00）A.CommandButtonB.CheckBoxC.TextBoxD.Label28.使用语句 Dim A(1 To 10)As Integer 声明数组 A 后，以下叙述正确的是( )。（分数：2.00）A.A 数组中的所有元素值为 0B.A 数组中的所有元素值不确定C.A 数组中的所有元素值为 EmptyD.执行语句“Erase A”后，A 数组中的所有元素值为 Null29.要求当鼠标在
16、图片框 Picture1 中移动时，立即在图片中显示鼠标的位置坐标。下面能正确实现上述功能的事件过程是( )。（分数：2.00）A.Private Sub Picture1_MouseMove(Button As Integer,Shift As integer,XAs Single,Y As Single)Picture1.Print X,YEndSubB.Private Sub Picture1_MouseMove(Button As Integer,Shift As Integer,XAs Single,Y As Single)Print X,YEndSubC.Private Sub P
17、icture1_MouseDown(Button As Integer,Shift As Integer,XAs Single,Y As Single)Picture.Print X,YEnd SubD.Private Sub Form_MouseMove(Button As Integer Shift As Integer,XAs Single,Y As Single)Picture1.Print X,YEnd Sub30.有如下的一个函数过程：Function fn(ByVal num As Long)Dim k As Longk=1:num=Abs(num)Do While nuink=
18、k*(num Mod 10)num=num/10Loopfn=kEnd Function通过以下事件过程调用该函数，程序运行后，在输入对话框中输入数字“123”，则运行结果为( )。Private Sub Command1_Click()Dim n As LongDim r As Longn=InputBox(“请输入一个数值“)n=CLng(n):r=fn(n)Print rEnd Sub（分数：2.00）A.12B.6C.3D.131.数据库的故障恢复一般是由( )来执行恢复。（分数：2.00）A.电脑用户B.数据库恢复机制C.数据库管理员D.系统普通用户32.在窗体上没有进行任何属性设置
19、，然后编写如下事件过程，则程序运行结果是( )。Private Sub Form_Load()For i=1 To 10sum=sum+iNext iPrint “Sum=“;sumEnd Sub（分数：2.00）A.在窗体上输出 55B.在窗体上输出 sum=55C.出错D.窗体上不输出33.对建立良好的程序设计风格，下面描述正确的是( )。（分数：2.00）A.程序应简单、清晰、可读性好B.符号名的命名只要符合语法C.充分考虑程序的执行效率D.程序的注释可有可无34.线性表常采用的两种存储结构是( )。（分数：2.00）A.散列方法和索引方式B.链表存储结构和数组C.顺序存储结构和链式存储
20、结构D.线性存储结构和非线性存储结构35.在窗体上建立一个命令控件数组 Command1，并双击第一个命令按钮，编写如下事件过程：Private Sub Command1_Click(Index As Integer)Command1(Index).Caption=Format$(Now,“hh:mm:ss“)End Sub以下描述正确的是( )。（分数：2.00）A.当单击某个命令按钮时，数组中所有命令按钮的 Caption 属性将被设置为当前时间B.当单击某个命令按钮时，该按钮的 Caption 属性将被设置为当前时间C.程序有错误D.窗体的 Caption 属性将被设置为当前时间二、填空
21、题(总题数：11，分数：30.00)36.在面向对象方法中， 1 描述的是具有相似属性与操作的一组对象。（分数：2.00）填空项 1:_37.在最坏情况下，堆排序需要比较的次数为 1。（分数：2.00）填空项 1:_38.数据库系统的三级模式分别为 1 模式、内模式与外模式。（分数：2.00）填空项 1:_39.软件开发环境是全面支持软件开发全过程的 1 集合。（分数：2.00）填空项 1:_40.关系代数是关系操作语言的一种传统表示方式，它以集合代数为基础，它的运算对象和运算结果均为 1。（分数：2.00）填空项 1:_41.语句 Print Format(Int(12345.6789*10
22、0+0.5)/100,“0000,0.00“)的输出结果是 1。（分数：2.00）填空项 1:_42.组合框是组合了文本框和列表框的特性而组成的一种控件。 1 风格的组合框不允许用户输入列表框中没有的项。（分数：2.00）填空项 1:_43.列表框中有若干项，现在用 Timer 控件控制时间，每隔 100ms 删除一项，直到删完为止，用一个滚动条来显示删除的项目数，请将以下程序补充完整。（分数：6.00）填空项 1:_44.以下程序用于在带垂直滚动条的文本框 Text1 中输出 3 到 100 之间的全部素数。Private Sub Command1_Click()Text1.Text=“Fo
23、r n=3 To 100k=Int(Sqr(n)i=2:Flag=0Do While i=_And Flag=0If n Mod i=0 ThenFlag=1Elsei=i+1End IfLoopIf_ThenText1.Text=Text1.Text String(a,“*“)Next aA) * B.*C.*D.*解析：解析 本题考查循环语句的分析。循环中共输出 5 行，每一行首先输出 5-a 个空格，然后输出 a个“*”号。a 的变化为 1 到 5，步长为 1。11.程序运行时，当在空文本框中依次输入 1234 时，窗体上显示的是( )。Private sub Text1_Change(
24、)Print Text1;End Sub（分数：2.00）A.1234B.12C.1121231234 D.10解析：解析 本题考查文本框的 Change 事件，Change 事件是每次文本框中的文本发生改变都要触发的事件，因此输入 1234 后，Change 事件触发了 4 次，每次都是把文本框的现有的内容输出，依次输出为1121231234。12.在窗体上有一个名称为 CD1 的通用对话框和一个名称为 Command1 的命令按钮。要求单击命令按钮时，打开一个保存文件的通用对话框。该窗口的标题为“保存”，缺省文件名为“ABC”，在“文件类型”栏中显示*.txt。则能够满足上述要求的程序是(
25、 )。（分数：2.00）A.Private Sub Command1_Click()CD1.FileName=“ABC“CD1.Filter=“All Files|*.*|(*.txt)|*.txt|(*.doc) |*.doc“CD1.FilterIndex=1CD1.DialogTitle=“保存“CD1.Action=2End SubB.Private Sub Command1_Click()CD1.FileName=“ABC“CD1.Filter=“All Files|*.*|(*.txt)|*.txt|(*.doc) |*.doc“CD1.FilterIndex=2CD1.Dialo
26、gTitle=“保存“CD1.Action=2End Sub C.Private Sub Command1_Click()CD1.FileName=“保存“CD1.Filter=“All Files|*.*|(*.txt)|*.txt|(*.doc) |*.doc“CD1.FilterIndex=2CD1.DialogTitle=“ABC“CD1.Action=2End SubD.Private Sub Command1_Click()CD1.FileName=“ABC“CD1.Filter=“All Files*.*|(*.txt)|*.txt|(*.doc) |*.doc“CD1.Filt
27、erIndex=1CD1.DialogTitle=“保存“CD1.Action=1End Sub解析：解析 本题考查通用对话框。程序中单击命令按钮时，要打开保存对话框，因此设置 CD1 的Action 属性为 2，可以使用 ShowSave 方法，更改 CD1 的 DialogTitle 属性为“保存”，同时设置 Filter属性，将 FilterIndex 属性设置为 2，表示默认的文件类型为“.txt”，设置其 FileName 属性为“ABC”，表示确定首次打开“保存”对话框时，在文件名中显示的文件名。13.表达式 Int(-15.8)+Fix(-15.8)+Int(15.8)+Fix(
28、15.8)的运算结果是( )。（分数：2.00）A.-1 B.-2C.0D.1解析：解析 本题考查函数 Int 的功能，Int(x)的作用是取不大于 x 的最小的整数，Fix(x)则是简单的取整数部分。14.下列关于函数过程的叙述中，正确的是( )。（分数：2.00）A.如果不指明函数过程参数的类型，则该参数没有数据类型B.函数过程的返回值可以有多个C.函数过程形参的类型与函数返回值的类型没有关系 D.当数组作为函数过程的参数时，既能以传值方式传递，也能以引用方式传递解析：解析 本题考查过程定义。在 VB 中出现的变量，如果没有声明类型，那么为变体型。VB 中可以通过调用函数过程得到返回值，一
29、个函数过程只能有一个返回值，如果需要改变主调过程的参数，可以进行传址方式调崩函数。VB 数组参数中不存在传址调用，函数的参数和返回值类型之间没有任何关系。15.对关系 S 和 R 进行集合运算，结果中既包含 S 中的所有元组也包含 R 中的所有元组，这样的集合运算称为( )。（分数：2.00）A.并运算 B.交运算C.差运算D.积运算解析：解析 关系的并运算是指由结构相同的两个关系合并，形成一个新的关系，新关系中包含两个关系中的所有元组。16.下列工具中，不属于结构化分析的常用工具的是( )。（分数：2.00）A.数据流图B.数据字典C.判定树D.N-S 图 解析：解析 结构化分析的常用工具有
30、数据流图、数据字典、判定树和判定表。17.在窗体上有一个名称为 Command1 的命令按钮，并有如下程序：Private Sub Command1_Click()Static X As IntegerStatic Y As IntegerClsY=1:Y=Y+5:X=5+X:Print X,YEnd Sub程序执行时，单击命令按钮 Command1 三次后，窗体上显示的结果为( )。（分数：2.00）A.15 16B.5 6C.15 15D.15 6 解析：解析 本题考查静态变量。静态变量的值有继承性，上一次调用的结果在下一次调用时还是有效的。题目中每次调用 Y 的值都被重新赋值了，因此单击
31、 3 次以后 Y 的值仍然是 6，而 X 每次调用的结果都保留，因此调用 3 次以后，结果为 15。18.下列选项中，不属于数据模型所描述的内容的是( )。（分数：2.00）A.数据类型 B.数据操作C.数据结构D.数据约束解析：解析 数据模型描述的内容包含数据结构、数据操作和数据约束。19.一个工程中包含两个名称分别为 Form1、Form2 的窗体、一个名称为 Func 的标准模块。假定在Form1、Form2 和 Func 中分别建立了自定义过程，其定义格式为：Form1 中定义的过程：Private Sub Fun1()End SubForm2 中定义的过程：Private Sub F
32、un2()End SubFunc 中定义的过程：Private Sub Fun3()End Sub在调用上述过程的程序中，如果不指明窗体或模块的名称，则以下叙述中正确的是( )。（分数：2.00）A.上述 3 个过程都可以在工程中的任何窗体或模块中被调用B.Fun1 和 Fun2 过程能够在工程中各个窗体或模块中被调用C.上述 3 个过程都只能在各自被定义的模块中调用 D.只在 Fun3 过程能够被工程中各窗体或模块调用解析：解析 本题考查过程的作用域。在定义过程或者函数的时候选用了 Private 关键字说明，那么这个过程仅可以在本模块中使用，标准模块定义的函数或者过程也不例外。20.下面程
33、序运行时，若输入“Visual Basic Programming”，则在窗体上输出的是( )。Private Sub Command1 Click()Dim Num(25)As Integer,Chr1 As StringChr1=UCase(InputBox(“请输入字母字符串“)For k=1 To Len(Chr1)n=Asc(Mid(Chr1,k,1)-Asc(“A“)If n=0 ThenNum(n)=Num(n)+1End IfNext km=Num(0)Fork=1 To 25If mNum(k)Thenm=Num(k)End IfNext kPrint mEnd Sub（分数
34、：2.00）A.3 B.2C.1D.0解析：解析 该程序的第一个循环是遍历整个字符串，其中数组 Num 的作用是存放对应字符的出现次数；第二个循环的作用是找到数组 Num 中的最大值，所以整个程序的功能就是找到在输入字符串中出现次数最多的字母，并输出其出现的次数。21.窗体上有一个名称为 Cb1 的组合框，程序运行后，为了输出选中的列表项，应使用的语句是( )。（分数：2.00）A.Print Cb1.SelectedB.Print Cb1.List(Cb1.ListIndex) C.Print Cb1.Selected.TextD.Print Cb1.List(ListIndex)解析：解析
35、 组合框的属性 ListIndex 返回当前所选项目的索引号，List(Index)属性返回指定索引号的列表项内容，因此返回当前选定的列表项应该用 Cb1.List(Cb1.ListIndex)。22.设有关键码序列(，)，采用堆排序法进行排序，经过初始建堆后关键码值 B 在序列中的序号是( )。（分数：2.00）A.1B.3 C.7D.9解析：解析 建堆的算法：首先将要排序的所有关键码放到一棵完全二叉树的各个结点中(这时的二叉树不具备堆的特性)，然后，从 i=n/2(n 为结点的个数)的结点 Ki开始，逐步把以 Kn/2，K n/2，K n/2-2，为根的子树排成堆，直到以 K1为根的树排成
36、堆，就完成了建堆过程。此题中，n=16，i=16/2=8，即从第 8 个结，点开始，建堆完成后如下图：*所以经过初始建堆后关键码值 B 在序列中的序号是 3。23.表达式 Str(Len(“123“)+Str(77.7)的值是( )。（分数：2.00）A.3+77.7B.377.7 C.80.7D.12377.7解析：解析 本题考查字符串处理函数。Str 的功能是把数字转化为字符，Len 函数的功能是求字符串中字符的个数。题中“+”为字符串连接运算符。24.单击命令按钮时，下列程序段的执行结果为( )。Private Sub Command1_Click()Print Func1(24,18)
37、End SubPublic Function Func1(m As Integean As Integer)As IntegerDo While mnDo While mn:m=m-n:LoopDo While mn:n=n-m:LoopLoopFunc1=mEnd Function（分数：2.00）A.8B.6 C.4D.2解析：解析 本题考查循环程序的分析。在函数 Func1 中，程序主要由一条嵌套的循环语句构成，如果mn，外循环内部的第一条内循环为除去 m 中包含的所有的 n 的倍数。第二条内循环为除去 n 中包含的m 的倍数。最后计算到 m 和 n 相等。25.下列循环能正常结束的是(
38、 )。（分数：2.00）A.x=5Dox=x+1Loop Until x0B.x=1Dox=x+2Loop Until x=10C.x=10Dox=x+1Loop Until x0 D.x=6Dox=x-2Loop Until x=1解析：解析 本题考在 Do 型循环。对于这种循环结构，首先看条件判断在循环体的前面还是后面，如果是先判断条件，则有可能一次也不执行循环体；如果是后判断条件，则无论条件如何至少执行一次循环体。由 Until 引出的循环条件为 False 时执行循环体，条件为 True 时退出循环；题目中选项 A)中循环变量逐渐增加，不可能小于 0，选项 B)中循环变量的步长为 2，
39、初值为 1，不可能等于 10。而选项 C)中执行一次循环体，条件成立，退出循环。选项 D)和选项 B)相似，循环变量无法等于 1。26.设 a=6，则执行 x=IIf(a5，-1，0)后，x 的值为( )。（分数：2.00）A.5B.6C.0D.-1 解析：解析 本题考查 IIf 函数，IIf 函数可用于执行简单的条件判断操作，其格式为：result=IIf(条件，True 部分)，False 部分)，其中“result”是函数的返回值，“条件”是一个逻辑表达式。当“条件”为真时，IIf 函数返回“True 部分”的值；当“条件”为假时返回“False 部分”的值。“True 部分”或“Fal
40、se 部分”可以是表达式、变量或其他函数。题目中 a 大于 5 成立，因此表达式值为-1。27.以下( )控件没有 Caption 属性。（分数：2.00）A.CommandButtonB.CheckBoxC.TextBox D.Label解析：解析 本题考查基本控件的常用属性。命令按钮(CommandButton)、复选框(CheckBox)以及标签(Label)都有标题(Caption)属性；而文本框没有 Caption 属性，只有 Text 属性。28.使用语句 Dim A(1 To 10)As Integer 声明数组 A 后，以下叙述正确的是( )。（分数：2.00）A.A 数组中的
41、所有元素值为 0 B.A 数组中的所有元素值不确定C.A 数组中的所有元素值为 EmptyD.执行语句“Erase A”后，A 数组中的所有元素值为 Null解析：解析 本题考查数组。VB 中数值型数组定义后，所有的元素都自动赋值为 0。而 Erase 仅可以清空自动数组中的元素值。29.要求当鼠标在图片框 Picture1 中移动时，立即在图片中显示鼠标的位置坐标。下面能正确实现上述功能的事件过程是( )。（分数：2.00）A.Private Sub Picture1_MouseMove(Button As Integer,Shift As integer,XAs Single,Y As S
42、ingle)Picture1.Print X,YEndSub B.Private Sub Picture1_MouseMove(Button As Integer,Shift As Integer,XAs Single,Y As Single)Print X,YEndSubC.Private Sub Picture1_MouseDown(Button As Integer,Shift As Integer,XAs Single,Y As Single)Picture.Print X,YEnd SubD.Private Sub Form_MouseMove(Button As Integer S
43、hift As Integer,XAs Single,Y As Single)Picture1.Print X,YEnd Sub解析：解析 在图片框中移动鼠标触发的事件是 Picture1_MouseMove 事件，在事件中控制在图片框中输出坐标。30.有如下的一个函数过程：Function fn(ByVal num As Long)Dim k As Longk=1:num=Abs(num)Do While nuink=k*(num Mod 10)num=num/10Loopfn=kEnd Function通过以下事件过程调用该函数，程序运行后，在输入对话框中输入数字“123”，则运行结果为(
44、 )。Private Sub Command1_Click()Dim n As LongDim r As Longn=InputBox(“请输入一个数值“)n=CLng(n):r=fn(n)Print rEnd Sub（分数：2.00）A.12B.6 C.3D.1解析：解析 本题考查函数功能分析。定义函数过程 fn 时，在参数前加上 ByVal 表明参数为传值调用。函数 fn 的主要功能为取出 num 的每一位，进行累计相乘，然后返回结果。31.数据库的故障恢复一般是由( )来执行恢复。（分数：2.00）A.电脑用户B.数据库恢复机制C.数据库管理员 D.系统普通用户解析：解析 数据库一旦发生
45、故障，需要及时进行故障恢复，并由数据库管理员负责执行故障恢复。32.在窗体上没有进行任何属性设置，然后编写如下事件过程，则程序运行结果是( )。Private Sub Form_Load()For i=1 To 10sum=sum+iNext iPrint “Sum=“;sumEnd Sub（分数：2.00）A.在窗体上输出 55B.在窗体上输出 sum=55C.出错D.窗体上不输出 解析：解析 本题考查 Load 事件运行。当装入窗体事件触发时，通常用于对属性和变量初始化，一般不使用 Print 方法，若想 Print 方法在 Form_Load 事件过程中起作用，必须设置窗体的 AutoR
46、edraw 为True，否则 Print 方法不起作用。33.对建立良好的程序设计风格，下面描述正确的是( )。（分数：2.00）A.程序应简单、清晰、可读性好 B.符号名的命名只要符合语法C.充分考虑程序的执行效率D.程序的注释可有可无解析：解析 程序设计应该简单易懂，语句结构应该简单直接，不应该为提高效率而把语句复杂化。34.线性表常采用的两种存储结构是( )。（分数：2.00）A.散列方法和索引方式B.链表存储结构和数组C.顺序存储结构和链式存储结构 D.线性存储结构和非线性存储结构解析：解析 线性表的存储通常要用两种存储结构：顺序存储结构和链式存储结构。35.在窗体上建立一个命令控件数
47、组 Command1，并双击第一个命令按钮，编写如下事件过程：Private Sub Command1_Click(Index As Integer)Command1(Index).Caption=Format$(Now,“hh:mm:ss“)End Sub以下描述正确的是( )。（分数：2.00）A.当单击某个命令按钮时，数组中所有命令按钮的 Caption 属性将被设置为当前时间B.当单击某个命令按钮时，该按钮的 Caption 属性将被设置为当前时间 C.程序有错误D.窗体的 Caption 属性将被设置为当前时间解析：解析 本题考查控件数组。建立控件数组以后，数组中的每个元素名字相同，
48、依靠 Index 属性来区分单击了哪个命令按钮。题目中单击哪个命令按钮，哪个命令按钮的标题属性就变为当前时间。二、填空题(总题数：11，分数：30.00)36.在面向对象方法中， 1 描述的是具有相似属性与操作的一组对象。（分数：2.00）填空项 1:_ （正确答案：类）解析：解析 在面向对象方法中，把具有相同属性和方法的对象称为类，类是对象的抽象，对象是类的实例。37.在最坏情况下，堆排序需要比较的次数为 1。（分数：2.00）填空项 1:_ （正确答案：O(nlog 2n)）解析：解析 在最坏情况下，冒泡排序所需要的比较次数为 n(n-1)/2；简单插入排序所需要的比较次数为 n(n-1)/2；希尔排序所需要的比较次数为 O(n1.5)；堆排序所需要的比较次数为 O(nlog2n)。38.数据库系统的三级模式分别为 1 模式、内模式与外模式。（分数：2.00）填空项 1:_
