【计算机类职业资格】二级VISUAL+BASIC笔试-424及答案解析.doc

《【计算机类职业资格】二级VISUAL+BASIC笔试-424及答案解析.doc》由会员分享，可在线阅读，更多相关《【计算机类职业资格】二级VISUAL+BASIC笔试-424及答案解析.doc（25页珍藏版）》请在麦多课文档分享上搜索。

1、二级 VISUAL+BASIC 笔试-424 及答案解析(总分：100.00，做题时间：90 分钟)一、选择题(总题数：35，分数：70.00)1.三种基本结构中，能简化大量程序代码行的是( )A顺序结构 B分支结构C选择结构 D重复结构（分数：2.00）A.B.C.D.2.下列关于栈的描述正确的是( )A在栈中只能插入元素而不能删除元素B在栈中只能删除元素而不能插入元素C栈是特殊的线性表，只能在一端插入或删除元素D栈是特殊的线性表，只能在一端插入元素，而在另一端删除元素（分数：2.00）A.B.C.D.3.下列有关数据库的叙述，正确的是( )A数据处理是将信息转化为数据的过程B数据的物理独立

2、性是指当数据的逻辑结构改变时，数据的存储结构不变C关系中的每一列称为元组，一个元组就是一个字段D如果一个关系中的属性或属性组并非该关系的关键字，但它是另一个关系的关键字，则称其为本关系的外关键字。（分数：2.00）A.B.C.D.4.概要设计中要完成的事情是( )A系统结构和数据结构的设计 B系统结构和过程的设计C过程和接口的设计 D数据结构和过程的设计（分数：2.00）A.B.C.D.5.下面排序算法中，平均排序速度最快的是( )A冒泡排序法 B选择排序法C交换排序法 D堆排序法（分数：2.00）A.B.C.D.6.两个或两个以上模块之间关联的紧密程度称为( )A耦合度 B内聚度C复杂度 D

3、数据传输特性（分数：2.00）A.B.C.D.7.下列描述中正确的是( )A软件工程只是解决软件项目的管理问题B软件工程主要解决软件产品的生产率问题C软件工程的主要思想是强调在软件开发过程中需要应用工程化原则D软件工程只是解决软件开发中的技术问题（分数：2.00）A.B.C.D.8.关系模型允许定义 3 类数据约束，下列不属于数据约束的是( )A实体完整性约束 B参照完整性约束C属性完整性约束 D用户自定义的完整性约束（分数：2.00）A.B.C.D.9.下列描述中正确的是( )A程序就是软件 B软件开发不受计算机系统的限制C软件既是逻辑实体，又是物理实体 D软件是程序、数据与相关文档的集合（

4、分数：2.00）A.B.C.D.10.用树型结构表示实体之间联系的模型是( )A关系模型 B网状模型C层次模型 D以上三个都是（分数：2.00）A.B.C.D.11.在设计阶段，当双击窗体上的某个控件时，所打开的窗口是( )A工程资源管理器窗口 B工具箱窗口C代码窗口 D属性窗口（分数：2.00）A.B.C.D.12.下面的控件可作为其他控件容器的是( )APictureBox 和 Data BFrame 和 ImageCPictureBox 和 Frame DImage 和 Data（分数：2.00）A.B.C.D.13.下列说法错误的是( )A窗体文件的扩展名为frmB一个窗体对应一个窗体

5、文件CVisual Basic 中的一个工程只包含一个窗体DVisual Basic 中一个工程最多可以包含 255 个窗体（分数：2.00）A.B.C.D.14.要设置窗体为固定对话框，并包含控制菜单栏和标题栏，但没有最大化和最小化按钮，设置的操作是( )A设置 BorderStyle 的值为 Fixed ToolWindowB设置 BorderStyle 的值为 Sizable ToolWindowC设置 BorderStyle 的值为 Fixed DialogD设置 BorderStyle 的值为 Sizable（分数：2.00）A.B.C.D.15.把窗体的 KeyPreview 属性

6、设置为 True，然后编写如下事件过程：Private Sub Form_KeyPress(KeyAscii As Integer)Dim ch As Stringch=Chr(KeyAscii)KeyAscii=Ase(UCase(ch)Print Chr(KeyAscii+2)End Sub程序运行后，按键盘上的“A”键，则在窗体上显示的内容是( )AA BB CC DD（分数：2.00）A.B.C.D.16.如果在程序中要将 a 定义为静态变量，且为整型数，则应使用的语句是( )ARedim a As Integer BStatic a As IntegerCPublic a As In

7、teger DDim a As Integer（分数：2.00）A.B.C.D.17.用 InputBox 函数设计的对话框，其功能是( )A只能接收用户输入的数据，但不会返回任何信息B能接收用户输入的数据，并能返回用户输入的信息C既能用于接收用户输入的信息，又能用于输出信息D专门用于输出信息（分数：2.00）A.B.C.D.18.假定有如下的 Sub 过程：Sub S(x As Single，y As Single)t=xx=t/yy=t Mod yEnd Sub在窗体上厕一个命令按钮，然后编写如下事件过程：Private Sub Commandl_Click()Dim a As Singl

8、eDim b As Singlea=5b=4S(a,b)Print a,bEnd Sub程序运行后，单击命令按钮，输出结果为( )A5 4 B1 1 C1.25 4 D1.25 1（分数：2.00）A.B.C.D.19.设 a=“Visual Basic“，下面使 b=“Basic“的语句是( )Ab=Left(a,8,12) Bb=Mid(a,8,5)Cb=Rigth(a,5,5) Db=Left(a,8,5)（分数：2.00）A.B.C.D.20.在窗体上画一个名称为 Label1、标题为“Visual Basic 考试”的标签，两个名称分别为 Command1 和Command2、标题分

9、别为“开始”和“停止”的命令按钮，然后画一个名称为 Timer1 的计时器控件，并把其 Interval 属性设置为 500，如右图所示。编写如下程序：Private Sub Form_Load()Timer1Enabled=falseEnd SubPrivate Sub Command1_Click()Timer1.Enabled=TrueEnd SubPrivate Sub Timer1_Timer()If Label1.LeftWidth ThenLabel1.Leftlabell.Left+20ElseLabel1.Left=0End IfEnd Sub程序运行后单击“开始”按钮，标签

10、在窗体中移动。（分数：2.00）A.B.C.D.21.当在滚动条内拖动滚动块时触发( )AKeyUp 事件 BKeyPress 事件CScroll 事件 DChange 事件（分数：2.00）A.B.C.D.22.下面程序的输出结果是( )Private Sub Command1_Click()Ch$=“ABCDEF“proc ch:Print chEnd SubPrivate Sub proc(ch As String)s=“ “For k=Len(ch)To 1 Step-1s=sMid(ch,k,1)Next kch=sEnd SubAABCDEF BFEDCBA CA DF（分数：2.

11、00）A.B.C.D.23.执行下列程序段后，输出的结果是( )For k1=0 To 4y=20For k2=0 To 3y=10For k3=0 To 2y=y+10Next k3Next k2Next k1Print yA90 B60 C40 D10（分数：2.00）A.B.C.D.24.在窗体上画两个文本框(其 Name 属性分别为 Text1 和 Text2)和一个命令按钮(其 Name 属性为 Command1)，然后编写如下事件过程：Private Sub Command1_Click()x=0Do While x50x(x+2)*(x+3)n=n+1LoopText1.Text

12、=Str(n)Text2.Text=Str(x)End Sub程序运行后，单击命令按钮，在两个文本框中显示的值分别为( )A1 和 0 B2 和 72 C3 和 50 D4 和 168（分数：2.00）A.B.C.D.25.用下面语句定义的数组的元素个数是( )Dim A (-3 To 5)As IntegerA6 B7 C8 D9（分数：2.00）A.B.C.D.26.若在某窗体模块中有如下事件过程：Private Sub Command1_Click(Index As Integer)End Sub则以下叙述中正确的是( )A此事件过程与不带参数的事件过程没有区别B有一个名称为 Comma

13、nd1 的窗体，单击此窗体则执行此事件过程C有一个名称为 Command1 的控件数组，数组中有多个不同类型控件D有一个名称为 Command1 的控件数组，数组中有多个相同类型控件（分数：2.00）A.B.C.D.27.下列程序段的执行结果为( )a=1b=0Select Case aCase 1Select Case bCase 0Print“* * 0 * *“Case 1Print“* * 1 * *“End SelectCase 2Print“* * 2 * *“End SelectA* * 0 * * B* * 1 * * C* * 2 * * D0（分数：2.00）A.B.C.D

14、.28.设有数组定义语句：Dim a(5)As Integer，List1 为列表框控件。下列给数组元素赋值的语句错误的是( )Aa(3)=3 Ba(3)=InputBox(“input data“)Ca(3)=List1.Listlndex Da=Array(1,2,3,4,5,6)（分数：2.00）A.B.C.D.29.在窗体上画一个名称为 Text1 的文本框和一个名称为 Command1 的命令按钮，然后编写如下事件过程：Private Sub Command1_Click()Dim array1(10,10)AS IntegerDim i,j As IntegerFor i=1 To

15、 3For j=2 To 4array1(i,j)=i+jNext jNext iText1.Text=array1(2,3)+array1(3,4)End Sub程序运行后，单击命令按钮，在文本框中显示的值是( )A12 B13 C14 D15（分数：2.00）A.B.C.D.30.如果一个工程含有多个窗体及标准模块，则以下叙述中错误的是( )A任何时刻最多只有一个窗体是活动窗体B不能把标准模块设置为启动模块C用 Hide 方法只是隐藏一个窗体，不能从内存中清除该窗体D如果工程中含有 Sub Main 过程，则程序一定首先执行该过程（分数：2.00）A.B.C.D.31.下列程序的执行结果为

16、( )Private Sub Command1_Click()Dim x As Integer,y As Integerx=12:y=20Call Value(X,y)Print x;yEnd SubPrivate Sub Value(ByVal m As Integer,ByVal n As Integer)m=m * 2:n=n-5Print m; nEnd SubA20 12 20 15 B12 20 12 25 C24 15 12 20 D24 1212 15 （分数：2.00）A.B.C.D.32.在窗体上画一个通用对话框，其 Name 属性为 Cont，再画一个命令按钮，Name

17、属性为 Command1，然后编写如下事件过程：Private Sub Command1 Click()Cont.FileName=“ “Cont.Flags=vbOFNFileMustExistCont.Filter=“All Filesl|*“Cont.FilterIndex=3Cont.DialogTitle=“Open File“Cont.Action=1If Cont.FileName=“ “ ThenMsgBox “No file selected“ElseOpen Cont.FileName For Input As # 1Do While Not EOF(1)Input # 1

18、,b$Print b$LoopEnd IfEnd Sub以下各选项，对上述事件过程描述错误的是( )A该事件过程用来建立一个 Open 对话框，可以在这个对话框中选择要打开的文件B选择后单击“打开”按钮，所选择的文件名即作为对话框的 FileName 属性值COpen 对话框不仅用来选择一个文件，还可以打开、显示文件D过程中的“Cont.Action=1”用来建立 Open 对话框，它与 Cont.ShowOpen 等价（分数：2.00）A.B.C.D.33.以下叙述中错误的是( )A在 KeyUp 和 KeyDown 事件过程中，从键盘上输入 A 或 a 被视做相同的字母(即具有相同的 Ke

19、yCode)B在 KeyUp 和 KeyDown 事件过程中，将键盘上的“1”和右侧小键盘上的“1”视做不同的数字(具有不同的 KeyCode)CKeyPress 事件中不能识别键盘上某个键的按下与释放DKeyPress 事件中可以识别键盘上某个键的按下与释放（分数：2.00）A.B.C.D.34.建立一个新的标准模块，应该选择( )下的“添加模块”命令。A“工程”菜单 B“文件”菜单C“工具”菜单 D“编辑”菜单（分数：2.00）A.B.C.D.35.以下能判断是否到达文件尾的函数是( )ABOF BLOCCLOF DEOF（分数：2.00）A.B.C.D.二、填空题(总题数：10，分数：3

20、0.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.Vi

21、sual Basic 对象可以分为两类，分别为 1 和 2。（分数：4.00）填空项 1:_42.在 Visual Basic 的立即窗口内输入以下语句：X65CR? Chr$(X)CR在窗口中显示的结果是_。（分数：2.00）填空项 1:_43.完成下面的程序，使显示结果如下图所示。（分数：6.00）填空项 1:_44.在窗体上画一个名称为 Labe1 的标签和一个名称为 List1 的列表框。程序运行后，在列表框中添加若干列表项。当双击列表框中的某个项目时，在标签 Label1 中显示所选中的项目，如下图所示。请在_和_处填入适当的内容将程序补充完整。（分数：4.00）填空项 1:_45.

22、新建一个工程，内有两个窗体，窗体 Form1 上有一个命令按钮 Command1，单击该按钮，Form1 窗体消失，显示 Form2 窗体，程序如下：Private Sub Command1_Click()_Form2._End Sub试补充完整。（分数：4.00）填空项 1:_二级 VISUAL+BASIC 笔试-424 答案解析(总分：100.00，做题时间：90 分钟)一、选择题(总题数：35，分数：70.00)1.三种基本结构中，能简化大量程序代码行的是( )A顺序结构 B分支结构C选择结构 D重复结构（分数：2.00）A.B.C.D. 解析：解析 重复结构又称为循环结构，它根据给定的

23、条件，判断是否需要重复执行某一相同或类似的程序段，利用重复结构可以简化大量的程序行。2.下列关于栈的描述正确的是( )A在栈中只能插入元素而不能删除元素B在栈中只能删除元素而不能插入元素C栈是特殊的线性表，只能在一端插入或删除元素D栈是特殊的线性表，只能在一端插入元素，而在另一端删除元素（分数：2.00）A.B.C. D.解析：解析 根据数据结构对栈的定义及其特点可知：栈是限定只在表尾进行插入或删除操作的线性表，因此栈是先进后出的线性表，对栈的插入与删除操作，不需要改变栈底元素。3.下列有关数据库的叙述，正确的是( )A数据处理是将信息转化为数据的过程B数据的物理独立性是指当数据的逻辑结构改变

24、时，数据的存储结构不变C关系中的每一列称为元组，一个元组就是一个字段D如果一个关系中的属性或属性组并非该关系的关键字，但它是另一个关系的关键字，则称其为本关系的外关键字。（分数：2.00）A.B.C.D. 解析：解析 数据处理是指将数据转换成信息的过程，故选项 A 叙述错误；数据的物理独立性是指数据的物理结构的改变不会影响数据库的逻辑结构，故选项 B 叙述错误；关系中的行称为元组，对应存储文件中的记录，关系中的列称为属性，对应存储文件中的字段，故选项 C 叙述错误。4.概要设计中要完成的事情是( )A系统结构和数据结构的设计 B系统结构和过程的设计C过程和接口的设计 D数据结构和过程的设计（分

25、数：2.00）A. B.C.D.解析：解析 软件概要设计的基本任务是：设计软件系统结构；数据结构及数据库设计；编写概要设计文档；概要设计文档评审。5.下面排序算法中，平均排序速度最快的是( )A冒泡排序法 B选择排序法C交换排序法 D堆排序法（分数：2.00）A.B.C.D. 解析：解析 在各种排序方法中，快速排序法和堆排序法的平均速度是最快的，因为它们的时间复杂度都是 O(nlog2n)，其他的排序算法的时间复杂度大都是 O(n2)。6.两个或两个以上模块之间关联的紧密程度称为( )A耦合度 B内聚度C复杂度 D数据传输特性（分数：2.00）A. B.C.D.解析：解析 耦合是指模块之间的关

26、联程度，内聚是指模块内部各部分的聚合程度。7.下列描述中正确的是( )A软件工程只是解决软件项目的管理问题B软件工程主要解决软件产品的生产率问题C软件工程的主要思想是强调在软件开发过程中需要应用工程化原则D软件工程只是解决软件开发中的技术问题（分数：2.00）A.B.C. D.解析：解析 软件工程是研究和应用如何以系统性的、规范化的、可定量的过程化方法来开发和维护软件，以及如何把经过时间考验而证明正确的管理技术和当前能够得到的最好的技术方法结合起来。软件工程的目标是生产具有正确性、可用性及开销合宜的产品，它的主要思想是强调在软件开发过程中需要应用工程化原则。8.关系模型允许定义 3 类数据约束

27、，下列不属于数据约束的是( )A实体完整性约束 B参照完整性约束C属性完整性约束 D用户自定义的完整性约束（分数：2.00）A.B.C. D.解析：解析 关系模型允许定义 3 类数据约束，即实体完整性约束、参照完整性约束和用户自定义完整性约束。其中前两种完整性约束由关系数据库系统支持，用户自定义完整性约束则由关系数据库系统提供完整性约束语言，用户利用该语言给出约束条件，运行时由系统自动检查。9.下列描述中正确的是( )A程序就是软件 B软件开发不受计算机系统的限制C软件既是逻辑实体，又是物理实体 D软件是程序、数据与相关文档的集合（分数：2.00）A.B.C.D. 解析：解析 软件是程序、数据

28、与相关文档的集合，它是一个逻辑实体。软件的开发要受计算机系统的限制，例如硬件系统的限制、软件操作系统的限制等。10.用树型结构表示实体之间联系的模型是( )A关系模型 B网状模型C层次模型 D以上三个都是（分数：2.00）A.B.C. D.解析：解析 层次模型是数据库系统中最早出现的数据模型，它用树型结构来表示各类实体及实体间的联系。在现实世界中事物之间的联系更多的是非层次关系的，用层次模型表示非树型结构很不直接，网状模型则用来表示非树型结构。关系模型是目前最重要的一种数据模型，它建立在严格的数学概念基础上。关系模型由关系数据结构、关系操作系统和关系完整性约束 3 部分组成。11.在设计阶段，

29、当双击窗体上的某个控件时，所打开的窗口是( )A工程资源管理器窗口 B工具箱窗口C代码窗口 D属性窗口（分数：2.00）A.B.C. D.解析：解析 双击窗体上的某个控件，打开代码窗口，并定位到该控件的相关方法。12.下面的控件可作为其他控件容器的是( )APictureBox 和 Data BFrame 和 ImageCPictureBox 和 Frame DImage 和 Data（分数：2.00）A.B.C. D.解析：解析 Visual Basic 控件中，PitureBox 和 Frame 可以作为其他控件的容器，而 Data 和 Image 则不能。13.下列说法错误的是( )A窗

30、体文件的扩展名为frmB一个窗体对应一个窗体文件CVisual Basic 中的一个工程只包含一个窗体DVisual Basic 中一个工程最多可以包含 255 个窗体（分数：2.00）A.B.C. D.解析：解析 Visual Basic 中的一个工程可包含一个或多个窗体，但最多只能是 255 个。14.要设置窗体为固定对话框，并包含控制菜单栏和标题栏，但没有最大化和最小化按钮，设置的操作是( )A设置 BorderStyle 的值为 Fixed ToolWindowB设置 BorderStyle 的值为 Sizable ToolWindowC设置 BorderStyle 的值为 Fixed

31、 DialogD设置 BorderStyle 的值为 Sizable（分数：2.00）A.B.C. D.解析：解析 窗体的 BorderStyle 属性用来设置窗体的格式，它有 6 个可选值。0none：没有边框或与边框相关的元素。1fixed single：可以包含控制菜单框、标题栏、“最大化”和“最小化”按钮。只有使用最大化和最小化按钮才能改变大小。2sizable：默认值。可以使用设置值 1 列出的任何可选边框元素重新改变尺寸。3fixed dialog：可以包含控制菜单框和标题栏，不能包含最大化和最小化按钮，不能改变尺寸。4filxed toolwindow：不能改变尺寸。显示关闭按钮

32、并用缩小的字体显示标题栏。窗体在 Windows 的任务条中不显示。5sizable toolwindow：可变大小。显示关闭按钮并用缩小的字体显示标题栏。窗体在 windows 的任务条中不显示。根据本题的要求，应设置 BorderStyle 的值为 Fixed Dialog。15.把窗体的 KeyPreview 属性设置为 True，然后编写如下事件过程：Private Sub Form_KeyPress(KeyAscii As Integer)Dim ch As Stringch=Chr(KeyAscii)KeyAscii=Ase(UCase(ch)Print Chr(KeyAscii+

33、2)End Sub程序运行后，按键盘上的“A”键，则在窗体上显示的内容是( )AA BB CC DD（分数：2.00）A.B.C. D.解析：解析 本题考查了 3 个系统函数：Chr()，Asc()，UCase()。它们的功能分别是将 ASCII 码值转换为字符；将字符转化为 Ascii 码值；将字符转化为大写字符串。KeyPreview 属性返回或设置一个值，以决定是否在控件的键盘事件之前激活窗体的键盘事件。键盘事件有 KeyDown、KeyUp 和 KeyPress，主要应用于 Form 对象。本题的程序执行时，当按下“A”时，则“A”的 Ascii 码值传给函数体，并转换为字符赋给变量

34、ch，再将 ch(即“A”)的 Ascii 值赋值给 KeyAscii，最后将 KeyAscii 值加 2 并转化为字符打印输出，即结果为字母“C”。16.如果在程序中要将 a 定义为静态变量，且为整型数，则应使用的语句是( )ARedim a As Integer BStatic a As IntegerCPublic a As Integer DDim a As Integer（分数：2.00）A.B. C.D.解析：解析 Visual Basic 中定义一个静态变量的语法为：Static 变量名 As 变量类型。故选项 B 正确。此外，在 VisualBasic 中，Static 类型的

35、变量不能在标准模块的声明部分定义，为了使过程中所有的局部变量为静态变量，可在过程头的起始处加上 Static 关键字。这就使过程中的所有局部变量都变为静态变量。17.用 InputBox 函数设计的对话框，其功能是( )A只能接收用户输入的数据，但不会返回任何信息B能接收用户输入的数据，并能返回用户输入的信息C既能用于接收用户输入的信息，又能用于输出信息D专门用于输出信息（分数：2.00）A.B. C.D.解析：解析 InputBox 函数用来显示一个输入框，并提示用户在文本框中输入文本、数字或选中某个单元格区域，当按下确定按钮后，返回包含文本框内容的字符串。18.假定有如下的 Sub 过程：

36、Sub S(x As Single，y As Single)t=xx=t/yy=t Mod yEnd Sub在窗体上厕一个命令按钮，然后编写如下事件过程：Private Sub Commandl_Click()Dim a As SingleDim b As Singlea=5b=4S(a,b)Print a,bEnd Sub程序运行后，单击命令按钮，输出结果为( )A5 4 B1 1 C1.25 4 D1.25 1（分数：2.00）A.B.C.D. 解析：解析 本题定义了一个函数 Sub，默认为地址传递参数，首先对第一个参数进行除操作，第二个进行取余操作，调用后变量改变。结果为选项 D。19.

37、设 a=“Visual Basic“，下面使 b=“Basic“的语句是( )Ab=Left(a,8,12) Bb=Mid(a,8,5)Cb=Rigth(a,5,5) Db=Left(a,8,5)（分数：2.00）A.B. C.D.解析：解析 本题考查字符串函数。Left(字符串,n)：取字符串左部的 n 个字符；Mid(字符串,p,n)：从位置 p 开始取字符串的 n 个字符；Right(字符串,n)：取字符串右部的 n 个字符。分析题中的 4 个选项可知正确答案为选项 B。20.在窗体上画一个名称为 Label1、标题为“Visual Basic 考试”的标签，两个名称分别为 Comman

38、d1 和Command2、标题分别为“开始”和“停止”的命令按钮，然后画一个名称为 Timer1 的计时器控件，并把其 Interval 属性设置为 500，如右图所示。编写如下程序：Private Sub Form_Load()Timer1Enabled=falseEnd SubPrivate Sub Command1_Click()Timer1.Enabled=TrueEnd SubPrivate Sub Timer1_Timer()If Label1.LeftWidth ThenLabel1.Leftlabell.Left+20ElseLabel1.Left=0End IfEnd Sub

39、程序运行后单击“开始”按钮，标签在窗体中移动。（分数：2.00）A. B.C.D.解析：解析 本题考查 Timer 控件的使用。Timer 中 Interval 的单位为毫秒，设置为 500 意味着每隔0.5 秒作用一次。Timer 的 Enabled 属性指示 Timer 控件是否可用。同时本题还考查了对 Label 控件的属性的掌握：Left 属性为 Label 的左边界的坐标，Width 为 Label 的宽度。本程序中单击按钮后，Label1将每隔 0.5 秒向右移动，当移动到 Leftwidth 时，Label1 重定位到窗体的左边界，然后继续移动。选项 A 是错误的。21.当在滚动

40、条内拖动滚动块时触发( )AKeyUp 事件 BKeyPress 事件CScroll 事件 DChange 事件（分数：2.00）A.B.C. D.解析：解析 本题考查 Visual Basic 中滚动条控件的特征，当在滚动条内拖动滚动块时触发 Scroll 事件。当按下键盘上的某个键时，将触发 KeyPress 事件。22.下面程序的输出结果是( )Private Sub Command1_Click()Ch$=“ABCDEF“proc ch:Print chEnd SubPrivate Sub proc(ch As String)s=“ “For k=Len(ch)To 1 Step-1s

41、=sMid(ch,k,1)Next kch=sEnd SubAABCDEF BFEDCBA CA DF（分数：2.00）A.B. C.D.解析：解析 Mid 函数的语法格式为：Mid(字符串,p,n)，功能是从位置 p 开始取字符串的 n 个字符。“”用于连接两个字符串。在本题程序的 For 循环中，逐个将 ch 的元素倒序连接到 s 后，因此最后的结果为 FEDCBA。23.执行下列程序段后，输出的结果是( )For k1=0 To 4y=20For k2=0 To 3y=10For k3=0 To 2y=y+10Next k3Next k2Next k1Print yA90 B60 C40

42、 D10（分数：2.00）A.B.C. D.解析：解析 程序是三重循环，但是在最外层循环每次对 y 初始化为 20，第二层每次对其初始化为 10，因此外两层循环不能改变 y 的值，考生只需注意内层循环即可得出答案为 40。24.在窗体上画两个文本框(其 Name 属性分别为 Text1 和 Text2)和一个命令按钮(其 Name 属性为 Command1)，然后编写如下事件过程：Private Sub Command1_Click()x=0Do While x50x(x+2)*(x+3)n=n+1LoopText1.Text=Str(n)Text2.Text=Str(x)End Sub程序运

43、行后，单击命令按钮，在两个文本框中显示的值分别为( )A1 和 0 B2 和 72 C3 和 50 D4 和 168（分数：2.00）A.B. C.D.解析：解析 程序先进行 Do while 循环，然后将求得的 n 和 x 的值转换为字符串输入到 Text1 和 Text2中，结果为 2 和 72。25.用下面语句定义的数组的元素个数是( )Dim A (-3 To 5)As IntegerA6 B7 C8 D9（分数：2.00）A.B.C.D. 解析：解析 本题中的数组定义从-3 到 5，一共有“-3、-2、-1、0、1、2、3、4、5”9 个元素。26.若在某窗体模块中有如下事件过程：P

44、rivate Sub Command1_Click(Index As Integer)End Sub则以下叙述中正确的是( )A此事件过程与不带参数的事件过程没有区别B有一个名称为 Command1 的窗体，单击此窗体则执行此事件过程C有一个名称为 Command1 的控件数组，数组中有多个不同类型控件D有一个名称为 Command1 的控件数组，数组中有多个相同类型控件（分数：2.00）A.B.C.D. 解析：解析 Index As Integer 用来指示控件数组的索引。因此此段代码说明有一个名称为 Command1的控件数组，数组中有多个相同类型的控件。27.下列程序段的执行结果为( )

45、a=1b=0Select Case aCase 1Select Case bCase 0Print“* * 0 * *“Case 1Print“* * 1 * *“End SelectCase 2Print“* * 2 * *“End SelectA* * 0 * * B* * 1 * * C* * 2 * * D0（分数：2.00）A. B.C.D.解析：解析 程序为嵌套的 Select 语句。分析程序可知，程序只执行了“Print“* * 0 * *”语句，结果为选项 A。28.设有数组定义语句：Dim a(5)As Integer，List1 为列表框控件。下列给数组元素赋值的语句错误的

46、是( )Aa(3)=3 Ba(3)=InputBox(“input data“)Ca(3)=List1.Listlndex Da=Array(1,2,3,4,5,6)（分数：2.00）A.B.C.D. 解析：解析 选项 D 将 6 个元素赋给长度为 5 的数组，显然是错误的。29.在窗体上画一个名称为 Text1 的文本框和一个名称为 Command1 的命令按钮，然后编写如下事件过程：Private Sub Command1_Click()Dim array1(10,10)AS IntegerDim i,j As IntegerFor i=1 To 3For j=2 To 4array1(i

47、,j)=i+jNext jNext iText1.Text=array1(2,3)+array1(3,4)End Sub程序运行后，单击命令按钮，在文本框中显示的值是( )A12 B13 C14 D15（分数：2.00）A. B.C.D.解析：解析 程序中二重循环对数组 array1 赋值 i+j，然后在 Text1 中显示，结果为 12。30.如果一个工程含有多个窗体及标准模块，则以下叙述中错误的是( )A任何时刻最多只有一个窗体是活动窗体B不能把标准模块设置为启动模块C用 Hide 方法只是隐藏一个窗体，不能从内存中清除该窗体D如果工程中含有 Sub Main 过程，则程序一定首先执行该过

48、程（分数：2.00）A.B.C.D. 解析：解析 Visual Basic 编程环境规定，任何时刻最多只有一个窗体是活动窗体，同时不能把标准模块设置为启动模块。用 Hide 方法只是隐藏一个窗体，不能从内存中清除该窗体。如果工程中含有 Sub Main 过程，则程序也不一定首先执行该过程。31.下列程序的执行结果为( )Private Sub Command1_Click()Dim x As Integer,y As Integerx=12:y=20Call Value(X,y)Print x;yEnd SubPrivate Sub Value(ByVal m As Integer,ByVal n As Integer)m=m * 2:n=n-5