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

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

1、二级 VISUAL+BASIC 笔试-422 及答案解析(总分：100.00，做题时间：90 分钟)一、选择题(总题数：35，分数：70.00)1.设计程序时，应采纳的原则之一是( )A程序的结构应有助于读者的理解 B限制 GOTO 语句的使用C减少或取消注释行 D程序越短越好（分数：2.00）A.B.C.D.2.需求分析阶段的任务是( )A软件开发方法 B软件开发工具C软件开发费用 D软件系统功能（分数：2.00）A.B.C.D.3.结构化分析方法是面向( )的自顶向下，逐步求精进行需求分析的方法。A对象 B数据结构C数据流 D目标（分数：2.00）A.B.C.D.4.已知一个有序线性表为(

2、13，18，24，35，47，50，62，83，90，115，134)，当用二分法查找值为 90的元索时，查找成功的比较次数为( )A1 B2C3 D9（分数：2.00）A.B.C.D.5.下列对于软件测试的描述正确的是( )A软件测试的目的是证明程序是否正确B软件测试的目的是使程序运行结果正确C软件测试的目的是尽可能地多发现程序中的错误D软件测试的目的是使程序符合结构化原则（分数：2.00）A.B.C.D.6.下列选项中，不是一个算法的基本特征的是( )A完整性 B可行性C有穷性 D拥有足够的情报（分数：2.00）A.B.C.D.7.下列叙述中正确的是( )A线性链表的各元素在存储空间中的位

3、置必须是连续的B线性链表的头元素一定存储在其他元素的前面C线性链表中的各元素在存储空间中的位置不一定是连续的，但表头元素一定存储在其他元素的前面D线性链表中的各元素在存储空间中的位置不一定是连续的，且各元素的存储顺序也是任意的（分数：2.00）A.B.C.D.8.有下列二叉树，对此二叉树中序遍历的结果是( )（分数：2.00）A.B.C.D.9.最简单的交换排序方法是( )A快速排序 B选择排序C堆排序 D冒泡排序（分数：2.00）A.B.C.D.10.数据库 DB、数据库系统 DBS、数据库管理系统 DBMS 之间的关系是( )ADB 包括 DBS 和 DBMS BDBMS 包括 DB 和

4、DBSCDBS 包括 DB 和 DBMS D没有任何关系（分数：2.00）A.B.C.D.11.算法的空间复杂度是指( )A算法程序的长度 B算法程序中的指令条数C算法程序所占的存储空间 D算法执行过程中所需要的存储空间（分数：2.00）A.B.C.D.12.表达式 Val(“.123E2“)的值是( )A123 B12.3C0 D123e2CD（分数：2.00）A.B.C.D.13.执行语句 Print“sgn(-34)=“;sgn(-34)后，其输出结果是( )ASgn(-34)=34 BSgn(-34)=-34CSgn(-34)=+1 DSgn(-34)=-1（分数：2.00）A.B.C

5、.D.14.程序运行时，用户向文本框输入内容时将触发文本框的( )事件AClick BDblClickCGotFocus DChange（分数：2.00）A.B.C.D.15.要使一个文本框具有水平和垂直滚动条，则应先将其 MultiLine 属性设置为 True，然后再将ScrollBars 属性设置为( )A0 B1C2 D3（分数：2.00）A.B.C.D.16.下列关于 ForNext 语句的说法正确的是( )A循环变量、初值、终值和步长都必须为数值型 BStep 后的步长只为正数C初值必须小于终值 D初值必须大于终值（分数：2.00）A.B.C.D.17.可以通过( )的方法来输出一

6、个二维数组中的各个元素。A引用数组的两个下标 B将数组名赋值给变量C通过引用数组的一个下标 D以上都不正确（分数：2.00）A.B.C.D.18.下列程序的执行结果是( )Function P(N As Integer)For i1 To NSum=Sum+iNext iPSumEnd FunctionPrivate Sub Command1 Click()S=P(1)+P(2)+P(3)+P(4)Print S:End SubA15 B16 C20 D25（分数：2.00）A.B.C.D.19.关于多行结构条件语句的执行过程，正确的说法是( )A各个条件所对应的语句块中，一定有一个语句块被执

7、行B找到条件为 True 的第一个入口，便从此开始执行其后的所有语句块C若有多个条件为 True，则它们对应的语句块都被执行D多行选择结构中的语句块，有可能任何一个语句块都不被执行（分数：2.00）A.B.C.D.20.下列关于图片框控件的语句中不正确的是( )APicture 1.Picture=Picture2.PictureBPicture1.Picture=LoadPicture(“C：/vb60/Arw04Up.ico“)CPicture 1.Print Tab(20);CurrentX.CurrentYDPicture 1.Stretch=True（分数：2.00）A.B.C.D.

8、21.在窗体上有一个命令按钮 Command1，编写下列程序：Private Sub Command1_Click()Print ppl(3,7)End SubPublic Function ppl(X As Single,n As Integer)As SingleIf n=0Thenppl=1ElseIf n M0d 2=1 Thenppl=x*x+nEIseppl=x*x-nEnd IfEnd IfEnd Function程序运行后，单击该命令按钮，屏幕上显示的是( )A2 B1 C0 D16（分数：2.00）A.B.C.D.22.窗体上有一个命令按钮 Command1 和一个列表框 L

9、ist1。先选择列表框中的某一个项目，然后单击命令按钮，将该项目从列表框中删除。程序如下：Privat Sub Command1_Click()Dim In As IntgerIn=_List.Remove InEnd Sub则在程序的空白处的语句是( )AList1.Index BList1.ListIndexCList1.Text DList1.ListCount（分数：2.00）A.B.C.D.23.某人在窗体上画一个名称为 Timer1 的计时器和一个名称为 Label1 的标签，计时器的属性设置为Enabled=True，Interval=，对应代码如下。希望在程序运行时，可以每 2

10、 秒在标签上显示一次系统当前时间。Private Sub Timer1_Timer()Label1.Caption=Time$End Sub在程序执行时发现未能实现上述目的，那么应做的修改是( )A通过属性窗口把计时器的 Interval 属性设置为 2000B通过属性窗口把计时器的 Enabled 属性设置为 FalseC把事件过程中的 Label1.CaptionTime$语句改为 Timer1.IntervalTime$D把事件过程中的 Label1.Caption=Time$语句改为 Label1.Caption=Timer1.Time（分数：2.00）A.B.C.D.24.在窗体上画

11、两个单选按钮，名称分别为 Option1 和 Option2，标题分别为“黑体”和“楷体”；一个复选框，名称为 Cheek1，标题为“粗体”。要求程序运行时，“黑体”单选按钮和“粗体”复选框被选中，则能够实现上述要求的语句序列是( )AOptionl.Value=True Cheek1.ValueFalse BOptionl.Value=TrueCheek1.Value=TmeCOption2.Value=FalseCheck1 Value=True DOptionl.Value=TrueCheck1 Value=1（分数：2.00）A.B.C.D.25.InputBox 函数可以产生输入对话

12、框。执行下列语句：St$=InputBox(“请输入字符串“,“字符串“)运行程序，用户输入完毕并单击“确定”按钮后，St$变量内容为( )A字符串 B请输入字符串C字符串对话框 D用户输入内容（分数：2.00）A.B.C.D.26.窗体上有名称为 Text1、Text2 的两个文本框，和一个由 3 个单选按钮构成的控件数组 Optionl，如图1 所示。程序运行后，如果单击某个单选按钮，则执行 Text1 中数值与该单选按钮所对应的运算(乘 1、乘10 或乘 100)，并将结果显示在 Text2 中，如图 2 所示。为了实现上述功能，在程序中的横线处应填入的内容是( )（分数：2.00）A.

13、B.C.D.27.下列关于多重窗体程序的叙述中，错误的是( )A用 Hide 方法不但可以隐藏窗体，而且能清除内存中的窗体B在多重窗体程序中，各窗体的菜单是彼此独立的C在多重窗体程序中，可以根据需要指定启动窗体D对于多重窗体程序，需要单独保存每个窗体（分数：2.00）A.B.C.D.28.在窗体上放置一个命令按钮 Command1，并编写下列单击事件的程序：Option Base 1Private Sub Command1_ Click()Dim c As Integer，d As Integerd=0c=6X=Array(2,4,6,8,10,12)For i=1 To 6If X(i)c

14、Thendd+X(i)cX(i)Elsed=d.CEnd IfNext iPrint dEnd Sub程序运行后，单击命令按钮，则在窗体上输出的结果是( )A10 B12 C16 D20（分数：2.00）A.B.C.D.29.下列关于菜单的说法错误的是( )A每个菜单项都是一个控件，与其他控件一样也有其属性和事件B除了 Click 事件之外，菜单项不可以响应其他事件C菜单项的索引号可以不连续D菜单项的索引号必须从 1 开始（分数：2.00）A.B.C.D.30.下列说法不正确的是( )A滚动条的重要事件是 Change 和 ScrollB框架的主要作用是将控件进行分组，以完成各自相对独立的功能

15、C组合框是组合了文本框和列表框的特性而形成的一种控件D计时器控件可以通过对 Visible 属性的设置，在程序运行期间显示在窗体上（分数：2.00）A.B.C.D.31.要使某菜单能够通过按住键盘上的Alt键及K键打开，应( )A在“名称”栏中“K”字符前加上“”符号 B在“标题”栏中“K”字符后加上“”符号C在“标题”栏中“K”字符前加上“”符号 D在“名称”栏中“K”字符后加上“”符号（分数：2.00）A.B.C.D.32.Sub 过程与 Function 过程最根本的区别是( )ASub 过程可以使用 Call 语句或直接使用过程名调用，而 Function 过程不可以BFunction

16、 过程可以有参数，Sub 过程不能有参数C两种过程参数的传递方式不同DSub 过程的过程名不能有返回值，而 Function 过程能通过过程名返回值（分数：2.00）A.B.C.D.33.下列程序的功能是调用字体对话框来设置文本框中的字体，单击 Command1 按钮弹出对话框，进行相应的字体、字号等设置，然后单击“确定”按钮退出对话框，则将发生哪些变化( )Private Sub Command1_Click()CommonDialog1.CancelError=TrueCommonDialog1.Flags=3On Error Resame NextComrnonDiatog1.ShowF

17、ontText1.Font.Name=CommonDialog1.FontNameText1.Font.Size=CommonDialog1.FontSizeText1.Font.Bold=CommonDialog1.FontBoldText1.Font.Italic=CommonDialog1.FontltalicText1.Font.Underline=CommonDialog1.FontUnderlineText1.FontStrikethru=CommonDialog1.FontStrikethruText1.ForeColor;CommonDialog1.ColorEnd SubAT

18、ext1 的字体不发生变化 BText1 的字体发生变化CText1 的字体和颜色发生变化 D程序出错（分数：2.00）A.B.C.D.34.按文件的访问方式不同，可以将文件分为( )A顺序文件、随机文件 B文本文件和数据文件C数据文件和可执行文件 DASCII 文件和二进制文件（分数：2.00）A.B.C.D.35.如果准备读文件，打开随机文件“text.dat”的正确语句是( )AOpen“text.dat“For Write As#1 BOpen“text.dat“For Binary As#1COpen“text.dat“For Input As#1 DOpen“text.dat“Fo

19、r Random As#1（分数：2.00）A.B.C.D.二、填空题(总题数：12，分数：30.00)36.在结构化设计方法中，数据流图表达了问题中的数据流与加工间的关系，且每一个 1 实际上对应一个处理模块。（分数：2.00）填空项 1:_37.数据库的逻辑模型设计阶段的任务是将 1 转换成关系模式。（分数：2.00）填空项 1:_38.在面向对象程序设计中，从外面只能看到对象的外部特征，而无须知道数据的具体结构以及实现操作的算法，这称为对象的 1。（分数：2.00）填空项 1:_39.软件生命周期分为软件定义期、软件开发期和软件维护期，详细设计属于 1 中的一个阶段。（分数：2.00）填

20、空项 1:_40.树中度为零的结点称为 1。（分数：2.00）填空项 1:_41.Define a 定义的变量 a 是_类型的变量。（分数：2.00）填空项 1:_42.设 A2，B-2，则表达式 A/2+1B+5 Or B*(-2)6 的值是_。（分数：2.00）填空项 1:_43.组合框有 3 种不同的类型，这 3 种类型是下拉式列表框、简单组合框和下拉式组合框，分别通过把Style 属性设置为 1 实现。（分数：2.00）填空项 1:_44.下列程序弹出对话框中按钮的个数为_。MsgBox“确认!“,vbAbortRetrylgnore+vbMsgBoxHelpButton+vbQues

21、tion,“提示/（分数：2.00）填空项 1:_45.在程序的每个空白处填写一条适当的语句，使程序完成相应的操作。程序实现的功能是：窗体上有文本框 Text1 和若干复选框，其中复选框 Cheek1 用于设置本框 Text1 显示的文本是否加下画线。Cheek1 的单击事件过程如下：Private Sub Cheek1_Click()If_ThenText1.FontUnderline=TrueEleslf_ThenText1.FontUndrline=FalseEnd IfEnd Sub（分数：4.00）填空项 1:_46.设有下列程序，查找并输出该数组中的最小值，请在空白处填上合适的代码

22、，将程序补充完整。Option Base 1Private Sub Command1Click()Dim arrlDim Min As Integer,i As Integerarrl=Array(12,435,76,-24,78,54,866,43)Min=arrl(1)For i=2 To 8If arrl(i)Min Then_NextiPrint“最小值是:“:MinEnd Sub（分数：2.00）填空项 1:_47.建立一个通信录的随机文件 phonBook.txt,内容包括姓名、电话、地址和邮编，用文本框输入数据。单击“添加主记录”按钮 Command1 时，将文本框数据写入文件，

23、单击“显示”按钮 Command2 时，将文件中所有记录的内容显示在立即窗口。Private Type PerDataName1 As StringPhon As String * 11Address As String * 10PostCd As String * 6End Type_定义 PerData 类型的变量 xDataPrivat Sub Form_Load()Open“C:/phonBook.txt“For Random AslEnd SubPrivate Sub Command1_Click()xData.Name1=Text1.TextxData.Phon=Text2.Tex

24、t_=Text3.TextxData.PostCd=Text4.TextPutg#1,1,xDataText1.Text=“ “:Text2.Text=“ “Text1.3Text=“ “:Text4.Text=“ “End SubPrivate Sub Command2_Click()reno=LOF(1)/Len(xData)i=1D0 While irenoGet#1,i,xDataDebug.Print xData,Name1,_,xData.Address,xData.PostCdi=i+1LooPEnd Sub（分数：6.00）填空项 1:_二级 VISUAL+BASIC 笔试-4

25、22 答案解析(总分：100.00，做题时间：90 分钟)一、选择题(总题数：35，分数：70.00)1.设计程序时，应采纳的原则之一是( )A程序的结构应有助于读者的理解 B限制 GOTO 语句的使用C减少或取消注释行 D程序越短越好（分数：2.00）A. B.C.D.解析：解析 程序设计的风格主要强调程序的简单、清晰和可理解性,以便读者理解。程序滥用 GOT0 语句将使程序流程无规律，可读性差；添加注释行有利于对程序的理解，不应减少或取消，程序的长短要依据实际的需要而定，并不是越短越好。2.需求分析阶段的任务是( )A软件开发方法 B软件开发工具C软件开发费用 D软件系统功能（分数：2.0

26、0）A.B.C.D. 解析：解析 需求分析是软件定义时期的最后一个阶段，它的基本任务就是详细调查现实世界要处理的对象，充分了解原系统的工作概况，明确用户的各种需求，然后在这些基础上确定新系统的功能。3.结构化分析方法是面向( )的自顶向下，逐步求精进行需求分析的方法。A对象 B数据结构C数据流 D目标（分数：2.00）A.B.C. D.解析：解析 结构化分析方法是面向数据流进行需求分析的方法，采用自顶向下、逐层分解，建立系统的处理流程，以数据流图和数据字典为主要工具，建立系统的逻辑模型。4.已知一个有序线性表为(13，18，24，35，47，50，62，83，90，115，134)，当用二分法

27、查找值为 90的元索时，查找成功的比较次数为( )A1 B2C3 D9（分数：2.00）A.B. C.D.解析：解析 根据二分法查找法需要两次：(1)首先将 90 与表中间的元素 50 进行比较，由于 90 大于50，所以在线性表的后半部分查找。(2)第二次比较的元素是后半部分的中间元素，即 90，这时两者相等即查找成功。5.下列对于软件测试的描述正确的是( )A软件测试的目的是证明程序是否正确B软件测试的目的是使程序运行结果正确C软件测试的目的是尽可能地多发现程序中的错误D软件测试的目的是使程序符合结构化原则（分数：2.00）A.B.C. D.解析：解析 软件测试是为了尽可能多地发现程序中的

28、错误，尤其是发现至今尚未发现的错误。6.下列选项中，不是一个算法的基本特征的是( )A完整性 B可行性C有穷性 D拥有足够的情报（分数：2.00）A. B.C.D.解析：解析 作为一个算法，一般应该具有下列 4 个特征：(1)可行性，即考虑到实际的条件能够达到一个满意的结果；(2)确定性，算法中的每一个步骤都必须是有明确定义的；(3)有穷性，一个算法必须在有限的时间内做完；(4)拥有足够的情报。7.下列叙述中正确的是( )A线性链表的各元素在存储空间中的位置必须是连续的B线性链表的头元素一定存储在其他元素的前面C线性链表中的各元素在存储空间中的位置不一定是连续的，但表头元素一定存储在其他元素的

29、前面D线性链表中的各元素在存储空间中的位置不一定是连续的，且各元素的存储顺序也是任意的（分数：2.00）A.B.C.D. 解析：解析 在线性链表中，各元素在存储空间中的位置是任意的，各元素的顺序也是任意的，依靠指针来实现数据元素的前后关系。8.有下列二叉树，对此二叉树中序遍历的结果是( )（分数：2.00）A.B. C.D.解析：解析 对二叉树的中序遍历是指：首先遍历左子树，然后访问根结点，最后遍历右子树。在遍历左、右子树时，注意依旧按照“左子树根结点右子树”的顺序。本题的遍历顺序是这样的：(1)首先访问左子树：BDEY；(2)在左子树 BDEY 中，也按中序遍历，先访问左子树 DY；在左子树

30、 DY 中，也按中序遍历，先访问左子树，左子树没有，则访问根结点 D，然后访问右子树 Y；(3)接着访问根 B，再访问右子树 E；(4)访问左子树 BDEY 后，接着访问根结点 A，然后访问右子树 CFXZ；(5)同理可得右子树CFXZ 的访问顺序为 FCZX。9.最简单的交换排序方法是( )A快速排序 B选择排序C堆排序 D冒泡排序（分数：2.00）A.B.C.D. 解析：解析 交换排序方法是指借助数据元素之间的互相交换进行排序的一种方法，包括冒泡排序和快速排序。冒泡排序是一种最简单的交换排序方法，它通过相邻元素的交换，逐步将线性表变成有序。10.数据库 DB、数据库系统 DBS、数据库管理

31、系统 DBMS 之间的关系是( )ADB 包括 DBS 和 DBMS BDBMS 包括 DB 和 DBSCDBS 包括 DB 和 DBMS D没有任何关系（分数：2.00）A.B.C. D.解析：解析 数据库系统(DBS)由数据库(DBS)、数据库管理系统(DBMS)、数据库管理员、硬件平台和软件平台 5 个部分组成，可见 DB 和 DBMS 都是 DBS 的组成部分。11.算法的空间复杂度是指( )A算法程序的长度 B算法程序中的指令条数C算法程序所占的存储空间 D算法执行过程中所需要的存储空间（分数：2.00）A.B.C.D. 解析：解析 一个算法空间复杂度是指算法所需要的内存空间。12.

32、表达式 Val(“.123E2“)的值是( )A123 B12.3C0 D123e2CD（分数：2.00）A.B. C.D.解析：解析 Val 函数返回包含于字符串内的合法数字。使用 Val 函数时应注意下列两点：(1)Val 函数能够识别第一个可用的小数点分隔符；(2)在不能识别数字的第一个字符上停止读入字符串，如果第一个字符不为数字字符，返回 0 值。题中 12E2=0.123102=12.3，因此表达式 Val(“.123E2“)的值为 12.3。13.执行语句 Print“sgn(-34)=“;sgn(-34)后，其输出结果是( )ASgn(-34)=34 BSgn(-34)=-34C

33、Sgn(-34)=+1 DSgn(-34)=-1（分数：2.00）A.B.C.D. 解析：解析 本题使用 Sgn 函数来判断某数的正负号。当参数大于 O 时，返回 1；当参数等于 0 时，返回 0；当参数小于 0 时，返回-1。14.程序运行时，用户向文本框输入内容时将触发文本框的( )事件AClick BDblClickCGotFocus DChange（分数：2.00）A.B.C.D. 解析：解析 Click 事件是在对象上按下然后释放一个鼠标按钮时触发的事件；DblClick 事件是在对象上连续两次按下和释放鼠标按钮时触发的事件；GotFocus 事件是在对象得到焦点时触发的事件；当用户

34、向文本框输入新信息，或者当程序把文本框的 Text 属性设置为新值时触发 change 事件。15.要使一个文本框具有水平和垂直滚动条，则应先将其 MultiLine 属性设置为 True，然后再将ScrollBars 属性设置为( )A0 B1C2 D3（分数：2.00）A.B.C.D. 解析：解析 文本框控件 ScrollBar 的属性设置有下列 4 种：0(默认值)没有滚动条、1(水平滚动条)、2(垂直滚动条)和 3(水平和垂直滚动条两种)。16.下列关于 ForNext 语句的说法正确的是( )A循环变量、初值、终值和步长都必须为数值型 BStep 后的步长只为正数C初值必须小于终值

35、D初值必须大于终值（分数：2.00）A. B.C.D.解析：解析 考生在使用 ForNext 循环语句时，必须了解它的注意事项：For 循环语句的步长可以是正数或负数，但不能为 0。如果为正数，说明循环变量是递增循环，当大于终值时，停止循环；如果为负数，说明循环变量是递减循环，当小于终值时，停止循环。17.可以通过( )的方法来输出一个二维数组中的各个元素。A引用数组的两个下标 B将数组名赋值给变量C通过引用数组的一个下标 D以上都不正确（分数：2.00）A. B.C.D.解析：解析 一般输出数组元素时，可以通过引用数组下标来逐个输出。在输出二维数组元素时，也可以采用同样的方法，只是二维数组需

36、要引用两个下标来逐个输出。18.下列程序的执行结果是( )Function P(N As Integer)For i1 To NSum=Sum+iNext iPSumEnd FunctionPrivate Sub Command1 Click()S=P(1)+P(2)+P(3)+P(4)Print S:End SubA15 B16 C20 D25（分数：2.00）A.B.C. D.解析：解析 本题主要考查函数返回值引用的方法。在引用函数时，只需应用该函数名即可。题中程序运算过程为：S=P(1)+P(2)+P(3)+P(4)S=1+3+6+10=20。19.关于多行结构条件语句的执行过程，正确的

37、说法是( )A各个条件所对应的语句块中，一定有一个语句块被执行B找到条件为 True 的第一个入口，便从此开始执行其后的所有语句块C若有多个条件为 True，则它们对应的语句块都被执行D多行选择结构中的语句块，有可能任何一个语句块都不被执行（分数：2.00）A.B.C.D. 解析：解析 If 条件语句中条件成立时，就会执行相应的语句块，然后执行 End If 后面的代码，而不是执行 If 语句中所有的语句块，所以选项 B 错误；在某些情况下，可能有多个条件为 True 时，只执行第1 个为 True 的条件后面的语句块，因此选项 C 错误；多行结构条件语句虽有多个条件，但也有可能一个条件都不成

38、立，从而一个语句都不执行，所以选项 A 错误。20.下列关于图片框控件的语句中不正确的是( )APicture 1.Picture=Picture2.PictureBPicture1.Picture=LoadPicture(“C：/vb60/Arw04Up.ico“)CPicture 1.Print Tab(20);CurrentX.CurrentYDPicture 1.Stretch=True（分数：2.00）A.B.C.D. 解析：解析 选项 A 中的语句是将图片框 2 的图片显示在图片框 1 中；选项 B 中的语句是在运行时载入图片；选项 C 是使用图片框控件的 Print 方法在图片框

39、中输出文本；图片框控件没有 Stretch 属性。21.在窗体上有一个命令按钮 Command1，编写下列程序：Private Sub Command1_Click()Print ppl(3,7)End SubPublic Function ppl(X As Single,n As Integer)As SingleIf n=0Thenppl=1ElseIf n M0d 2=1 Thenppl=x*x+nEIseppl=x*x-nEnd IfEnd IfEnd Function程序运行后，单击该命令按钮，屏幕上显示的是( )A2 B1 C0 D16（分数：2.00）A.B.C.D. 解析：解析

40、 本题比较简单，只要根据程序的执行条件和顺序，就可以运算出该程序的最后输出结果。程序运算过程是：If n0 Then.else if nMod 21 Then ppl=x*x+n，所以结果为 16。22.窗体上有一个命令按钮 Command1 和一个列表框 List1。先选择列表框中的某一个项目，然后单击命令按钮，将该项目从列表框中删除。程序如下：Privat Sub Command1_Click()Dim In As IntgerIn=_List.Remove InEnd Sub则在程序的空白处的语句是( )AList1.Index BList1.ListIndexCList1.Text D

41、List1.ListCount（分数：2.00）A.B. C.D.解析：解析 Index 属性返回或设置唯一的标识控件数组中一个控件的编号；ListIndex 属性返回或设置控件中当前选择项目的索引；ListCount 属性返回列表控件中项目的个数；Text 属性返回列表框中选择的项目，是 string 类型，这里需要一个数值类型，所以使用 ListIndex。23.某人在窗体上画一个名称为 Timer1 的计时器和一个名称为 Label1 的标签，计时器的属性设置为Enabled=True，Interval=，对应代码如下。希望在程序运行时，可以每 2 秒在标签上显示一次系统当前时间。Pri

42、vate Sub Timer1_Timer()Label1.Caption=Time$End Sub在程序执行时发现未能实现上述目的，那么应做的修改是( )A通过属性窗口把计时器的 Interval 属性设置为 2000B通过属性窗口把计时器的 Enabled 属性设置为 FalseC把事件过程中的 Label1.CaptionTime$语句改为 Timer1.IntervalTime$D把事件过程中的 Label1.Caption=Time$语句改为 Label1.Caption=Timer1.Time（分数：2.00）A. B.C.D.解析：解析 Timer 控件有两个重要的属性和一个事件

43、。其中，Interval 设置响应 Timer 事件的时间间隔，单位是毫秒。要每隔 2 秒显示一次当前时间，就是每隔 2 秒触发一次 Timer()事件，所以应设置Interval 属性为 2000。24.在窗体上画两个单选按钮，名称分别为 Option1 和 Option2，标题分别为“黑体”和“楷体”；一个复选框，名称为 Cheek1，标题为“粗体”。要求程序运行时，“黑体”单选按钮和“粗体”复选框被选中，则能够实现上述要求的语句序列是( )AOptionl.Value=True Cheek1.ValueFalse BOptionl.Value=TrueCheek1.Value=TmeCO

44、ption2.Value=FalseCheck1 Value=True DOptionl.Value=TrueCheck1 Value=1（分数：2.00）A.B.C.D. 解析：解析 Value 属性用来返回或设置复选框和单选按钮的状态。单选按钮的该属性有两个值：默认值 False 表示未选中，True 表示选中。复选框的 Value 属性用来返回或设置控件的状态，它可取 3 种属性值：当取 0 时表示未选中(默认值)；当取 1 时，表示选中；当取 2 时，表示为变灰。运行时只有 0和 1 两种状态。25.InputBox 函数可以产生输入对话框。执行下列语句：St$=InputBox(“请

45、输入字符串“,“字符串“)运行程序，用户输入完毕并单击“确定”按钮后，St$变量内容为( )A字符串 B请输入字符串C字符串对话框 D用户输入内容（分数：2.00）A.B.C.D. 解析：解析 InputBox 函数用于产生一个输入对话框，在对话框中显示提示，等待用户在对话框的文本框中输入内容或按下按钮，然后返回包含文本框内容的字符串。26.窗体上有名称为 Text1、Text2 的两个文本框，和一个由 3 个单选按钮构成的控件数组 Optionl，如图1 所示。程序运行后，如果单击某个单选按钮，则执行 Text1 中数值与该单选按钮所对应的运算(乘 1、乘10 或乘 100)，并将结果显示在

46、 Text2 中，如图 2 所示。为了实现上述功能，在程序中的横线处应填入的内容是( )（分数：2.00）A.B. C.D.解析：解析 控件数组中的控件共享同一个事件过程，相互间通过 Index 属性区别，题中单选按钮数组的单击事件中，有一个 Index 参数，单击不同的单选按钮，它取不同的值，根据其值进行不同的操作，所以 Select Case 语句的表达式为 Index。27.下列关于多重窗体程序的叙述中，错误的是( )A用 Hide 方法不但可以隐藏窗体，而且能清除内存中的窗体B在多重窗体程序中，各窗体的菜单是彼此独立的C在多重窗体程序中，可以根据需要指定启动窗体D对于多重窗体程序，需要

47、单独保存每个窗体（分数：2.00）A. B.C.D.解析：解析 Hide 方法只是使窗体隐藏，但仍在内存中，因此选项 A 错误。28.在窗体上放置一个命令按钮 Command1，并编写下列单击事件的程序：Option Base 1Private Sub Command1_ Click()Dim c As Integer，d As Integerd=0c=6X=Array(2,4,6,8,10,12)For i=1 To 6If X(i)c Thendd+X(i)cX(i)Elsed=d.CEnd IfNext iPrint dEnd Sub程序运行后，单击命令按钮，则在窗体上输出的结果是( )A10 B12 C16 D20（分数：2.00）A.B. C.D.解析：解析 程序首先使用 Array 函数为 X 数组变量赋值，然后利用 For 循环和 If 结构语句实现程序功能。程序执行过程如下：(1)当 i=1 时，x(i)=2，d=d-c=-6；(2)当 i=2 时，x(i)=4，d=d-c=-12；(3)当 i=3 时，x(i)=6，d=d-c=.18；(4)当 i=4 时，x(i)=8，d=d+x(i)=-10，c=8；(5)当 i=5 时，X(i)=1O，d=d+x(i)=o，c=10；(6)当 i=6 时，X(i)=12，