1、二级 VISUAL+BASIC-50 (1)及答案解析(总分：100.00，做题时间：90 分钟)一、B选择题/B(总题数：40，分数：100.00)1.下列叙述中正确的是_。 A.线性表的链式存储结构与顺序存储结构所需要的存储空间是相同的 B.线性表的链式存储结构所需要的存储空间一般要多于顺序存储结构 C.线性表的链式存储结构所需要的存储空间一般要少于顺序存储结构 D.线性表的链式存储结构与顺序存储结构在存储空间的需求上没有可比性（分数：3.00）A.B.C.D.2.下列叙述中正确的是_。 A.栈是一种先进先出的线性表 B.队列是一种后进先出的线性表 C.栈与队列都是非线性结构 D.以上三种
2、说法都不对（分数：3.00）A.B.C.D.3.软件测试的目的是_。 A.评估软件可靠性 B.发现并改正程序中的错误 C.改正程序中的错误 D.发现程序中的错误（分数：3.00）A.B.C.D.4.在软件开发中，需求分析阶段产生的主要文档是_。 A.软件集成测试计划 B.软件详细设计说明书 C.用户手册 D.软件需求规格说明书（分数：3.00）A.B.C.D.5.软件生命周期是指_。 A.软件产品从提出、实现、使用维护到停止使用退役的过程 B.软件从需求分析、设计、实现到测试完成的过程 C.软件的开发过程 D.软件的运行维护过程（分数：3.00）A.B.C.D.6.面向对象方法中，继承是指_。
3、 A.一组对象所具有的相似性质 B.一个对象具有另一个对象的性质 C.各对象之间的共同性质 D.类之间共享属性和操作的机制（分数：3.00）A.B.C.D.7.层次型、网状型和关系型数据库划分原则是_。 A.记录长度 B.文件的大小 C.联系的复杂程度 D.数据之间的联系方式（分数：3.00）A.B.C.D.8.一个工作人员可以使用多台计算机，而一台计算机可被多个人使用，则实体工作人员与实体计算机之间的联系是_。 A.一对一 B.一对多 C.多对多 D.多对一（分数：3.00）A.B.C.D.9.数据库设计中反映用户对数据要求的模式是_。 A.内模式 B.概念模式 C.外模式 D.设计模式（分
4、数：3.00）A.B.C.D.10.有三个关系 R、S 和 T 如下：则由关系 R 和 S 得到关系 T 的操作是_。（分数：3.00）A.B.C.D.11.以下叙述中正确的是_。 A.在属性窗口只能设置窗体的属性 B.在属性窗口只能设置控件的属性 C.在属性窗口可以设置窗体和控件的属性 D.在属性窗口可以设置任何对象的属性（分数：3.00）A.B.C.D.12.下列打开“代码窗口”的操作中错误的是_。 A.按 F4 键 B.单击“工程资源管理器”窗口中的“查看代码”按钮 C.双击已建立好的控件 D.执行“视图”菜单中的“代码窗口”命令（分数：3.00）A.B.C.D.13.以下叙述中错误的是
5、_。 A.VisualBasic 是事件驱动型可视化编程工具 B.Visual Basic 应用程序不具有明显的开始和结束语句 C.Visual Basic 工具箱中的所有控件都具有宽度(Width)和高度(Height)属性 D.VisualBasic 中控件的某些属性只能在运行时设置（分数：3.00）A.B.C.D.14.设 a=2，b=3，c=4，d=5，下列表达式的值是_。ab And c=d Or 2*ac A.True B.False C.-1 D.1（分数：3.00）A.B.C.D.15.在标准模块中用 Public 关键字定义的变量，其作用域为_。 A.本模块所有过程 B.整个
6、工程 C.所有窗体 D.所有标准模块（分数：3.00）A.B.C.D.16.假定有如下语句：answer$=MsgBox(“String1“,“String2“,“String3“,2)执行该语句后，将显示一个信息框，单击其中的“确定”按钮，则 answer$的值为_。 A.String1 B.String2 C.String3 D.1（分数：2.00）A.B.C.D.17.设 a=10，b=5，c=1，执行语句 Print abc 后，窗体上显示的是_。 A.True B.False C.11 D.出错（分数：2.00）A.B.C.D.18.为了通过传值方式来传送过程参数，在函数声明部分应使
7、用的关键字为_。 A.Value B.ByVal C.ByRef D.Reference（分数：2.00）A.B.C.D.19.以下说法中正确的是_。 A.事件过程也是过程，只能由其他过程调用 B.事件过程的过程名是由程序设计者命名的 C.事件过程通常放在标准模块中 D.事件过程是用来处理由用户操作或系统激发的事件的代码（分数：2.00）A.B.C.D.20.设有语句：Open“c:/Test.Dat“For Output As#1则以下叙述中错误的是_。 A.该语句打开 C 盘根目录下的一个文件 Test.Dat，如果该文件不存在则出错 B.该语句打开 C 盘根目录下一个名为 Test.Da
8、t 的文件，如果该文件不存在则创建该文件 C.该语句打开文件的文件号为 1 D.执行该语句后，就可以通过 Print#语句向文件 Test.Dat 中写入信息（分数：2.00）A.B.C.D.21.在窗体上画两个文本框，其名称分别为 Text1 和 Text2，然后编写如下程序：Private Sub Form_Load()ShowText1.Text=“Text2.Text=“Text1.SetFocusEnd SubPrivate Sub Text1_Change()Text2.Text=Mid(Text1.Text,6)End Sub程序运行后，如果在文本框 Text1 中输入 Chin
9、aBeijing，则在文本框 Text2 中显示的内容是_， A.ChinaBeijing B.China C.Beijing D.ChinaB（分数：2.00）A.B.C.D.22.在窗体上画一个水平滚动条，其属性值满足 MinMax。程序运行后，如果单击滚动条右端的箭头，则Value 属性值_。 A.增加一个 SmallChange 量 B.减少一个 SmallChange 量 C.增加一个 LargeChange 量 D.减少一个 LargeChange 量（分数：2.00）A.B.C.D.23.在窗体上画一个组合框，一个命令按钮和一个文本框，其名称分别为 Combol，Commandl
10、 和 Text1，然后编写如下事件过程：Private Sub Form_Load()Combol.Addltem“AAAAA“Combol.Addltem“BBBBB“Combol.Addltem“CCCCC“Combol.Addltem“DDDDD“Combol.Addltem“EEEEE“End Sub程序运行后，如果单击命令按钮，则在文本框中显示组合框的项目“CCCCC”。为了实现该操作，在命令按钮的 Click 事件过程中应使用的语句为_。 A.Text1.Text=Combo1.List(2) B.Text1.Text=Combo1.Text C.Text1.Text=Combo1
11、.List(3) D.Text1.Text=Combo1.Listlndex（分数：2.00）A.B.C.D.24.为了使文本框只具有垂直滚动条，应先把 MultiLine 属性设置为 True，然后再把 ScrollBars 属性设置为_。 A.0 B.1 C.2 D.3（分数：2.00）A.B.C.D.25.能够用于标识对象名称的属性是_。 A.Name B.Caption C.Value D.Text（分数：2.00）A.B.C.D.26.关于水平滚动条，如下叙述中错误的是_。 A.当滚动框的位置改变时，触发 Change 事件 B.当拖动滚动条中的滚动框时，触发 Scroll 事件 C
12、.LargeChange 属性是滚动条的最大值 D.Value 是滚动条中滚动框的当前值（分数：2.00）A.B.C.D.27.对于列表框控件 List1，能够表示当前被选中列表项内容的是_。 A.List1.Text B.List1.lndex C.List1.Listlndex D.List1.List（分数：2.00）A.B.C.D.28.当文本框中的内容发生改变时所触发的事件是_。 A.KeyUp B.Change C.LostFocus D.GotFocus（分数：2.00）A.B.C.D.29.定时器的 Interval 属性的值是一个整数，它表示的是_。 A.毫秒数 B.秒数 C
13、.分钟数 D.小时数（分数：2.00）A.B.C.D.30.阅读程序：Private Sub Form_Click()a=0Forj=1 To 15a=a+j Mod 3NextjPrint aEnd Sub程序运行后，单击窗体，输出结果是_。 A.105 B.1 C.120 D.15（分数：2.00）A.B.C.D.31.在窗体上画一个命令按钮，其名称为 Commandl，然后编写如下代码：Option Base 1Private Sub Commandl_Click()Dim aa=Array(1,2,3,4)j=1For i=4 To 1 Step-1s=s+a(i)*jj=j*10Ne
14、xt iPrint sEnd Sub程序运行后，单击命令按钮，其输出结果是_。 A.4321 B.1234 C.34 D.12（分数：2.00）A.B.C.D.32.在窗体上画一个命令按钮，名称为 Commandl，然后编写如下代码：Option Base 0Private Sub Commandl_Click()Dim A1(4)As Integer,A2(4)As IntegerFor k=0 To 2A1(k+1)=InputBox(“请输入一个整数“)A2(3-k)=A1(k+1)NextkPrint A2(k)End Sub程序运行后，单击命令按钮，在输入对话框中依次输入 2、4、6
15、，则输出结果为_。 A.0 B.1 C.2 D.3（分数：2.00）A.B.C.D.33.在窗体上画两个标签和一个命令按钮，其名称分别为 Label1、Label2 和 Commandl，然后编写如下程序：Private Sub func(L As Label)L.Caption=“1234“End SubPrivate Sub Form_Load()Label1.Caption=“ABCDE“Label2.Caption=10End SubPrivate Sub Commandl_Click()a=Val(Labe12.Caption)Call func(Label1)Labe12.Capt
16、ion=aEnd Sub程序运行后，单击命令按钮，则在两个标签中显示的内容分别为_。 A.ABCD 和 10 B.1234 和 100 C.ABCD 和 100 D.1234 和 10（分数：2.00）A.B.C.D.34.在窗体上画一个命令按钮(名称为 Commandl)，并编写如下代码：Function Funl(ByVal a As Integer,b As Integer)As IntegerDim t As Integert=a-bb=t+aFun1=t+bEnd FunctionPrivate Sub Commandl_Click()Dim x As Integerx=10Prin
17、t Funl(Fun1(x,(Fun1(x,x-1),x-1)End Sub程序运行后，单击命令按钮，输出结果是_。 A.10 B.0 C.11 D.21（分数：2.00）A.B.C.D.35.设有如下通用过程：Public Function Fun(xStr As String)As StringDim tStr As String,strL As IntegertStr=“strL=Len(xStr)i=strL/2Do While i=strLtStr=tStrnumbEnd Sub连续 3 次调用 var dim 过程，第 3 次调用时的输出是_。 A.2 1 B.2 3 C.6 1
18、D.6 3（分数：3.00）A.B.C.D.40.在窗体上画 1 个命令按钮，并编写如下事件过程：Private Sub Commandl_Click()Dim a(3,3)For m=1 To 3For n=1 To 3Ifn=m Or n=4-m Thena(m，n)=m+nElsea(m，n)=0End IfPrint a(m, n);NextnPrintNextmEnd Sub运行程序，单击命令按钮，窗体上显示的内容为_。 A.2 0 0 0 4 0 0 0 6 B.2 0 4 0 4 0 4 0 6 C.2 3 0 3 4 0 0 0 6 D.2 0 0 0 4 5 0 5 6（分数
19、：3.00）A.B.C.D.二级 VISUAL+BASIC-50 (1)答案解析(总分：100.00，做题时间：90 分钟)一、B选择题/B(总题数：40，分数：100.00)1.下列叙述中正确的是_。 A.线性表的链式存储结构与顺序存储结构所需要的存储空间是相同的 B.线性表的链式存储结构所需要的存储空间一般要多于顺序存储结构 C.线性表的链式存储结构所需要的存储空间一般要少于顺序存储结构 D.线性表的链式存储结构与顺序存储结构在存储空间的需求上没有可比性（分数：3.00）A.B. C.D.解析：解析 线性链式存储结构中每个结点都由数据域与指针域两部分组成，增加了存储空间，所以一般要多于顺序
20、存储结构。2.下列叙述中正确的是_。 A.栈是一种先进先出的线性表 B.队列是一种后进先出的线性表 C.栈与队列都是非线性结构 D.以上三种说法都不对（分数：3.00）A.B.C.D. 解析：解析 栈是一种先进后出的线性表，队列是一种先进先出的线性表，栈与队列都是线性结构。3.软件测试的目的是_。 A.评估软件可靠性 B.发现并改正程序中的错误 C.改正程序中的错误 D.发现程序中的错误（分数：3.00）A.B.C.D. 解析：解析 软件测试是为了发现错误而执行程序的过程，测试要以查找错误为中心，而不是为了演示软件的正确功能。不是为了评估软件或改正错误。4.在软件开发中，需求分析阶段产生的主要
21、文档是_。 A.软件集成测试计划 B.软件详细设计说明书 C.用户手册 D.软件需求规格说明书（分数：3.00）A.B.C.D. 解析：解析 需求分析阶段的工怍可以概括为：需求获取、需求分析、编写需求规格说明书、需求评审四个方面。所以选择 D。5.软件生命周期是指_。 A.软件产品从提出、实现、使用维护到停止使用退役的过程 B.软件从需求分析、设计、实现到测试完成的过程 C.软件的开发过程 D.软件的运行维护过程（分数：3.00）A. B.C.D.解析：解析 通常，将软件产品从提出、实现、使用维护到停止使用退役的过程称为软件生命周期。也就是说，软件产品从考虑其概念开始，到该软件产品不能使用为止
22、的整个时期都属于软件生命周期。6.面向对象方法中，继承是指_。 A.一组对象所具有的相似性质 B.一个对象具有另一个对象的性质 C.各对象之间的共同性质 D.类之间共享属性和操作的机制（分数：3.00）A.B.C.D. 解析：解析 继承是面向对象的方法的一个主要特征，是使用已有的类的定义作为基础建立新类的定义技术。广义的说，继承是指能够直接获得已有的性质和特征，而不必重复定义它们，所以说继承是指类之间共享属性和操作的机制。7.层次型、网状型和关系型数据库划分原则是_。 A.记录长度 B.文件的大小 C.联系的复杂程度 D.数据之间的联系方式（分数：3.00）A.B.C.D. 解析：解析 层次模
23、型的基本结构是树形结构，网状模型是一个不加任何条件限制的无向图，关系模型采用二维表来表示，所以三种数据库的划分原则是数据之间的联系方式。8.一个工作人员可以使用多台计算机，而一台计算机可被多个人使用，则实体工作人员与实体计算机之间的联系是_。 A.一对一 B.一对多 C.多对多 D.多对一（分数：3.00）A.B.C. D.解析：解析 因为一个人可以操作多个计算机，而一台计算机又可以被多个人使用，所以两个实体之间是多对多的关系。9.数据库设计中反映用户对数据要求的模式是_。 A.内模式 B.概念模式 C.外模式 D.设计模式（分数：3.00）A.B.C. D.解析：解析 数据库系统的三级模式是
24、概念模式、外模式和内模式。概念模式是数据库系统中全局数据逻辑结构的描述，是全体用户公共数据视图。外模式也称子模式或用户模式，它是用户的数据视图，给出了每个用户的局部数据描述，所以选择 C。内模式又称物理模式，它给出了数据库物理存储结构与物理存取方法。10.有三个关系 R、S 和 T 如下：则由关系 R 和 S 得到关系 T 的操作是_。（分数：3.00）A.B. C.D.解析：解析 关系 T 中的元组是 R 关系中有而 S 关系中没有的元组的集合，所以进行的是差的运算。11.以下叙述中正确的是_。 A.在属性窗口只能设置窗体的属性 B.在属性窗口只能设置控件的属性 C.在属性窗口可以设置窗体和
25、控件的属性 D.在属性窗口可以设置任何对象的属性（分数：3.00）A.B.C. D.解析：解析 在属性窗口中只能设置窗体和各种控件的属性，故 C 选项正确。12.下列打开“代码窗口”的操作中错误的是_。 A.按 F4 键 B.单击“工程资源管理器”窗口中的“查看代码”按钮 C.双击已建立好的控件 D.执行“视图”菜单中的“代码窗口”命令（分数：3.00）A. B.C.D.解析：解析 按 F4 键打开的是“属性窗口”，故 A 选项错误。13.以下叙述中错误的是_。 A.VisualBasic 是事件驱动型可视化编程工具 B.Visual Basic 应用程序不具有明显的开始和结束语句 C.Vis
26、ual Basic 工具箱中的所有控件都具有宽度(Width)和高度(Height)属性 D.VisualBasic 中控件的某些属性只能在运行时设置（分数：3.00）A.B.C. D.解析：解析 VB 工具箱中不是所有的控件都具有宽度和高度属性，比如定时器控件 Timer、直线控件Line 就没有。故 C 选项错误。14.设 a=2，b=3，c=4，d=5，下列表达式的值是_。ab And c=d Or 2*ac A.True B.False C.-1 D.1（分数：3.00）A.B. C.D.解析：解析 根据运算符的优先级顺序，先计算算术运算符，结果是 23 And 4=5 Or 44；再
27、计算关系运算符，结果为 False And True Or False；And 优先级高于 Or 优先级，先计算 And，再计算 Or，最后结果是 False。故 B 选项正确。15.在标准模块中用 Public 关键字定义的变量，其作用域为_。 A.本模块所有过程 B.整个工程 C.所有窗体 D.所有标准模块（分数：3.00）A.B. C.D.解析：解析 在标准模块中用 Public 定义的变量是公用的、全局变量，在整个工程中的所有窗口、模块中都能引用，作用域是整个工程。故 B 选项正确。16.假定有如下语句：answer$=MsgBox(“String1“,“String2“,“Strin
28、g3“,2)执行该语句后，将显示一个信息框，单击其中的“确定”按钮，则 answer$的值为_。 A.String1 B.String2 C.String3 D.1（分数：2.00）A.B.C.D. 解析：解析 MsgBox 函数的作用：在对话框中显示消息，等待用户单击按钮，并返回一整数，告诉用户单击哪一个按钮。Msgbox 函数的格式是： MsgBox(提示信息，按钮样式，标题信息，帮助文件，帮助上下文编号) 本题 MsgBox 函数语句运行后，信息对话框中提示信息是“String1”，标题栏信息是“String2”，对话框出现一个“确定”按钮，单击“确定”按钮返回“确定”按钮对应的一个整数
29、值1，并把 1 赋给 answer 变量。故 D 选项正确。17.设 a=10，b=5，c=1，执行语句 Print abc 后，窗体上显示的是_。 A.True B.False C.11 D.出错（分数：2.00）A.B. C.D.解析：解析 本题中 Print 语句中的表达式只有“”运算符，相同优先级，左结合。先计算 ab，即105，值为 True，(即-1)，再计算-11，结果为 False。故 B 选项正确。18.为了通过传值方式来传送过程参数，在函数声明部分应使用的关键字为_。 A.Value B.ByVal C.ByRef D.Reference（分数：2.00）A.B. C.D.
30、解析：解析 Value 是控件的属性名。用 ByVal 关键字声明形参表示该参数按值传递。ByRef 是默认的参数类型，表示该参数按地址传递。没有 Reference 关键字。故 B 选项正确。19.以下说法中正确的是_。 A.事件过程也是过程，只能由其他过程调用 B.事件过程的过程名是由程序设计者命名的 C.事件过程通常放在标准模块中 D.事件过程是用来处理由用户操作或系统激发的事件的代码（分数：2.00）A.B.C.D. 解析：解析 事件过程也是过程，其他过程或系统都可以调用它。故 A 选项错误。事件过程的过程名是由系统命名的。故 B 选项错误。 通常事件过程放在窗体模块中。故 C 选项错
31、误。 事件过程是用来处理由用户操作或系统激发的事件的代码。只有当用户或系统触发事件后，才执行相应的事件过程。故 D 选项正确。20.设有语句：Open“c:/Test.Dat“For Output As#1则以下叙述中错误的是_。 A.该语句打开 C 盘根目录下的一个文件 Test.Dat，如果该文件不存在则出错 B.该语句打开 C 盘根目录下一个名为 Test.Dat 的文件，如果该文件不存在则创建该文件 C.该语句打开文件的文件号为 1 D.执行该语句后，就可以通过 Print#语句向文件 Test.Dat 中写入信息（分数：2.00）A. B.C.D.解析：解析 本题中是用 Open 语
32、句打开一个顺序文件 Test.Dat，并指定一个文件号 1。故 C 选项正确。 如果 Test.Dat 文件不存在，则系统自动创建该文件。故 B 选项正确，A 选项错误。 用 For Output 模式打开文件，可通过 Print#语句向文件写入信息。故 D 选项正确。21.在窗体上画两个文本框，其名称分别为 Text1 和 Text2，然后编写如下程序：Private Sub Form_Load()ShowText1.Text=“Text2.Text=“Text1.SetFocusEnd SubPrivate Sub Text1_Change()Text2.Text=Mid(Text1.Te
33、xt,6)End Sub程序运行后，如果在文本框 Text1 中输入 ChinaBeijing，则在文本框 Text2 中显示的内容是_， A.ChinaBeijing B.China C.Beijing D.ChinaB（分数：2.00）A.B.C. D.解析：解析 程序运行后，在文本框 Text1 中输入字符后，触发它的 Change 事件，通过中部截取函数Mid 把文本框 Text1 中的内容从第 6 个字符B开始截取后面的字符，得到“Beijing”字符串，然后把截取的字符串在 Text2 中显示出来。故 C 选项正确。22.在窗体上画一个水平滚动条，其属性值满足 MinMax。程序运
34、行后，如果单击滚动条右端的箭头，则Value 属性值_。 A.增加一个 SmallChange 量 B.减少一个 SmallChange 量 C.增加一个 LargeChange 量 D.减少一个 LargeChange 量（分数：2.00）A. B.C.D.解析：解析 当水平滚动条的属性值 MinMax 时，如果单击滚动条右端或左端的箭头，Value 属性值会增加或减少 SmallChange 量；如果单击滚动块和右端箭头之间空白的地方时，Value 属性值会增加LargeChange 量，反之，减少 LargeChange 量。 本题单击的是滚动条右端的箭头，故 Vlaue 属性值应该是增
35、加一个 SmallChange 量。故选 A。23.在窗体上画一个组合框，一个命令按钮和一个文本框，其名称分别为 Combol，Commandl 和 Text1，然后编写如下事件过程：Private Sub Form_Load()Combol.Addltem“AAAAA“Combol.Addltem“BBBBB“Combol.Addltem“CCCCC“Combol.Addltem“DDDDD“Combol.Addltem“EEEEE“End Sub程序运行后，如果单击命令按钮，则在文本框中显示组合框的项目“CCCCC”。为了实现该操作，在命令按钮的 Click 事件过程中应使用的语句为_。
36、A.Text1.Text=Combo1.List(2) B.Text1.Text=Combo1.Text C.Text1.Text=Combo1.List(3) D.Text1.Text=Combo1.Listlndex（分数：2.00）A. B.C.D.解析：解析 List 属性可以返回组合框中各选项的内容。用下标区分各选项，第 1 个选项下标为 0，依次类推。“CCCCC”为组合框中第 3 个选项，可以用 Combol.List(2)返回选项内容。故 A 选项正确，C 选项错误。 Text 属性返回的是组合框中选中项目的内容；Listlndex 属性返回的是选中项目的索引值，即下标。故 B
37、、D 选项错误。24.为了使文本框只具有垂直滚动条，应先把 MultiLine 属性设置为 True，然后再把 ScrollBars 属性设置为_。 A.0 B.1 C.2 D.3（分数：2.00）A.B.C. D.解析：解析 文本框的 ScrollBars 属性值：0 表示无滚动条，1 表示只有水平滚动条，2 表示只有垂直滚动条，3 表示水平和垂直滚动条都有。本题文本框只具有垂直滚动条，则 ScrollBar 属性值就设置为2，故 C 选项正确。25.能够用于标识对象名称的属性是_。 A.Name B.Caption C.Value D.Text（分数：2.00）A. B.C.D.解析：解析
38、 每个对象都有 Name 属性，用于识别不同的对象。故选 A。26.关于水平滚动条，如下叙述中错误的是_。 A.当滚动框的位置改变时，触发 Change 事件 B.当拖动滚动条中的滚动框时，触发 Scroll 事件 C.LargeChange 属性是滚动条的最大值 D.Value 是滚动条中滚动框的当前值（分数：2.00）A.B.C. D.解析：解析 LargeChange 属性值是单击滚动块和左右两端箭头之间空白的地方时，Value 增加或减少的量，Small 属性值才是滚动条的最大值。故 C 选项错误。27.对于列表框控件 List1，能够表示当前被选中列表项内容的是_。 A.List1.
39、Text B.List1.lndex C.List1.Listlndex D.List1.List（分数：2.00）A. B.C.D.解析：解析 Text 属性可返回当前被选中列表项的内容，故选 A。 Index 属性是当有列表框控件数组时，区分各列表框用的；Listlndex 属性返回的是被选中的列表项的索引值；List 属性设置或返回各列表项的内容。28.当文本框中的内容发生改变时所触发的事件是_。 A.KeyUp B.Change C.LostFocus D.GotFocus（分数：2.00）A.B. C.D.解析：解析 文本框中内容有变化时，触发 Change 事件。故 B 选项正确。
40、当在文本框中输入数据，松开键盘时触发它的 KeyUp 事件；文本框失去焦点触发 LostFocus 事件；获得焦点，触发 GotFocus 事件。29.定时器的 Interval 属性的值是一个整数，它表示的是_。 A.毫秒数 B.秒数 C.分钟数 D.小时数（分数：2.00）A. B.C.D.解析：解析 Interval 的属性值是以毫秒计，所以是毫秒数。故选 A。30.阅读程序：Private Sub Form_Click()a=0Forj=1 To 15a=a+j Mod 3NextjPrint aEnd Sub程序运行后，单击窗体，输出结果是_。 A.105 B.1 C.120 D.1
41、5（分数：2.00）A.B.C.D. 解析：31.在窗体上画一个命令按钮，其名称为 Commandl，然后编写如下代码：Option Base 1Private Sub Commandl_Click()Dim aa=Array(1,2,3,4)j=1For i=4 To 1 Step-1s=s+a(i)*jj=j*10Next iPrint sEnd Sub程序运行后，单击命令按钮，其输出结果是_。 A.4321 B.1234 C.34 D.12（分数：2.00）A.B. C.D.解析：32.在窗体上画一个命令按钮，名称为 Commandl，然后编写如下代码：Option Base 0Priv
42、ate Sub Commandl_Click()Dim A1(4)As Integer,A2(4)As IntegerFor k=0 To 2A1(k+1)=InputBox(“请输入一个整数“)A2(3-k)=A1(k+1)NextkPrint A2(k)End Sub程序运行后，单击命令按钮，在输入对话框中依次输入 2、4、6，则输出结果为_。 A.0 B.1 C.2 D.3（分数：2.00）A.B.C. D.解析：解析 程序运行过程如下： k=0，输入 2,A1(k-1-1)=A1(0+1)=A1(1)=2,A2(3-k)=A2(3-0)=A2(3)=2 k=1，输入 4,A1(k+1)
43、=A1(1+1)=A1(2)=4,A2(3-k)=A2(3-1)=A2(2)=4 k=2，输入 6,A1(k+1)=A1(2+1)=A1(3)=6,A2(3-k)=A2(3-2)=A2(1)=6 k=3，For 循环结束，输出 A2(k)的值即 A2(3)的值，即 2。33.在窗体上画两个标签和一个命令按钮，其名称分别为 Label1、Label2 和 Commandl，然后编写如下程序：Private Sub func(L As Label)L.Caption=“1234“End SubPrivate Sub Form_Load()Label1.Caption=“ABCDE“Label2.C
44、aption=10End SubPrivate Sub Commandl_Click()a=Val(Labe12.Caption)Call func(Label1)Labe12.Caption=aEnd Sub程序运行后，单击命令按钮，则在两个标签中显示的内容分别为_。 A.ABCD 和 10 B.1234 和 100 C.ABCD 和 100 D.1234 和 10（分数：2.00）A.B.C.D. 解析：解析 程序运行，窗体加载时设置 Label1 显示为 ABCD，Label2 显示为 10。单击命令按钮，执行按钮的单击事件过程，过程中 Val 函数将 Label2 的标题字符串转换为数
45、值赋给变量 a，此时 a 的值为10，然后调用 func 过程传入 Label1 为参数，func 过程中设置 Label1 的标题为“1234”，回到按钮单击事件过程，设置 Label2 的标题为变量 a 的值，即 10。因此两个标签中显示的内容分别为 1234 和 10。34.在窗体上画一个命令按钮(名称为 Commandl)，并编写如下代码：Function Funl(ByVal a As Integer,b As Integer)As IntegerDim t As Integert=a-bb=t+aFun1=t+bEnd FunctionPrivate Sub Commandl_Cl
46、ick()Dim x As Integerx=10Print Funl(Fun1(x,(Fun1(x,x-1),x-1)End Sub程序运行后，单击命令按钮，输出结果是_。 A.10 B.0 C.11 D.21（分数：2.00）A.B. C.D.解析：解析 本题是过程的嵌套调用，过程嵌套调用时要先计算最内层的过程，然后由里向外执行。因此 Fun1(Fun1(x,(Fun1(x,x-1)，x-1)执行过程如下： 先执行 Fun1(x,x-1)，由于形参 a 是按值传递，因此不会影响 x 的值，x=10，即 Fun1(10,9)。t=1，b-1+10=11，则函数返回值为 1+11=12。 再执行Fun1(x,(Fun1(x,x-1)，由于内层过程返回 12，因此又可写成 Fun1(x,(12)，由于 x 仍为原值，因此过程即 Fun1(10,12)。t=-2，b=-2+10-8，则函数返回值为-2+8=6。 最后执行 Fun1(Fun1(x,(Fun1(x,x-1),x-1)，
