1、二级 VISUAL+BASIC 笔试-65 及答案解析(总分：94.00，做题时间：90 分钟)一、选择题(总题数：35，分数：70.00)1.使用驱动器列表框的_属性可以返回或设置驱动器列表中当前选中的磁盘驱动器的索引值。（分数：2.00）A.Chi)fiveB.：DriveC.ListD.Listlndex2.以下控件可以用来实现定时地执行某段代码的是_。（分数：2.00）A.OLEB.TimerC.ComboBoxD.FileListBox3.在下列几种排序方法中，要求内存量最大的是_。（分数：2.00）A.插入排序B.选择排序C.快速排序D.归并排序4.下列不属于软件调试技术的是_。（
2、分数：2.00）A.强行掉错法B.集成测试法C.回溯法D.原因排除法5.使用目录列表框的 属性可以返回或设置当前工作目录的完整路径(包括驱动器盘符)。（分数：2.00）A.DriveB.PathC.DirD.Listlndex6.已知二叉树 BT 的后序遍历序列是，dabec，中序遍历序列是 debac，它的前序遍历序列是 _。（分数：2.00）A.cedbaB.acbedC.decabD.deabc7.在设计程序时，应采纳的原则之一是_。（分数：2.00）A.程序结构应有助于读者理解B.不限制 goto 语句的使用C.减少或取消注解行D.程序越短越好8.编写如下事件过程；Private Su
3、b Form_MouseDown(Button As Integer,Shift As Integer,X AS Single，Y As Single)If Shif=6 And Button=2 ThenPrint“BBBB“End IfEnd Sub程序运行后，为了在窗体上输出“BBBB”，应执行的操作为_。（分数：2.00）A.同时按下 Shift 键和鼠标左键B.同时按下 Shift 键和鼠标右键C.同时按下 Ctrl、Alt 键和鼠标左键D.同时按下 Ctrl、Alt 键和鼠标右键9.下列程序段的结果为_。A=“ABBACDDCBA“For I=6 T0 2 Step-2X=Mid(
4、A,I,I)Y=Left(A,1)Z=Right(A,1)Z=X J;I（分数：2.00）A.12 0 4B.15 0 4C.12 3 1D.15 3 125.下列程序段的执行结果为_。A=0:B=0For I=-1 To-2 Step-1For J=1 To 2B=B+1Next JA=A+1Next IPrint A;B（分数：2.00）A.2 4B.-2 2C.4 2D.2 326.在数据流图(DFD) 中，带有名字的箭头表示_。（分数：2.00）A.控制程序的执行顺序B.模块之间的调用关系C.数据的流向D.程序的组成成分27.下面叙述中不正确的是_。（分数：2.00）A.自定义数据类型
5、必须在窗体模块或标准模块的通用声明段进行声明B.自定义数据类型只能在窗体模块的通用声明段进行声明C.在窗体模块中定义自定义数据类型时必须使用 Private 关键字D.自定义数据类型中的元素的数据类型可以是系统提供的基本数据类型或已声明的自定义数据类型28.滚动条控件中，用来设置鼠标单击滚动箭头时滚动条移动的大小的属性是_。（分数：2.00）A.MaxB.ValueC.LargeChangeD.SmallChange29.在窗体上画一个驱动器列表框、一个目录列表框和一个文件列表框，其名称分别为 Drivel、Dirl 和Filel。当改变目录列表框的内容时，要求文件列表框中显示当前选中的文件夹
6、中的内容，则在Dirl_Change 事件过程中应使用的语句是_。（分数：2.00）A.Dirvel.Drive=Dirl.PathB.Dirl.Path=Drivel.DriveC.Dirl.Path=Filel.PathD.Filel.Path=Dirl.Path30.下列程序段的执行结果为_。I=0For G=10 To 19 Step 3I=I+1Next GPrint I（分数：2.00）A.4B.5C.3D.631.在窗体上画一个命令按钮，其名称为 Commandl，然后编写如下程序：Function Fonc(By Val x As Integer,y As InteSer)y=
7、x*yIf y0 ThenFunc=X；ElseFunc=yEnd IfEnd FunctionPrivate Sub Commandl_Click()Dim a As Integer,b As Integera=3b=4c=Func(a,B) Print“a=“;aPrint“b=“;bPrint“C=“;CEnd Sub程序运行后，单击命令按钮，其输出结果为_。（分数：2.00）A.a=3 b=12 c=3B.a=3 b=4 c=3C.a=3 b=4 c=12D.a=13 b=12 c=1232.以下叙述不正确的是_。（分数：2.00）A.在 Sub 过程中可以调用 Function 过程
8、B.在用 Call 调用 Sub 过程时必须把参数放在括号里C.在 Sub 过程中可以嵌套定义 FunctionD.用 Static 声明的过程中的局部变量都是 Static 类型33.在窗体上画一个文本框，其名称为 Textl。为了在程序运行后 Textl 中的文本不可编辑，应当使用的语句是_。（分数：2.00）A.Textl.ClearB.Textl.Locked=TrueC.Textl.Visible=FalseD.Textl.Enabled=Trve34.为了使图片框的大小可以自动适应图片的尺寸，则应_。（分数：2.00）A.将其 Autosize 属性值设置为 TreeB.将其 Au
9、tosize 属性值设置为 EalseC.将其 Stretch 属性值设置为 TrueD.将其 Stretch 属性值设置为 False35.视图设计一般有 3 种设计次序，下列不属于视图设计的是_。（分数：2.00）A.自顶向下B.由外向内C.由内向外D.自底向上二、填空题(总题数：12，分数：24.00)36.实现算法所需的存储单元多少和算法的工作量大小分别称为算法的 【1】 。（分数：2.00）填空项 1:_37.数据结构包括数据的逻辑结构、数据的 【2】 以及对数据的操作运算。（分数：2.00）填空项 1:_38.一个类可以从直接或间接的祖先中继承所有属性和方法。采用这个方法提高了软件
10、的【3】 （分数：2.00）填空项 1:_39.面向对象的模型中，最基本的概念是对象和 【4】 。（分数：2.00）填空项 1:_40.软件维护活动包括以下几类：改正性维护、适应性维护、 【5】 维护和预防性维护。（分数：2.00）填空项 1:_41.Visual Basic 中的控件分为 3 类，它们是标准控件、 【6】 和可插入对象。（分数：2.00）填空项 1:_42.程序执行结果 s 的值是 【7】 。Private Sub subl(Byval p As Integer)p=p*2End SubPrivate Sub Commandl_Click()Dim i As Integeri
11、=3Call subl(i)ifi4 then i=i mod 2Print cstr(i)End Sub（分数：2.00）填空项 1:_43.在执行 KeyPress 事件过程时，KeyASCII 是所按键的 【8】 值。对于有上档字符和下档字符的键，当执行 KeyDown 事件过程时，KeyCode 是 【9】 字符的 ASCII 值。（分数：2.00）填空项 1:_44.文件的打开和关闭语句分别是 【10】 和 【11】 。（分数：2.00）填空项 1:_45.假定有如下程序代码，程序运行后，把鼠标光标移到窗体内，每单击一次，变换一种鼠标光标的形状，依次显示鼠标光标的 15 个属性。请在
12、划线处将程序补充完整。Private Sub Form_Click()Static x As IntegerCisPrint“Mousepointer Property is now:;XForml 【12】 =xX=K+1If x=15 Then x=0End Sub（分数：2.00）填空项 1:_46.在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Commandl_Click()Dim a (1 To 10)Dim p(1 To 3)k=5For i=1 To 10a(i)=iNextiFori=1 To 3p(i)=a(i*i)Next iFor i=1 To 3
13、k=k+p(i)*2Next iPrint kEnd Sub程序运行后，单击命令按钮，输出结果是 【13】 。（分数：2.00）填空项 1:_47.假定建立了一个工程，该工程包括两个窗体，其名称(Name 属性)分别为 Form1 和 Form2，启动窗体为Form1。在 Form1 上画一个命令按钮 Command1，程序运行后，要求当单击该命令按钮时，Form1 窗体消失，显示窗体 Form2，请将下面的程序补充完整。Private Sub Command1_Click()【14】 Form1Form2 【15】 End Sub（分数：2.00）填空项 1:_二级 VISUAL+BASIC
14、 笔试-65 答案解析(总分：94.00，做题时间：90 分钟)一、选择题(总题数：35，分数：70.00)1.使用驱动器列表框的_属性可以返回或设置驱动器列表中当前选中的磁盘驱动器的索引值。（分数：2.00）A.Chi)fiveB.：DriveC.ListD.Listlndex 解析：评析 Drive 属性用来设置或返回程序运行时所选择的驱动器名。List 属性是包含了当前系统中有效驱动器的连接列表。ListIndex 属性用来设置或返回驱动器连接列表中当前所选中的项目的索引。2.以下控件可以用来实现定时地执行某段代码的是_。（分数：2.00）A.OLEB.Timer C.ComboBoxD
15、.FileListBox解析：评析 计时器(Timer)是一种可以按一定时间间隔触发事件的控件。计时器的属性Interval 指定触发事件的时间间隔，单位为毫秒。Enabled 属性指定控件是否可用，即控件是否定时触发事件。计时器的事件计时器只有 Timer 事件。当计时器的 Enabled 属性为 Tme 时，Timer 事件将以 Interval 指定的时间间隔被触发。由于计时器的 Timer 时间可以以一定的时间间隔被触发，因此可以在 Timer 事件中添加希望被不断(以一定的时间间隔)执行的代码。3.在下列几种排序方法中，要求内存量最大的是_。（分数：2.00）A.插入排序B.选择排序
16、C.快速排序D.归并排序 解析：评析 快速排序的基本思想是，通过一趟排序将待排序记录分割成独立的两部分，其中一部分记录的关键字均比另一部分记录的关键字小，再分别对这两部分记录继续进行排序，以达到整个序列有序；插入排序的基本操作是指将无序序列中的各元素依次插入到已经有序的线性表中，从而得到一个新的序列；选择排序的基本思想是：扫描整个线性表，从中选出最小的元素，将它交换到表的最前面(这是它应有的位置)，然后对剩下的子表采用同样的方法，直到表空为止；归并排序是将两个或两个以上的有序表组合成一个新的有序表。4.下列不属于软件调试技术的是_。（分数：2.00）A.强行掉错法B.集成测试法 C.回溯法D.
17、原因排除法解析：评析 调试的关键在于推断程序内部的错误位置及原因。主要的调试方法有强行排错法、回溯法和原因排除法。5.使用目录列表框的 属性可以返回或设置当前工作目录的完整路径(包括驱动器盘符)。（分数：2.00）A.DriveB.Path C.DirD.Listlndex解析：评析 目录列表框控件的相关属性Path 属性用来返回或设置当前的工作路径。例如，当前工作路径是“C:/Windows”，则 Path 属性返回的值就是“C：/Windows”。ListIndex 属性用来返回或设置目录列表框的目录列表中当前所选中的项目的索引。6.已知二叉树 BT 的后序遍历序列是，dabec，中序遍历
18、序列是 debac，它的前序遍历序列是 _。（分数：2.00）A.cedba B.acbedC.decabD.deabc解析：评析 二叉树 BT 的后序遍历序列为 dabec，故 BT 的根结点为 c(后序遍历序列的最后一个结点为数的根结点)；而 BT 的中序遍历序列是 debac，即遍历序列中最后一个结点为跟结点，说明 BT 的右子树为空。由 BT 的的后序遍历序列和中序遍历序列可知 BT 的左子树(LST)的后序遍历序列和中序遍历序列分别为 dabe 和 deba(树是递归定义的)：故 LST 的根结点是。，在由 LST 的中序遍历序列可知其左子树为d。因此 BT 的前序遍历序列为 ceA
19、ba。7.在设计程序时，应采纳的原则之一是_。（分数：2.00）A.程序结构应有助于读者理解 B.不限制 goto 语句的使用C.减少或取消注解行D.程序越短越好解析：评析 滥用 goto 语句将使程序流程无规律，可读性差：添加的注解行有利于对程序的理解，不应减少或取消：程序的长短要依照实际需要而定，并不是越短越好。8.编写如下事件过程；Private Sub Form_MouseDown(Button As Integer,Shift As Integer,X AS Single，Y As Single)If Shif=6 And Button=2 ThenPrint“BBBB“End If
20、End Sub程序运行后，为了在窗体上输出“BBBB”，应执行的操作为_。（分数：2.00）A.同时按下 Shift 键和鼠标左键B.同时按下 Shift 键和鼠标右键C.同时按下 Ctrl、Alt 键和鼠标左键D.同时按下 Ctrl、Alt 键和鼠标右键 解析：评析 在鼠标的 Mouse_Down 事件中，当按下左键时，Button=1，右键时 Button=2，在键盘上按下 Shift 键时， Shift 值为 1,Ctrl 键时，Shift 值为 2，Alt 时, Shift 值为 4，如果同时按下多键，则它们的值也相加。9.下列程序段的结果为_。A=“ABBACDDCBA“For I=
21、6 T0 2 Step-2X=Mid(A,I,I)Y=Left(A,1)Z=Right(A,1)Z=X J;I（分数：2.00）A.12 0 4B.15 0 4 C.12 3 1D.15 3 1解析：评析 跟踪程序：外循环执行 3 次，内循环执行 5 次，循环体 N=N+1 共执行了 3*5=15 次，故 N 的值应当为 15。值得注意的是：For 循环的控制变量，在每次循环体执行完之后，会自动加循环步长值，直到这个值超出循环语句指定的范围，循环结束。由此可见，循环结束后，I 的值应当为 3+1=4，J 的值应当为 1+(-1)=0。25.下列程序段的执行结果为_。A=0:B=0For I=-
22、1 To-2 Step-1For J=1 To 2B=B+1Next JA=A+1Next IPrint A;B（分数：2.00）A.2 4 B.-2 2C.4 2D.2 3解析：评析 ForNext 循环跟踪程序：内循环的循环体执行了四次，外循环的循环体执行了两次，故A=2，B=4。26.在数据流图(DFD) 中，带有名字的箭头表示_。（分数：2.00）A.控制程序的执行顺序B.模块之间的调用关系C.数据的流向 D.程序的组成成分解析：评析 数据流相当于一条管道，并有一级数据(信息)流经它。在数据流图中，用标有名字的箭头表示数据流。数据流可以从加工流向加工，也可以从加工流向文件或从文件流向加
23、工，并且可以从外部实体流向系统或从系统流向外部实体。27.下面叙述中不正确的是_。（分数：2.00）A.自定义数据类型必须在窗体模块或标准模块的通用声明段进行声明B.自定义数据类型只能在窗体模块的通用声明段进行声明 C.在窗体模块中定义自定义数据类型时必须使用 Private 关键字D.自定义数据类型中的元素的数据类型可以是系统提供的基本数据类型或已声明的自定义数据类型解析：评析 自定义数据类型是用 Type 语句定义的数据类型，可以包含一个或多个任意数据类型的元素。自定义数据类型必须在窗体模块、标准模块或类模块的通用声明段进行定义。在宙体模块和类模块中，只能用 Private 关键字来声明自
24、定义数据类型：在标准模块中，可以使用 Private 或 Public 关键字来声明自定义数据类型。自定义数据类型中的元素的数据类型可以是系统提供的基本数据类型或已声明的自定义数据类型。28.滚动条控件中，用来设置鼠标单击滚动箭头时滚动条移动的大小的属性是_。（分数：2.00）A.MaxB.ValueC.LargeChangeD.SmallChange 解析：评析 滚动条控件(HScroll 或者 VScroll)的属性和事件：属性Value 属性Value 属性对应于滚动框在滚动条中的位置，其值介于 Min 和 Max 属性值之间。当 Value 属性值等于 Min属性值时，滚动框位于滚动条
25、的最左端(水平滚动条)或最顶端(垂直滚动条)；当 Value 属性值等于 Max属性值时，滚动框位于滚动条的最右端(水平滚动条)或最底端(垂直滚动条)。Min 和 Max 属性Min 属性设置滚动框位于滚动条最左端或者最顶端时 Value 属性的值。Max 属性设置滚动框位于滚动条最右端或者最底端时 Value 属性的值。SmallChange 属性设置鼠标单击滚动箭头时滚动框移动的大小。LaegeChange 属性设置鼠标单击滚动箭头和滚动框之间的区域时，滚动框的移动大小。事件Scroll 事件拖动滚动框时，Scroll 事件被触发。Change 事件释放滚动框或者单击滚动条或滚动箭头时，C
26、hange 事件被触发。29.在窗体上画一个驱动器列表框、一个目录列表框和一个文件列表框，其名称分别为 Drivel、Dirl 和Filel。当改变目录列表框的内容时，要求文件列表框中显示当前选中的文件夹中的内容，则在Dirl_Change 事件过程中应使用的语句是_。（分数：2.00）A.Dirvel.Drive=Dirl.PathB.Dirl.Path=Drivel.DriveC.Dirl.Path=Filel.PathD.Filel.Path=Dirl.Path 解析：评析 由于要在文件列表框中显示当前选中的文件夹中的内容，所以应使用的语句是FilelPath=DirlPath。30.下
27、列程序段的执行结果为_。I=0For G=10 To 19 Step 3I=I+1Next GPrint I（分数：2.00）A.4 B.5C.3D.6解析：评析 ForNext 循环该程序段的功能相当于根据循环变量的初始值，求循环体执行的次数。For 循环的循环次数=Int(终值-初值)/步长+1。故循环体(I=I+1)一共被执行 4 次，而每次执行 I 的值增加 1因此循环结束后 I 的值增加 4，即 I=0+4。31.在窗体上画一个命令按钮，其名称为 Commandl，然后编写如下程序：Function Fonc(By Val x As Integer,y As InteSer)y=x*
28、yIf y0 ThenFunc=X；ElseFunc=yEnd IfEnd FunctionPrivate Sub Commandl_Click()Dim a As Integer,b As Integera=3b=4c=Func(a,B) Print“a=“;aPrint“b=“;bPrint“C=“;CEnd Sub程序运行后，单击命令按钮，其输出结果为_。（分数：2.00）A.a=3 b=12 c=3 B.a=3 b=4 c=3C.a=3 b=4 c=12D.a=13 b=12 c=12解析：评析 函数 Func(3,4)的返回值为 3，故 c 的值为 3。由于参数 x 是按值传递的，a
29、 的值仍为 3；而参数 y 是按地址传递的，b 的值变为 3*4。32.以下叙述不正确的是_。（分数：2.00）A.在 Sub 过程中可以调用 Function 过程B.在用 Call 调用 Sub 过程时必须把参数放在括号里C.在 Sub 过程中可以嵌套定义 Function D.用 Static 声明的过程中的局部变量都是 Static 类型解析：评析 Visual Basic 中，可以直接使用过程名调用过程，也可以结合 Call 关键字调用。使用Call 调用过程时，参数列表必须用括号包含起来。Visual Basic 语言不支持函数与过程的嵌套定义。Static 关键字可以指定局部变量
30、为静态类型变量。33.在窗体上画一个文本框，其名称为 Textl。为了在程序运行后 Textl 中的文本不可编辑，应当使用的语句是_。（分数：2.00）A.Textl.ClearB.Textl.Locked=True C.Textl.Visible=FalseD.Textl.Enabled=Trve解析：评析 对于 Textbox 控件，可通过设置其 Visible 属性为 False，使其隐藏，设置 Enabled 属性为 False 使其不可用，设置 Locked 属性为 True，使其不可被编辑。34.为了使图片框的大小可以自动适应图片的尺寸，则应_。（分数：2.00）A.将其 Auto
31、size 属性值设置为 Tree B.将其 Autosize 属性值设置为 EalseC.将其 Stretch 属性值设置为 TrueD.将其 Stretch 属性值设置为 False解析：评析 图片框的 Autosizc 属性返回或设置一个值，以决定控件是否自动改变大小以显示其全部内容。该属性的值如果是 True，则控件根据图片的尺寸自动改变大小；该属性的值如果为 False，则控件不改变自身的大小，如果载入的图片尺寸大于控件的尺寸，则将超过控件尺寸的那部分图片剪裁掉。35.视图设计一般有 3 种设计次序，下列不属于视图设计的是_。（分数：2.00）A.自顶向下B.由外向内 C.由内向外D.
32、自底向上解析：评析 视图设计一般有 3 种设计次序，它们分别是自顶向下、自底向上和由内向外，它们又为视图设计提供了具体的操作方法，设计者可根据实际情况灵活掌握，可以单独使用也可混合使用。二、填空题(总题数：12，分数：24.00)36.实现算法所需的存储单元多少和算法的工作量大小分别称为算法的 【1】 。（分数：2.00）填空项 1:_ （正确答案：空间复杂度和时间复杂度）解析：评析 算法的复杂性是指对一个在有限步骤内终止算法和所需存储空间大小的估计。算法所需存储空间大小是算法的空间复杂性，算法的计算量是算法的时间复杂性。37.数据结构包括数据的逻辑结构、数据的 【2】 以及对数据的操作运算。
33、（分数：2.00）填空项 1:_ （正确答案：存储结构）解析：评析 数据结构包括 3 个方面，即数据的逻辑结构、数据的存储结构及对数据的操作运算。38.一个类可以从直接或间接的祖先中继承所有属性和方法。采用这个方法提高了软件的【3】 （分数：2.00）填空项 1:_ （正确答案：可重用性）解析：评析 继承的优点：相似的对象可以共享程序代码和数据结构，从而大大减少了程序中的冗余，提高软件的可重用性。39.面向对象的模型中，最基本的概念是对象和 【4】 。（分数：2.00）填空项 1:_ （正确答案：类）解析：评析 面向对象模型中，最基本的概念是对象和类。对象是现实世界中实体的模型化：将属性集和方
34、法集相同的所有对象组合在一起，可以构成一个类。40.软件维护活动包括以下几类：改正性维护、适应性维护、 【5】 维护和预防性维护。（分数：2.00）填空项 1:_ （正确答案：完善性）解析：评析 软件维护活动包括以下几类：改正性维护、适应性维护、完善性维护和预防性维护。改正性维护是指在软件交付使用后，为了识别和纠正软件错误、改正软件性能上的缺陷、排除实施中的误使用，应当进行的诊断和改正错误的过程：适应性维护是指为了使软件适应变化，而去修改软件的过程；完善性维护是指为了满足用户对软件提出的新功能与性能要求，需要修改或再开发软件，以扩充软件功能、增强软件性能、改进加工效率、提高软件的可维护性；预防
35、性维护是为了提高软件的可维护性、可靠性等，为以后的进一步改进软件打下良好基础。41.Visual Basic 中的控件分为 3 类，它们是标准控件、 【6】 和可插入对象。（分数：2.00）填空项 1:_ （正确答案：AcfiveX 控件）解析：评析 VisualBasic 中的控件分为以下 3 类；标准控件(也称内部控件)、ActiveX 控件、可插入对象。42.程序执行结果 s 的值是 【7】 。Private Sub subl(Byval p As Integer)p=p*2End SubPrivate Sub Commandl_Click()Dim i As Integeri=3Cal
36、l subl(i)ifi4 then i=i mod 2Print cstr(i)End Sub（分数：2.00）填空项 1:_ （正确答案：3）解析：评析 By Val 表示所声明的参数是按值传递的。因此参数值的变化只在被调用的函数或过程中有效，即只是形参的值有变化，而实参不受影响ByRef 表示所声明的参数是按地址传递的。因此形参值的变化都会反映在实参上。本题程序中，参数 p 是按值传递的，因此调用 subl 后，实参 i 的值仍为 3。43.在执行 KeyPress 事件过程时，KeyASCII 是所按键的 【8】 值。对于有上档字符和下档字符的键，当执行 KeyDown 事件过程时，K
37、eyCode 是 【9】 字符的 ASCII 值。（分数：2.00）填空项 1:_ （正确答案：8ASCII9下档）解析：评析 此事件当用户按下和松开一个 ANSI 键时发生。语法Private Sub object_key Press(index As Integer,keyasciiAs Integer)应当使用 KeyDown 和 KeyUP事件过程来处理任何不被 KeyPress 识别的击键，诸如：功能键、编辑键、定位键以及任何这些键和键盘换档键的组合等。与 KeyDown 和 KeyUp 事件不同的是，KeyPress 不显示键盘的物理状态，而只是传递一个字符。 KeyPmss 将每
38、个字符的大、小写形式作为不同的键代码解释，即作为两种不同的字符。而KeyDown 和 KeyUp 用两种参数解释每个字符的大写形式和小写形式：KeyCode显示物理的键(将 A 和 a作为同一个键返回)和 Shift指 Shift+Key 键的状态而且返回 A 或 a 其中之一。44.文件的打开和关闭语句分别是 【10】 和 【11】 。（分数：2.00）填空项 1:_ （正确答案：10Open11Close）解析：评析 Open 语句能够对文件输入/输出 (I/O)。其语法结构为：Open pathname For modeAccess accesslockAs或ffienumberLen=
39、reclength)关闭 Open 语句所打开的输入/输出(VO)文件使用的是 Close 语句。语法格式为Close fdenumberlist其中可选的 fdcnuraberlist 参数为一个或多个文件号。45.假定有如下程序代码，程序运行后，把鼠标光标移到窗体内，每单击一次，变换一种鼠标光标的形状，依次显示鼠标光标的 15 个属性。请在划线处将程序补充完整。Private Sub Form_Click()Static x As IntegerCisPrint“Mousepointer Property is now:;XForml 【12】 =xX=K+1If x=15 Then x=
40、0End Sub（分数：2.00）填空项 1:_ （正确答案：MousePointer）解析：评析 MousePointer 属性可以通过代码设置，也可以通过属性窗口设置，在程序代码中设置MousePointer 属性的一般格式为：对象MousePointer=设置值由于程序中使用 Static 关键字定义变量 x，每次单击窗体时 x 的值增加 1，并且下次单击宙体时，x 能保留上次的值，这样就能保证每次单击窗体时看到到鼠标光标都和上一次看到的不一样。46.在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Commandl_Click()Dim a (1 To 10)Dim
41、 p(1 To 3)k=5For i=1 To 10a(i)=iNextiFori=1 To 3p(i)=a(i*i)Next iFor i=1 To 3k=k+p(i)*2Next iPrint kEnd Sub程序运行后，单击命令按钮，输出结果是 【13】 。（分数：2.00）填空项 1:_ （正确答案：33）解析：评析 观察程序，通过第一个以 i 为循环变量的循环，给数组 a()进行赋值，数组 a()中的各个元素的值就是其下标值。通过第二个以 i 为循环变量的循环，给数组 p()进行赋值：i=1,(i)=a(i*i),p(1)=a(1)=1i=2,p(i)=a(i*i),p(2)=a(4
42、)=4i=3,p(i)=a(i*i),p(3)=a(9)=9通过第三个以 i 为循环变量的循环，得到变量 k 的值；i=1,k=k+p(i)*2=5+p(i)*2=7i=2,k=k+p(i)*2=7+p(2)*2=15i=3,k=k+p(i)*2=15+p(3)*2=33最终输出结果是：33。47.假定建立了一个工程，该工程包括两个窗体，其名称(Name 属性)分别为 Form1 和 Form2，启动窗体为Form1。在 Form1 上画一个命令按钮 Command1，程序运行后，要求当单击该命令按钮时，Form1 窗体消失，显示窗体 Form2，请将下面的程序补充完整。Private Sub
43、 Command1_Click()【14】 Form1Form2 【15】 End Sub（分数：2.00）填空项 1:_ （正确答案：14Unload15Show 或 Showl 评析，Unload 语句、Show 方法Unload 语句用来将指定窗体从内存中清除。格式：Unload 窗体名称Show 方法用来显示一个窗体。格式：窗体名称Show模式参数“模式”用来确定显示窗体的状态，可以取值 0 或 1。取值为 0(0 值是缺省值)则窗体是“无模式”窗体，当该窗体显示出来时，不但可以对该窗体进行操作，还可以对其他显示出来的窗体进行操作；取值为 1 则窗体是“模式”窗体，当该窗体显示出来时，只能对该窗体进行操作，只有当该窗体关闭后，才能对其他窗体进行操作。）解析：
