1、国家二级（VB）机试模拟试卷 169 及答案解析(总分：86.00，做题时间：90 分钟)一、选择题(总题数：40，分数：80.00)1.下列叙述中正确的是( )。（分数：2.00）A.线性表的链式存储结构与顺序存储结构所需要的存储空间是相同的B.线性表的链式存储结构所需要的存储空间一般要多于顺序存储结构C.线性表的链式存储结构所需要的存储空间一般要少于顺序存储结构D.线性表的链式存储结构与顺序存储结构在存储空间的需求上没有可比性2.下列叙述中正确的是( )。（分数：2.00）A.栈是一种先进先出的线性表B.队列是一种后进先出的线性表C.栈与队列都是非线性结构D.以上三种说法都不对3.软件测试
2、的目的是( )。（分数：2.00）A.评估软件可靠性B.发现并改正程序中的错误C.改正程序中的错误D.发现程序中的错误4.在软件开发中，需求分析阶段产生的主要文档是( )。（分数：2.00）A.软件集成测试计划B.软件详细设计说明书C.用户手册D.软件需求规格说明书5.软件生命周期是指( )。（分数：2.00）A.软件产品从提出、实现、使用维护到停止使用退役的过程B.软件从需求分析、设计、实现到测试完成的过程C.软件的开发过程D.软件的运行维护过程6.面向对象方法中，继承是指( )。（分数：2.00）A.一组对象所具有的相似性质B.一个对象具有另一个对象的性质C.各对象之间的共同性质D.类之间
3、共享属性和操作的机制7.层次型、网状型和关系型数据库划分原则是( )。（分数：2.00）A.记录长度B.文件的大小C.联系的复杂程度D.数据之间的联系方式8.一个工作人员可以使用多台计算机，而一台计算机可被多个人使用，则实体工作人员与实体计算机之间的联系是( )。（分数：2.00）A.一对一B.一对多C.多对多D.多对一9.数据库设计中反映用户对数据要求的模式是( )。（分数：2.00）A.内模式B.概念模式C.外模式D.设计模式10.有三个关系 R、S 和 T 如下： （分数：2.00）A.自然连接B.差C.交D.并11.以下叙述中正确的是( )。（分数：2.00）A.在属性窗口只能设置窗体
4、的属性B.在属性窗口只能设置控件的属性C.在属性窗口可以设置窗体和控件的属性D.在属性窗口可以设置任何对象的属性12.下列打开“代码窗口”的操作中错误的是( )。（分数：2.00）A.按 F4 键B.单击“工程资源管理器”窗口中的“查看代码”按钮C.双击已建立好的控件D.执行“视图”菜单中的“代码窗口”命令13.以下叙述中错误的是( )。（分数：2.00）A.Visual Basic 是事件驱动型可视化编程工具B.Visual Basic 应用程序不具有明显的开始和结束语句C.Visual Basic 工具箱中的所有控件都具有宽度(Width)和高度(Height)属性D.Visual Bas
5、ic 中控件的某些属性只能在运行时设置14.设 a=2，b=3，c=4，d=5，下列表达式的值是( )。 ab And cc（分数：2.00）A.TrueB.FalseC.一 1D.115.在标准模块中用 Public 关键字定义的变量，其作用域为( )。（分数：2.00）A.本模块所有过程B.整个工程C.所有窗体D.所有标准模块16.假定有如下语句： answer$=MsgBox(“Stringl“，“String2“，“String3“，2) 执行该语句后，将显示一个信息框，单击其中的“确定”按钮，则 answer$的值为( )。（分数：2.00）A.StringlB.String2C.S
6、tring3D.117.设 a=10，b=5，c=1，执行语句 Print abc 后，窗体上显示的是( )。（分数：2.00）A.TrueB.FalseC.1D.出错18.为了通过传值方式来传送过程参数，在函数声明部分应使用的关键字为( )。（分数：2.00）A.ValueB.ByValC.ByRefD.Reference19.以下说法中正确的是( )。（分数：2.00）A.事件过程也是过程，只能由其他过程调用B.事件过程的过程名是由程序设计者命名的C.事件过程通常放在标准模块中D.事件过程是用来处理由用户操作或系统激发的事件的代码20.设有语句： Open“c：TestDat“For Ou
7、tput As #1 则以下叙述中错误的是( )。（分数：2.00）A.该语句打开 c 盘根目录下的一个文件 TestDat，如果该文件不存在则出错B.该语句打开 C 盘根目录下一个名为 TestDat 的文件，如果该文件不存在则创建该文件C.该语句打开文件的文件号为 1D.执行该语句后，就可以通过 Print#语句向文件 TestDat 中写入信息21.在窗体上画两个文本框，其名称分别为 Text1 和 Text2，然后编写如下程序： Private Sub Form_Load() Show Text1Text=“ Text2Text=“ Text1SetFocus End Sub Priv
8、ate Sub Text1_Change() Text2Text=Mid(Text1Text，6) End Sub 程序运行后，如果在文本框 Text1 中输入ChinaBeijing，则在文本框 Text2 中显示的内容足( )。（分数：2.00）A.ChinaBeijingB.ChinaC.BeijingD.ChinaB22.在窗体上画一个水平滚动条，其属性值满足 MinA.增加一个 SmallChange 量B.减少一个 SmallChange 量C.增加一个 LargeChange 量D.减少一个 LargeChange 量23.在窗体上画一个组合框，一个命令按钮和一个文本框，其名称分
9、别为 Combo1，Command1 和 Text1，然后编写如下事件过程： Private Sub Form_Load() Combo1AddItem“AAAAA“ Combo1AddItem“BBBBB“ Combo1Addltem“CCCCC“ Combo1AddItem“DDDDD“ Combo1AddItem“EEEEE“ End Sub 程序运行后，如果单击命令按钮，则在文本框中显示组合框的项目“CCCCC”。为了实现该操作，在命令按钮的 Click 事件过程中应使用的语句为( )。（分数：2.00）A.Text1Text=Combo1List(2)B.Text1Text=Comb
10、o1TextC.Text1Text=Combo1List(3)D.Text1Text=Combo1ListIndex24.为了使文本框只具有垂直滚动条，应先把 MultiLine 属性设置为 True，然后再把 ScrollBars 属性设置为 ( )。（分数：2.00）A.0B.1C.2D.325.能够用于标识对象名称的属性是( )。（分数：2.00）A.NameB.CaptionC.ValueD.Text26.关于水平滚动条，如下叙述中错误的是( )。（分数：2.00）A.当滚动框的位置改变时，触发 Change 事件B.当拖动滚动条中的滚动框时，触发 Scroll 事件C.LargeCh
11、ange 属性是滚动条的最大值D.Value 是滚动条中滚动框的当前值27.对于列表框控件 List1，能够表示当前被选中列表项内容的是( )。（分数：2.00）A.List1TextB.List1IndexC.List1ListIndexD.List1List28.当文本框中的内容发生改变时所触发的事件是( )。（分数：2.00）A.KeyUpB.ChangeC.LostFocusD.GotFocus29.定时器的 Interval 属性的值是一个整数，它表示的是( )。（分数：2.00）A.毫秒数B.秒数C.分钟数D.小时数30.阅读程序： Private Sub Form_Click()
12、 a=0 For j=1 To 15 a=a+j Mod 3 Next i Print a End Sub 程序运行后，单击窗体，输出结果是( )。（分数：2.00）A.105B.1C.120D.1531.在窗体上画一个命令按钮，其名称为 Command1，然后编写如下代码： Option Base j Private Sub Command1_Click() Dim a a=Array(1，2，3，4) j=l For i=4 To 1 Step 一 1 s=s+a(i)*j j=j*10 Next i Print s End Sub 程序运行后，单击命令按钮，其输出结果是( )。（分数：2
13、.00）A.4321B.1234C.34D.1232.在窗体上画一个命令按钮，名称为 Command1，然后编写如下代码： Option Base 0 Private Sub Command1_Click() Dim A1(4)As Integer，A2(4)As Integer For k=0 To 2 A1(k+1)=InputBox(“请输入一个整数“) A2(3 一 k)=A1(k+1) Next k Print A2(k) End Sub 程序运行后，单击命令按钮，在输入对话框中依次输入 2、4、6，则输出结果为( )。（分数：2.00）A.0B.1C.2D.333.在窗体上画两个标
14、签和一个命令按钮，其名称分别为 Label1、Label2 和 Command1，然后编写如下程序： Private Sub func(L As Label) LCaption=“1234“ End Sub Pfivate Sub Form_Load() Label1Caption=“ABCDE“ Label2Caption=10 End Sub Private Sub Command1_Click() a=Val(Label2Caption) Call func(Tabell) Label2Caption=a End Sub 程序运行后，单击命令按钮，则在两个标签中显示的内容分别为( )。（
15、分数：2.00）A.ABCD 和 10B.1234 和 100C.ABCD 和 100D.1234 和 1034.在窗体上画一个命令按钮(名称为 Command1)，并编写如下代码： Function Fun1(ByVal a As Integer，b As Integer)As Integer Dim t As Integer t=ab b=t+a Fun1=t+b End Function Private Sub Command1_Click() Dim x As Integer x=10 Print Fun1(Fun1(x，(Fun1(x，x 一 1)，x 一 1) End Sub 程序
16、运行后，单击命令按钮，输出结果是( )。（分数：2.00）A.10B.0C.11D.2135.设有如下通用过程： Public Function Fun(xStr As String)As String Dim tStr As String，strL As Integer lStr=“ strL=Len(xStr) i=strL2 Do While i=strL tStr=tStr&Mid(xStr，i+1，1) i=i+1 Loop Fun=tStr&tStr End Function 在窗体上画一个名称为 Text1 的文本框和一个名称为Command1 的命令按钮。然后编写如下的事件过程
17、： Private Sub Command1_Click() Dim S1 As String SI=“ABCDEF“ Text1Text=LCase(Fun(S1) End Sub 程序运行后，单击命令按钮，文本框中显示的是( )。（分数：2.00）A.ABCDEFB.abcdefC.defdefD.defabc36.在窗体上画一个命令按钮和一个文本框(名称分别为 Command1 和 Text1)，并把窗体的 KeyPreView 属性设置为 True，然后编写如下代码： Dim SaveAll As String Private Sub Form_Load() Show Text1Tex
18、t=“ Text1SetFocus End Sub Private Sub Command1_Click() Text1Text=LCase(SaveAll)+SaveAll End Sub Private Sub Form_KeyPress(KeyAscii As Integer) SaveAll=SaveAll+Chr(KeyAscii) End Sub 程序运行后，直接用键盘输入：VB再单击命令按钮，则文本框中显示的内容为( )。（分数：2.00）A.vbVBB.不显不任何信息C.VBD.出错37.设有以下程序： Private Sub Form_Click() x=50 For i=1
19、 To 4 y=InputBox(“请输入一个整数“) y=Val(Y) If y Mod 5=0 Then a=a+y x=y Else a=a+x End If Next i Print a End Sub 程序运行后，单击窗体，在输入对话框中依次输入 15、24、35、46，输出结果为( )。（分数：2.00）A.100B.50C.120D.7038.设在工程文件中有一个标准模块，其中定义了如下记录类型： Type Books Name As String*10 TelNum As String*20 End Type 在窗体上画一个名为 Command1 的命令按钮，要求当执行事件过程
20、Command1_Click 时，在顺序文件 Persontxt 中写入一条 Books 类型的记录。下列能够完成该操作的事件过程是( )。（分数：2.00）A.Private Sub Command1_Click() Dim B As Books Open“Persontxt“For Output As #1 BName=InputBox(“输入姓名“) BTelNum=InputBox(“输入电话号码“) Write #1BName，BTelNum Close #1 End SuhB.Private Sub Command1_Click() Dim B As Books Open“Pers
21、ontxt“For Input As #1 BName=InputBox(“输入姓名“) BTelNum=InputBox(“输入电话号码“) Print #1，BName，BTelNum Close #1 Fnd SubC.Private Sub Command1_Click() Dim B As Books Open“Persontxt“For Output As #1 BName=InputBox(“输入姓名“) BTelNum=InputBox(“输入电话号码“) Write #1B Close #1 End SubD.Private Sub Command1_Click() Open
22、“Persontxt“For Input As #1 Name=InputBox(“输入姓名“) TelNum=InputBox(“输入电话号码“) Print #1，Name，TelNum Close #1 End Sub39.有如下过程代码： Sub var_dim( ) Static numa As Integer Dim numb As Integer numa=numa+2 numb=numb+1 print numa；numb End Sub 连续 3 次调用 vat_dim 过程，第 3 次调用时的输出是( )。（分数：2.00）A.2 1B.2 3C.6 1D.6 340.在窗
23、体上画 1 个命令按钮，并编写如下事件过程： Private Sub Command1_Click() Dim a(3，3) For m=1 To 3 For n=1 To 3 If n=m Or n=4 一 m Then a(m，n)=m+n Else a(m，n)=0 End If Print a(m，n)；Next n Print Next m End Sub 运行程序，单击命令按钮，窗体上显示的内容为( )。（分数：2.00）A.2 0 0 0 4 0 0 0 6B.2 0 4 0 4 0 4 0 6C.2 3 0 3 4 0 0 0 6D.2 0 0 0 4 5 0 5 6二、基本操
24、作题(总题数：1，分数：2.00)41.(1)在名称为 Form1 的窗体上添加一个名称为 Command1 的命令按钮数组，含三个命令按钮，它们的标题依次为“是”、“否”、“取消”，Index 属性分别为 0、1、2，每个按钮的高、宽均为 300、800。窗体的标题为“按钮窗口”。运行后的窗体如图所示。 注意：存盘时必须存放在考生文件夹下，工程文件名保存为 sjt1vbp，窗体文件名保存为 sjt1frm。 (2)在名称为 Form1 的窗体上添加一个名称为Shal 的形状控件，然后建立一个菜单，名称为 shape0，标题为“形状”，该菜单有两个子菜单，其名称分别为 shape1 和 sha
25、pe2，其标题分别为“正方形”和“圆形”，如图所示。然后编写适当的程序。程序运行后，如果选择“正方形”菜单项，则形状控件显示为正方形；如果选择“圆形”菜单项，则窗体上的形状控件显示为圆形。 注意：程序中不能使用变量，每个事件过程中只能写一条语句。保存时必须存放在考生文件夹下，工程文件名保存为 sjt2vbp，窗体文件名保存为 sit2frm。 （分数：2.00）_三、简单应用题(总题数：1，分数：2.00)42.(1)在考生文件夹下有一个工程文件 sjt3vbp，含有两个窗体，名称分别为 Form1、Form2。其中Form1 上有两个控件(图像框和计时器)和一个菜单项“操作”，含有三个子菜单
26、(如图 1 所示)。Form2 上有一个名称为 Command1、标题为“返回”的命令按钮(如图 2 所示)。要求当单击“窗体 2”菜单命令时，Form1 隐藏，Form2 显示。单击“动画”菜单命令时，使小汽车开始移动，一旦移到窗口的右边界时自动跳到窗体的左边界重新开始移动。单击“退出”菜单命令时，结束程序运行。请去掉程序中的注释符，把程序中的?改为正确的内容。 注意：考生不得修改窗体文件中已经存在的程序。最后程序按原文件名存盘。(2)在考生文件夹下有一个工程文件 sjt4vbp。其窗体上已有部分控件，请按照图 1 所示添加框架和单选按钮。要求：添加两个框架，名称分别为 Framel、Fra
27、me2，在 Framel 中添加一个名为 Option1 的单选按钮数组，含两个单选按钮，标题分别为“古典音乐”、“流行音乐”，在 Frame2 中添加两个单选按钮，名称分别为 Option2、Option3，标题分别为“篮球”、“羽毛球”。刚运行程序时，“古典音乐”和“篮球”单选按钮初始状态为选中状态。单击“选择”按钮，将把选中的单选钮的标题显示在标签Label2 中，如图 2 所示。如果“音乐”或“体育”未被选中，相应的单选按钮不可用。 要求：按照题目要求添加控件，去掉程序中的注释符，把程序中的?改为正确的内容。 注意：不能修改程序的其他部分和控件属性。最后将修改后的文件按原文件名存盘。
28、（分数：2.00）_四、综合应用题(总题数：1，分数：2.00)43.在考生文件夹下有一个工程文件 sjt5vbp，相应的窗体文件为 sjt5frm，此外还有一个名为dataintxt 的文本文件，其内容如下： 32 43 76 58 28 12 98 57 31 42 53 64 75 86 97 13 24 35 46 57 68 79 80 59 37 程序运行后，单击窗体，将把文件 dataintxt 中的数据输入到二维数组 Mat 中，按 5 行、5 列的矩阵形式在窗体上显示出来，并输出矩阵右上一左下对角线上的数据，如图所示。在窗体的代码窗口中，已给出了部分程序，这个程序不完整，请把
29、它补充完整，并能正确运行。 （分数：2.00）_国家二级（VB）机试模拟试卷 169 答案解析(总分：86.00，做题时间：90 分钟)一、选择题(总题数：40，分数：80.00)1.下列叙述中正确的是( )。（分数：2.00）A.线性表的链式存储结构与顺序存储结构所需要的存储空间是相同的B.线性表的链式存储结构所需要的存储空间一般要多于顺序存储结构 C.线性表的链式存储结构所需要的存储空间一般要少于顺序存储结构D.线性表的链式存储结构与顺序存储结构在存储空间的需求上没有可比性解析：解析：线性链式存储结构中每个结点都由数据域与指针域两部分组成，增加了存储空间，所以一般要多于顺序存储结构。2.下
30、列叙述中正确的是( )。（分数：2.00）A.栈是一种先进先出的线性表B.队列是一种后进先出的线性表C.栈与队列都是非线性结构D.以上三种说法都不对 解析：解析：栈是一种先进后出的线性表，队列是一种先进先出的线性表，栈与队列都是线性结构。3.软件测试的目的是( )。（分数：2.00）A.评估软件可靠性B.发现并改正程序中的错误C.改正程序中的错误D.发现程序中的错误 解析：解析：软件测试是为了发现错误而执行程序的过程，测试要以查找错误为中心，而不是为了演示软件的正确功能。不是为了评估软件或改正错误。4.在软件开发中，需求分析阶段产生的主要文档是( )。（分数：2.00）A.软件集成测试计划B.
31、软件详细设计说明书C.用户手册D.软件需求规格说明书 解析：解析：需求分析阶段的工作可以概括为：需求获取、需求分析、编写需求规格说明书、需求评审四个方面。所以选择 D。5.软件生命周期是指( )。（分数：2.00）A.软件产品从提出、实现、使用维护到停止使用退役的过程 B.软件从需求分析、设计、实现到测试完成的过程C.软件的开发过程D.软件的运行维护过程解析：解析：通常，将软件产品从提出、实现、使用维护到停止使用退役的过程称为软件生命周期。也就是说，软件产品从考虑其概念开始，到该软件产品不能使用为止的整个时期都属于软件生命周期。6.面向对象方法中，继承是指( )。（分数：2.00）A.一组对象
32、所具有的相似性质B.一个对象具有另一个对象的性质C.各对象之间的共同性质D.类之间共享属性和操作的机制 解析：解析：继承是面向对象的方法的一个主要特征，是使用已有的类的定义作为基础建立新类的定义技术。广义的说，继承是指能够直接获得已有的性质和特征，而不必重复定义它们，所以说继承是指类之间共享属性和操作的机制。7.层次型、网状型和关系型数据库划分原则是( )。（分数：2.00）A.记录长度B.文件的大小C.联系的复杂程度D.数据之间的联系方式 解析：解析：层次模型的基本结构是树形结构，网状模型是一个不加任何条件限制的无向图，关系模型采用二维表来表示，所以三种数据库的划分原则是数据之间的联系方式。
33、8.一个工作人员可以使用多台计算机，而一台计算机可被多个人使用，则实体工作人员与实体计算机之间的联系是( )。（分数：2.00）A.一对一B.一对多C.多对多 D.多对一解析：解析：因为一个人可以操作多个计算机，而一台计算机又可以被多个人使用，所以两个实体之间是多对多的关系。9.数据库设计中反映用户对数据要求的模式是( )。（分数：2.00）A.内模式B.概念模式C.外模式 D.设计模式解析：解析：数据库系统的三级模式是概念模式、外模式和内模式。概念模式是数据库系统中全局数据逻辑结构的描述，是全体用户公共数据视图。外模式也称子模式或用户模式，它是用户的数据视图，给出了每个用户的局部数据描述，所
34、以选择 C。内模式又称物理模式，它给出了数据库物理存储结构与物理存取方法。10.有三个关系 R、S 和 T 如下： （分数：2.00）A.自然连接B.差 C.交D.并解析：解析：关系 T 中的元组是 R 关系中有而 s 关系中没有的元组的集合，所以进行的是差的运算。11.以下叙述中正确的是( )。（分数：2.00）A.在属性窗口只能设置窗体的属性B.在属性窗口只能设置控件的属性C.在属性窗口可以设置窗体和控件的属性 D.在属性窗口可以设置任何对象的属性解析：解析：在属性窗口中只能设置窗体和各种控件的属性，故 C 选项正确。12.下列打开“代码窗口”的操作中错误的是( )。（分数：2.00）A.
35、按 F4 键 B.单击“工程资源管理器”窗口中的“查看代码”按钮C.双击已建立好的控件D.执行“视图”菜单中的“代码窗口”命令解析：解析：按 F4 键打开的是“属性窗口”，故 A 选项错误。13.以下叙述中错误的是( )。（分数：2.00）A.Visual Basic 是事件驱动型可视化编程工具B.Visual Basic 应用程序不具有明显的开始和结束语句C.Visual Basic 工具箱中的所有控件都具有宽度(Width)和高度(Height)属性 D.Visual Basic 中控件的某些属性只能在运行时设置解析：解析：VB 工具箱中不是所有的控件都具有宽度和高度属性，比如定时器控件
36、Timer、直线控件Line 就没有。故 C 选项错误。14.设 a=2，b=3，c=4，d=5，下列表达式的值是( )。 ab And cc（分数：2.00）A.TrueB.False C.一 1D.1解析：解析：根据运算符的优先级顺序，先计算算术运算符，结果是 23 And 44；再计算关系运算符，结果为 False And True Or False；And 优先级高于 Or 优先级，先计算 And，再计算 Or，最后结果是 False。故 B 选项正确。15.在标准模块中用 Public 关键字定义的变量，其作用域为( )。（分数：2.00）A.本模块所有过程B.整个工程 C.所有窗体
37、D.所有标准模块解析：解析：在标准模块中用 Public 定义的变量是公用的、全局变量，在整个工程中的所有窗口、模块中都能引用，作用域是整个工程。故 B 选项正确。16.假定有如下语句： answer$=MsgBox(“Stringl“，“String2“，“String3“，2) 执行该语句后，将显示一个信息框，单击其中的“确定”按钮，则 answer$的值为( )。（分数：2.00）A.StringlB.String2C.String3D.1 解析：解析：MsgBox 函数的作用：在对话框中显示消息，等待用户单击按钮，并返回一整数，告诉用户_单击哪一个按钮。Msgbox 函数的格式是： M
38、sgBox(提示信息，按钮样式，标题信息，帮助文件，帮助上下文编号) 本题 MsgBox 函数语句运行后，信息对话框中提示信息是“String1”，标题栏信息是“String2”，对话框出现一个“确定”按钮，单击“确定”按钮返回“确定”按钮对应的一个整数值1，并把 1 赋给 answer 变量。故 D 选项正确。17.设 a=10，b=5，c=1，执行语句 Print abc 后，窗体上显示的是( )。（分数：2.00）A.TrueB.False C.1D.出错解析：解析：本题中 Print 语句中的表达式只有“”运算符，相同优先级，左结合。先计算 ab，即105，值为 True，(即一 1)
39、，再计算一 11，结果为 False。故 B 选项正确。18.为了通过传值方式来传送过程参数，在函数声明部分应使用的关键字为( )。（分数：2.00）A.ValueB.ByVal C.ByRefD.Reference解析：解析：Value 是控件的属性名。用 ByVal 关键字声明形参表示该参数按值传递。ByRet 是默认的参数类型，表示该参数按地址传递。没有 Reference 关键字。故 B 选项正确。19.以下说法中正确的是( )。（分数：2.00）A.事件过程也是过程，只能由其他过程调用B.事件过程的过程名是由程序设计者命名的C.事件过程通常放在标准模块中D.事件过程是用来处理由用户操
40、作或系统激发的事件的代码 解析：解析：事件过程也是过程，其他过程或系统都可以调用它。故 A 选项错误。 事件过程的过程名是由系统命名的。故 B 选项错误。 通常事件过程放在窗体模块中。故 C 选项错误。 事件过程是用来处理由用户操作或系统激发的事件的代码。只有当用户或系统触发事件后，才执行相应的事件过程。故 D 选项正确。20.设有语句： Open“c：TestDat“For Output As #1 则以下叙述中错误的是( )。（分数：2.00）A.该语句打开 c 盘根目录下的一个文件 TestDat，如果该文件不存在则出错 B.该语句打开 C 盘根目录下一个名为 TestDat 的文件，如
41、果该文件不存在则创建该文件C.该语句打开文件的文件号为 1D.执行该语句后，就可以通过 Print#语句向文件 TestDat 中写入信息解析：解析：本题中是用 Open 语句打开一个顺序文件 TestDat，并指定一个文件号 1。故 C 选项正确。 如果 TestDat 文件不存在，则系统自动创建该文件。故 B 选项正确，A 选项错误。 用 ForOutput 模式打开文件，可通过 Print#语句向文件写入信息。故 D 选项正确。21.在窗体上画两个文本框，其名称分别为 Text1 和 Text2，然后编写如下程序： Private Sub Form_Load() Show Text1Te
42、xt=“ Text2Text=“ Text1SetFocus End Sub Private Sub Text1_Change() Text2Text=Mid(Text1Text，6) End Sub 程序运行后，如果在文本框 Text1 中输入ChinaBeijing，则在文本框 Text2 中显示的内容足( )。（分数：2.00）A.ChinaBeijingB.ChinaC.Beijing D.ChinaB解析：解析：程序运行后，在文本框 Text1 中输入字符后，触发它的 Change 事件，通过中部截取函数Mid 把文本框 Text1 中的内容从第 6 个字符B开始截取后面的字符，得到
43、“Beijing”字符串，然后把截取的字符串在 Text2 中显示出来。故 C 选项正确。22.在窗体上画一个水平滚动条，其属性值满足 MinA.增加一个 SmallChange 量 B.减少一个 SmallChange 量C.增加一个 LargeChange 量D.减少一个 LargeChange 量解析：解析：当水平滚动条的属性值 Min23.在窗体上画一个组合框，一个命令按钮和一个文本框，其名称分别为 Combo1，Command1 和 Text1，然后编写如下事件过程： Private Sub Form_Load() Combo1AddItem“AAAAA“ Combo1AddItem
44、“BBBBB“ Combo1Addltem“CCCCC“ Combo1AddItem“DDDDD“ Combo1AddItem“EEEEE“ End Sub 程序运行后，如果单击命令按钮，则在文本框中显示组合框的项目“CCCCC”。为了实现该操作，在命令按钮的 Click 事件过程中应使用的语句为( )。（分数：2.00）A.Text1Text=Combo1List(2) B.Text1Text=Combo1TextC.Text1Text=Combo1List(3)D.Text1Text=Combo1ListIndex解析：解析：List 属性可以返回组合框中各选项的内容。用下标区分各选项，第
45、 1 个选项下标为 0，依次类推。“CCCCC”为组合框中第 3 个选项，可以用 Combo1List(2)返回选项内容。故 A 选项正确，C 选项错误。 Text 属性返回的是组合框中选中项目的内容；ListIndex 属性返回的是选中项目的索引值，即下标。故 B、D 选项错误。24.为了使文本框只具有垂直滚动条，应先把 MultiLine 属性设置为 True，然后再把 ScrollBars 属性设置为 ( )。（分数：2.00）A.0B.1C.2 D.3解析：解析：文本框的 ScrollBars 属性值：0 表示无滚动条，1 表示只有水平滚动条，2 表示只有垂直滚动条，3 表示水平和垂直
46、滚动条都有。本题文本框只具有垂直滚动条，则 ScrollBal 属性值就设置为 2，故 C 选项正确。25.能够用于标识对象名称的属性是( )。（分数：2.00）A.Name B.CaptionC.ValueD.Text解析：解析：每个对象都有 Name 属性，用于识别不同的对象。故选 A。26.关于水平滚动条，如下叙述中错误的是( )。（分数：2.00）A.当滚动框的位置改变时，触发 Change 事件B.当拖动滚动条中的滚动框时，触发 Scroll 事件C.LargeChange 属性是滚动条的最大值 D.Value 是滚动条中滚动框的当前值解析：解析：LargeChange 属性值是单击
47、滚动块和左右两端箭头之间空白的地方时，Value 增加或减少的量，Small 属性值才是滚动条的最大值。故 C 选项错误。27.对于列表框控件 List1，能够表示当前被选中列表项内容的是( )。（分数：2.00）A.List1Text B.List1IndexC.List1ListIndexD.List1List解析：解析：Text 属性可返回当前被选中列表项的内容，故选 A。 Index 属性是当有列表框控件数组时，区分各列表框用的；List1ndex 属性返回的是被选中的列表项的索引值；List 属性设置或返回各列表项的内容。28.当文本框中的内容发生改变时所触发的事件是( )。（分数：
48、2.00）A.KeyUpB.Change C.LostFocusD.GotFocus解析：解析：文本框中内容有变化时，触发 Change 事件。故 B 选项正确。 当在文本框中输入数据，松开键盘时触发它的 KeyUp 事件；文本框失去焦点触发 LostFocus 事件；获得焦点，触发 GotFocus 事件。29.定时器的 Interval 属性的值是一个整数，它表示的是( )。（分数：2.00）A.毫秒数 B.秒数C.分钟数D.小时数解析：解析：Interval 的属性值是以毫秒计，所以是毫秒数。故选 A。30.阅读程序： Private Sub Form_Click() a=0 For j=1 To 15 a=a+j Mod 3 Next i Print a End Sub 程序运行后，单击窗体，输出结果是( )。（分数：2.00）A.105B.1C.120D.15 解析：解析：Mod 是求模运算符，即求余数，程序中 jMod 3 的余数可能值为 0，1，2，1 到 15 的整数中，3、6、9、12、15 这 5 个数除 3 的余数为 0，1、4、7、10
