[计算机类试卷]国家二级VB机试（选择题）模拟试卷132及答案与解析.doc

《[计算机类试卷]国家二级VB机试（选择题）模拟试卷132及答案与解析.doc》由会员分享，可在线阅读，更多相关《[计算机类试卷]国家二级VB机试（选择题）模拟试卷132及答案与解析.doc（25页珍藏版）》请在麦多课文档分享上搜索。

1、国家二级 VB机试（选择题）模拟试卷 132及答案与解析 一、选择题 1 下列叙述中正确的是 （ A）循环队列是顺序存储结构 （ B）循环队列是链式存储结构 （ C）循环队列是非线性结构 （ D）循环队列的插入运算不会发生溢出现象 2 下列叙述中正确的是 （ A）所有数据结构必须有根结点 （ B）所有数据结构必须有终端结点（即叶子结点） （ C）只有一个根结点，且只有一个叶子结点的数据结构一定是线性结构 （ D）没有根结点或没有叶子结点的数据结构一定是非线性结构 3 下列关于算法的描述中错误的是 （ A）算法强调动态的执行过程，不同于静态的计算公式 （ B）算法必须能在有限个步骤之后终止 （

2、C）算法设计必须考虑算法的复杂度 （ D）算法的优劣取决于运行算法程序的环境 4 在线性表的顺序存储结构中，其存储空间连续，各个元素所占的字节数 （ A）相同，元素的存储顺序与逻辑顺序一致 （ B）相同，但其元素的存储顺序可以与逻辑顺序不一致 （ C）不同，但元素的存储顺序与逻辑顺序一致 （ D）不同，且其元素的存储顺序可以与逻辑顺序不一致 5 设二叉树如下： 则中序序列为 （ A） ABDEGCFH （ B） DBGEAFHC （ C） DGEBHFCA （ D） ABCDEFGH 6 下面不属于软件需求分析阶段工作的是 （ A）需求获取 （ B）需求计划 （ C）需求分析 （ D）需求评审

3、 7 下面不属于黑盒测试方法的是 （ A）边界值分析法 （ B）基本路径测试 （ C）等价类划分法 （ D）错误推测法 8 在数据库系统中，数据模型包括概念模型、逻辑模型和 （ A）物理模型 （ B）空间模型 （ C）时间模型 （ D）数据模型 9 若实体 A和 B是一对一的联系，实体 B和 C是多对一的联系，则实体 A和 C的联系是 （ A）多对一 （ B）一对多 （ C）一对一 （ D）多对多 10 某二叉树中共有 935个结点，其中叶子结点有 435个，则该二叉树中度为 2的结点个数为 （ A） 64 （ B） 66 （ C） 436 （ D） 434 11 表达式 Int(5.3)+I

4、nt(-5.8) Fix(5.3)+Fix(-5.8)的值是 （ A） True （ B） False （ C） 1 （ D） 0 12 以下不合法的 Visual Basic变量名是 （ A） Cab24 （ B） Sims （ C） A#B （ D） Print_Text 13 下列各声明语句中错误的是 （ A） Dim Test As String=“计算机等级考试 （ B） Const Country = “China“ （ C） Public Sum As Integer （ D） Static v1 14 对于当前窗体，以下能打开代码窗口的操作是 （ A）按 F7键 （ B）单击窗

5、体 （ C）单击窗体上的某个控件 （ D）按 Ctrl+D键 15 对于窗体 Form1，下列叙述中正确的是 （ A）语句 Form1.Hide与 Form1.Visible=True的功能是等价的 （ B）语句 Form1.Hide与 Form1.Visible=False的功能是等价的 （ C）语句 Load Form1与 Form1.Visible=False的功能是等价的 （ D）语句 Unload Form1与 Form1.Visible=True的功能是等价的 16 属性 BorderColor的作用是 （ A）设置形状边界线和直线的颜色 （ B）设置直线或形状的背景颜色 （ C）

6、设置直线或形状边界线的线型 （ D）设置形状的内部颜色 17 在窗体上画多个控件，其中有一个 名称为 Text1的文本框，影响 Text1的 Tab顺序的属性是 （ A） TabStop （ B） Enabled （ C） Visible （ D） TabIndex 18 为了使组合框成为简单组合框，应把其 Style属性设置为 （ A） 0 （ B） 1 （ C） 2 （ D） 3 19 要使图片框 P1中显示当前路径下的图片文件 img1.jpg，则应使用的语句是 （ A） P1.Picture=“img1.jpg“ （ B） P1.Image=“img1.jpg“ （ C） P1.Pic

7、ture=LoadPicture(“img1.jpg“) （ D） LoadPicture(“img1.jpg“) 20 假定把计时器控件 Timer1的 Interval 属性设置为 1000， Enabled属性设置为True，并编写下面的事件过程： Private Sub Timer1_Timer() Dim x As Integer For i = 1 To 100 x = x + 1 Next i Print x End Sub 程序运行的结果为 （ A）总是输出 100 （ B）输出 1000 （ C）输出 10000 （ D）不确定 21 为了用形状控件画出不同的图形，应设置的属

8、性是 （ A） Height （ B） Index （ C） Enabled （ D） Shape 22 在设计阶段，为了设置某控件的 Left属性，可使用的方法是 （ A）在属性窗口中设置该属性的值 （ B）在某个事件过程中，编写代码为该属性赋值 （ C）双击该控件，在打开的窗口中设置该属性的值 （ D）以上方法都可以 23 下列说法中错误的是 （ A） ConstB是 Visual Basic的一个合法变量名 （ B）设 x是正实数，表达式 0.01*Int(100*(x+0.005)的功能是对 x小数点后第三位进行四舍五入 （ C）函数 IIf(0, 1, 2)的返回值为 2 （ D）数

9、学代数式 cos2(/4)+5e对应 Visual Basic表达式为 cos(3.14/4) 2+5 e 2 24 设有如下程序段，则正确的说法是 For i = 1 To 100 Step 0 x = x + 1 Next （ A）该循环为无限循环 （ B）该循环只循环 1次 （ C）该程序段有语法错误，不能执行，系统报错 （ D）该循环循环 100次 25 有下面的程序段： For i = 14 To 5 Step -3 Print Next i 执行此程序段后， i的值为 （ A） 1 （ B） 2 （ C） 3 （ D） 4 26 如果在过程 A中用语句： Call proc(a,

10、b) 调用下面的过程 Private Sub proc(b As Integer, ByVal a As Integer) a = a + 1 b = b * 2 End Sub 则调用结束后的结果是 （ A）过程 A中变量 b的值变为 原有值的 2倍 （ B）过程 A中变量 a的值变为原有值的 2倍 （ C）过程 A中变量 a的值变为原有值的 2倍， b的值等于原有值加 1 （ D）过程 A中变量 b的值变为原有值的 2倍， a的值等于原有值加 1 27 在窗体上画一个通用对话框控件 CD1，则执行以下程序段后，在显示的 “打开 “文件对话框的 “文件类型 “框中显示的信息是 CD1.Fil

11、ter = “所有文件 |*.*|Word文件 |*.Doc|文本文件 |*.Txt“ CD1.FilterIndex = 2 CD1.ShowOpen （ A） Word文件 （ B） *.Doc （ C）文本文件 （ D） *.Txt 28 在窗体上画一个名称为 CD1的通用对话框，一个名称为 Command1的命令按钮。然后编写如下事件过程： Private Sub Command1_Click() CD1.FileName = “ CD1.Filter = “所有文件 |*.*|(*.Doc)|*.Doc|(*.Txt)|*.Txt“ CD1.FilterIndex = 2 CD1.D

12、ialogTitle = “选择文件 “ CD1.Action = 1 End Sub 则当程序运行时，单击命令按钮 Command1后，将显示对话框窗口，以下有关叙述中错误的是 （ A）语句 CD1.Action = 1可等价地替换为语句 CD1.ShowSave （ B）在显示的对话框中指定的默认文件名为空 （ C）显示的对话框的标题为 “选择文件 “ （ D）在对话框中显示的默认文件类型为 (*.Doc) 29 假定有如下事件过程： Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y

13、 As Single) If Button = 2 Then PopupMenu mnuColor End If End Sub 则以下描述中错误的是 （ A） mnuColor是在菜单编辑器中已定义的弹出式菜单的名称 （ B）在窗体上，不管按下鼠标的哪个按键，系统都会触发执行该事件过程 （ C）参数 Shift可表示 shift、 Ctrl和 Alt键的按键状态 （ D）只有在窗体上按下鼠标左键才可弹出菜单 mnuColor 30 设有如下的程序段： s = 0 i = 1 While i b Print “*“; a = a + 1 Loop 34 下面程序段中 Print方法不能执行 6

14、次的是 （ A） For i = 1 To 2 For j = 1 To 3 Print i Next Next （ B） i = 1 Do While i 0 Then Print num(k); Next k End Sub Private Sub p(a() As Integer, ch As String) For k = 1 To Len(ch) st = Mid(ch, k, 1) If st = “a“ And st i + 1 a = a + 1 j = j + 1 Loop Next Text1.Text = a End Sub 当程序运行过程中，单击 Command1后，在

15、 Text1中的输出结果为 （ A） 3 （ B） 2 （ C） 1 （ D） 0 40 窗体上有一个名称为 List1的列表框，一个名称为 Label1的标签。列表框 List1中显示了由若干课程名称组成的列表项。当双击列表框 List1中的某个课程名时，在标签 Label1中能显示选中的课程名称，以下能正确实现上述功能的是 （ A） Private Sub List1_DblClick() Label1.Caption = List1.ListIndex End Sub （ B） Private Sub List1_DblClick() Label1.Name = List1.ListIn

16、dex End Sub （ C） Private Sub List1_DblClick() Label1.Name = List1.Text End Sub （ D） Private Sub List1_DblClick() Label1.Caption = List1.Text End Sub 国家二级 VB机试（选择题）模拟试卷 132答案与解析 一、选择题 1 【正确答案】 A 【试题解析】 循环队列是队列的一种顺序存储结构 . 线性结构是个数据元素构成的有限序列，除第一个元素外的每一个元素，有且只有一个前件，除最后一个元素外，有且只有一个后件。循环队列是线性结构。当需要插入的数据大于循

17、环队列的存储长度，入队运算会覆盖前面的数据，发生溢出 现象。故 A选项正确。 2 【正确答案】 D 【试题解析】 一个非空的数据结构如果满足以下两个条件：有且只有一个根结点；每一个结点最多有一个前件，也最多有一个后件，称为线性结构，在数据结构中习惯称为线性表， D选项正确。图是可能不包含根结点或叶子结点的数据结构， AB选项错误。数据结构中若有中间结点不满足只有一个前件或者后件条件，则不属于线性结构， C选项错误。 3 【正确答案】 D 【试题解析】 算法是指对解题方案的准确而完整的描述，简单地说，就是解决问题的操作步骤。算法不同于数学上的计算方法，强调实现， A选项叙述正确。算法的有穷性是指

18、，算法中的操作步骤为有限个，且每个步骤都能在有限时间内完成， B选项叙述正确。算法复杂度包括算法的时间复杂度和算法的空间复杂度。算法设计必须考虑执行算法所需要的资源，即时间与空间复杂度，故 C选项叙述正确。算法的优劣取决于算法复杂度，与程序的环境无关，当算法被编程实现之后，程序的运行受到计算机系统运行环境的限制，故正确答案为 D选项。 4 【正确答案】 A 【试题解析】 顺序表具有以下两个基本特征：线性表中所有元素所占的存储空间是连续的；线性表中各数据元素在存储空间中是按逻辑顺序依次存放的。在顺序表中，每个元素占有相同的存储单元。 A选项正确。 5 【正确答案】 B 【试题解析】 二叉树遍历可

19、以分为 3种：前序遍历（访问根结点在访问左子树和访问右子树之前）、中序遍历（访问根结点在访问左子树和访问右子树两者之间）、后序遍历（访问根结点在访问左子树和访问右子树之后）。本题中前序遍历为 ABDEGCFH，中序遍历为 DBGEAFHC，后序遍历为 DGEBHFCA，故 B选项正确。 6 【正确答案】 B 【试题解析】 需求分析阶段的工作可以分为 4个方面：需求获取、需求分析、编写需求规格说明书和需求评审，而需求计划不属于需求分析阶段的工作，故正确答案为 B选项。 7 【正确答案】 B 【试题解析】 常用的黑盒测试方法和技术有：等价类划分法、边界值分析法、错误推测法和因果图等。基本路径测试属

20、于白盒测试，故正确答案为 B选项。 8 【正确答案】 A 【试题解析】 数据模型按照不同的应用层次分为 3种类型：概念数据模型、逻辑数据模型、物理数据模 型，故 A选项正确。 9 【正确答案】 A 【试题解析】 一般来说，实体集之间必须通过联系来建立联接关系，分为三类：一对一联系（ 1:1）、一对多联系（ 1:m）、多对多联系（ m:n）。 A与 B是 1:1联系， B与 C是 m:1联系，则 A与 C是 m:1联系，即多对一，故 A选项正确。 10 【正确答案】 D 【试题解析】 在树结构中，一个结点所拥有的后件个数称为该结点的度，所有结点中最大的度称为树的度。对任何一棵二叉树，度为 0的结

21、点（即叶子结点）总是比度为 2的结点多一个。叶子结点有 435个，则度为 2的结点 为 434， D选项正确。 11 【正确答案】 B 【试题解析】 取整函数 Int（ x），返回值为不大于自变量 x的最大整数。Int(5.3)=5,Int(-5.8)=-6。取整函数 Fix(x),返回值为自变量 x的整数部分。Fix(5.3)=5,Fix(-5.8)=-5，表达式 -10结果为 False。故正确答案为 B选项。 12 【正确答案】 C 【试题解析】 VB中变量的命名规则有： 变量名的第一个字符必须是英文字母，最后一个字符可以是类型符。 变量名只能由字母、数字和下划线 “_“组成。 变量 名

22、有效长度为 255个字符。 Visual Basic中保留字不能作变量名，但变量名可以含有保留字。选项 C含有特殊字符，故正确答案为选项 C。 13 【正确答案】 A 【试题解析】 A选项的正确写法是： Dim Test As String : Test = “计算机等级考试 “。故正确答案为 A选项。 14 【正确答案】 A 【试题解析】 VB中打开代码窗口的方式有： 1.双击窗体上的某一控件。 2.按 F7快捷键。故正确答案为 A选项。 15 【正确答案】 B 【试题解析】 Form1.Hide：隐藏窗体 Form1，使当前窗体不可见。Form1.Visible：设置窗体 Form1是否可

23、见， Visible值为 True时，窗体 Form1可见，值为 False时，窗体 Form1不可见，故选项 A错误，选项 B正确； Load(装入 )事件，该事件主要用来在启动程序时对属性和相关变量的初始化。在装入窗体后，如果运行程序，将自动触发该事件。 Unload(卸载 )事件，该事件的作用是从当前的内存中清除一个窗体包括关闭和执行 Unload语句所触发的事件。此外如果重新装入该窗体，则窗体中的所有控件都要重新初始化，故选项 C和 D均错误。正确答案为 B选项。 16 【正确答案】 A 【试题解析】 FillColor用来设置形状内部的填充颜色。 BorderStyle用来设置直线和

24、形状的边界形的线型。 BorderColor用来设置直线和形状的颜色。故本题正确答案为 A选项。 17 【正确答案】 D 【试题解析】 TabStop 属性指定是否能使用 Tab键将焦点移到控件上，为 True可以获得焦点，为 False不可获得焦点，故选项 A错误； Enabled属性用来确定文本框或其他可获得焦点的控件，是否对用户产生的事件作出反应 ，故当为 False时，文本框被禁用，当为 True，可以获得焦点，故选项 B错误； Visible设置控件是否可见，故选项 C错误；控件的 TabIndex属性决定了 Tab顺序，故本题正确答案为选项 D。 18 【正确答案】 B 【试题解析

25、】 组合框的 Style属性用于设置组合框的类型和显示方式，共 3种方式。 0为下拉组合框， 1为简单组合框， 2为下拉列表框。故正确答案为选项 B。 19 【正确答案】 C 【试题解析】 在程序代码中可以使用 LoadPicture函数把图形文件装入图片框或图像框中。 格式 对象 .Picture = LoadPicture(“文件名 “)；可知选项 A， B， D均错误。本题正确答案为 C选项。 20 【正确答案】 A 【试题解析】 Interval属性用来设置计时器事件之间所间隔的毫秒数（ ms），题中 Interval属性值为 1000，即每隔 1秒发生一个计时器事件。 Enabled

26、属性用来设置计时器是否可用， Enabled为 True，即计时器可用，整型变量默认值为 0， For循环每执行一次， x的取值加 1，一共执行了 100次，故 x=1+1+1+1=100 。根据题意，计时器控 件每隔 1秒钟输出一次 100。故本题正确答案为 A选项。 21 【正确答案】 D 【试题解析】 Shape属性用来设置控件的形状； Height决定控件对象的高度；Enabled属性值为逻辑型，决定对象是否可用； Index用来标识控件数组中的每个控件索引。故正确答案为选项 D。 22 【正确答案】 A 【试题解析】 设置控件的 Left属性只能在属性窗口中设置该属性的值，故正确答案

27、为选项 A。 23 【正确答案】 D 【试题解析】 在 VB中，变量名的第一个字符必须是字母，最后一个字符可以是类型说明符，且变量名只能由字母、数字、下划线组成，故 A选项正确；取整函数 Int（ x），返回值为不大于自变量 x的最大整数， Int(Rnd*100)取值为在 0100之间的任意一整数，选项 B正确。 IIF函数实际上可以理解成 “If.Then.Else“的另外一种表现形式，即 IIf（条件， True部分， False部分），其中条件为逻辑表达式，当条件为真（ True）时，返回 “True部分 “； IIf(0,1,2)等价于 If 0 Then 1 Else 2 End

28、If，故其返回值为 2，选项 C正确。选项 D的 VB表 达式为：(Cos(/4)2+5*e2，故正确答案为 D选项。 24 【正确答案】 A 【试题解析】 题目中的 “Step 0“表示在 For 循环中步长为 0，即 i的取值均为 1，循环结束条件为 i=100，该循环为无限循环。故正确答案为 A选项。 25 【正确答案】 B 【试题解析】 此题考查 For循环语句的执行顺序， For循环遵循 “先判断，后执行 “的原则，先判断循环变量是否超过终值，如果没有超过，执行循环体，并且循环变量加一个步长；否则，退出循环。题中当 i=5时，未超过终值 5，执行 print操作并加一个步长， i=5

29、+（ -3），最终 i=2，故正确答案为选项 B。 26 【正确答案】 B 【试题解析】 用 Call语句调用 Sub过程。如果形参前面有关键字 ByVal，则该参数以传值方式传送。调用结束后，变量 a的值变为原有值的 2倍，变量 b的值不变。故本题正确答案为 B。 27 【正确答案】 A 【试题解析】 Filter属性是用来指定对话框中显示的文件类型，它的属性值有一对或多对文本字符串组成，每对字符串用 “|“隔开， “|“前面部分为描述符，后面部分一般为通配符和文件扩展名。 FilterIndex属性是指定默认的过滤器，当 Filter属性设置为多个过滤器后，每个过滤器都有一个值，本文中 F

30、ilterIndex=2，则默认的文件类型为 Word文件，故正确答案为 A选项。 28 【正确答案】 A 【试题解析】 语句 CD1.Action = 1与 CD1.ShowOpen等价， ShowOpen方法用于显示打开文件对话框，打开指定目录中的文件，故选项 A错误。 Filter属性用于文件过滤器，属性格式为：描述 1| 过滤器 1| 描述 2 | 过滤器 2 ； FilterIndex属性用于指定默认的文 件过滤器，即本题中默认的文件过滤器为 Doc文件，文件名为空，故选项 B， D正确； DialogTitle属性设置对话框的标题，选项 C正确。故正确答案为选项 A。 29 【正确

31、答案】 D 【试题解析】 MouseDown是按下鼠标时触发的事件。鼠标键参数， Button=2，按下右键，触发弹出菜单。选项 D错误，故本题正确答案为 D。 30 【正确答案】 C 【试题解析】 i=1，循环条件 18为假，执行循环体， a=6，依次类推，共执行了 4次。故本题正确答案为 D。 34 【正确答案】 B 【试题解析】 选项 A，双重 For循环，外层循环 i从 1到 2，内层循环 j从 1到3。外层循环每执行 1次，内层循环执行 3次，总共执行了 6次。选项 B， While与 For循环的结合体， While循环条件 i从 1到 2执行了 2次， For循环与变 量 i的取

32、值相关，当 i=1， For循环执行了 3次，当 i=2时， For循环从 2到 3执行了 2次，共执行了 5次打印 print方法，故选项 B错误。选项 C， For循环， i从 -2开始，直到 8，步长为 2， i取值为 -2， 0， 2， 4， 6， 8，执行了 6次打印 Print方法。选项 D， DoLoop Until ，当程序开始执行时，先执行循环体 ，再判断循环 “条件 “值，当条件为真时结束循环，否则执行循环体。变量 i的取值： 10， 7， 4，1， -2， -5，共执行了 6次打印 Print方法。故正确答案为 B选项。 35 【正确答案】 C 【试题解析】 用户定义数据

33、类型可以用 Type语句来定义，格式是： Type 数据类型名 数据类型元素名 AS 类型名 数据类型元素名 AS 类型名 End Type。用户定义的数据类型必须先定义后使用，而且只能在模块（窗体模块或标准模块）的声明部分定义，故选项 A错误。文件的打开格式： Open文件说明 For方式 Access存取类型 锁定 As #文件号 Len=记录长度 。如果以输出（ Output）、附加（ Append）或随机（ Random）访问方式打开的文件不存在，则会建立相应的文件，故选项 B错误。随机文件写操作格式： Put #文件号， 记录号 ，变量，功能是把 “变量 “的内容写入由 “文件 “号

34、所指定的磁盘文件中。当记录号没有指明时，系统默认，则数据将被写到下一个记录位置，即最近执行 Get或 Put语句后的记录，或由最近的 Seek函数指定的记录，故选项 D错误。本题正确答案为 C。 36 【正确答案】 A 【试题解析】 如果形参前面没有关键字 ByRef或 ByVal，系统默认为按地址传递参数。形参对实参的值作更改会改变相应实参的值。 Dim定义的变量称为 “自动变量 “，当引用 Dim定义变量时，变量值会 被重新设置（数值变量重新设置为 0，字符串变量被设置为空）。也就是说，下次再使用此变量，其值为初始值。而 Static定义变量，每次引用该静态变量后，其值会继续保留，作为下一

35、次引用时该变量的初始值。 For循环变量 i的取值从 1到 3。当 i=1时，调用 Fun(a)实参与形参默认按地址传递参数，静态整型变量第一次默认的初始值为 0，x=0,x=x+1=1,y=y+1=1,a=1,Fun=1。当 i=2，第二次调用 Fun(a)时，因变量 x为静态变量，下一次引用该变量的初始值是上一次处理后的最后取值，x=x+1=2,y=y+1=1,a=y=1,Fun=2；当 i=3，第三次调用 Fun(a)时，x=x+1=3,y=y+1=1,a=y=1,Fun=3最后将 3返回给 x，故最后打印的结果为x=3,a=1。本题正确答案为 A。 37 【正确答案】 C 【试题解析】

36、 程序开始执行时， f1=1， f2=1， s=f1+f2=2。 For循环变量 i的取值从 1到 3，当 i=1时， f1=f1+f2=2， f2=f2+f1=1+2=3， s=s+f1+f2=2+2+3=7；当 i=2时， f1=f1+f2=2+3=5， f2=f2+f1=3+5=8， s=s+f1+f2=7+5+8=20；当 i=3时，f1=f1+f2=5+8=13， f2=f2+f1=8+13=21， s=s+f1+f2=20+13+21=54；故本题正确答案为 C。 38 【正确答案】 A 【试题解析】 Len(ch)计算 program的字符数为 7， num(26)数组用来统计每

37、个字符出现的次数， Asc()函数用来返回指定字符的 ASCII码值。程序开始执行，输入字符串 “program“给变量 ch，然后调用过程 p，调用开始时实参 num()将地址传给形参 a()，实参 ch将地址传给形参 ch。程序开始执 行过程 p：首先进入 For循环， k取值从 1到 7。当 k=1,st=mid(ch,k,1)=“p“,判断 If条件为真，执行n=Asc(st)-Asc(“a“)+1=16， a(16)=0+1=1；当 k=2,st=mid(ch,k,1)=“r“,判断 If条件为真，执行 n=Asc(st)-Asc(“a“)+1=18， a(18)=0+1=1；当 k

38、=3,st=mid(ch,k,1)= “o“,判断 If条件为真，执行 n=Asc(st)-Asc(“a“)+1=15， a(15)=0+1=1；依次执行，当k=7执行最后一次循环结束 。 a()数组中存放的值为字符串 ch中每个字符出现的次数。最后程序返回 Command1_Click过程。 For循环将数组中非 0元素依次打印输出。故答案为 A选项。 39 【正确答案】 A 【试题解析】 Do UntilLoop ，当程序开始执行时，先计算循环 “条件 “值，当条件为真时结束循环，否则执行循环体。外层 For循环，循环变量 i的取值从 1到2。当 i=1时， a=0， j=1，进入 Do

39、Until内层循环，循环条件 11+1为假，执行循环体， a=0+1=1， j=1+1=2，内层循环继续执行，循环条件 21+1为假，执行循环体， a=1+1=2， j=2+1=3，再计算内层循环条件 31+1为真，退出内层 Until循环体；当 i=2时， a=0， j=1，进入 Do Until内层循环，循环条件 12+1为假，执行循环体， a=0+1=1， j=1+1=2，内层循环继续执行，循环条件 22+1为假，执行循环体， a=1+1=2， j=2+1=3，内层循环继续执行，循环条件 32+1为假，执行循环体， a=2+1=3， j=3+1=4，再计算内层循环条件 42+1为真，退出内层 Until循环体，再退出 For循环，故 a=3。正确答案为 选项 A。 40 【正确答案】 D 【试题解析】 标签 Label的 Caption属性表示标签中显示的内容；列表框 List的Text属性表示列表框中所选内容，故正确答案为选项 D。