年国家二级计算机VB上级题库答案.doc

1上机题答案解析 第一套上机答案解析166 1小题 【审题分析】本题只需按题目要求画出含三个元素的按钮数组，并分别设置Caption属性。 【操作步骤】 步骤1：新建一个标准EXE工程，如表1在窗体中用复制和粘贴画出控件数组并设置属性。 表1 步骤2：按要求将文件保存至考生文件夹中。 【主要考点】控件数组画法。 第2小题 【知识点拔】形状控件(Shape)提供了显示一些规则图形的简易方法。通过设置形状控件Shape属性值，可显示6种图形：0－矩形、1－正方形、2－椭圆、3－圆、4－圆角矩形、5－圆角正方形。Width属性用于设置形状的宽度，当形状为圆时即为圆的直径。 【审题分析】要实现本题中的功能，应在正方形菜单项的Click事件过程中，令Sha1的Shape属性为1，在圆形菜单项的Click事件过程中，令Sha1的Shape属性为3。 【操作步骤】 步骤1：新建一个标准EXE工程，在窗体Form1中画一个名为Sha1的形状控件。 步骤2：选择【工具】→【菜单编辑器】命令，打开菜单设计器，如表2中的设置建立菜单项。 表2 步骤3：打开代码编辑窗口，编写菜单命令的单击事件过程。 参考代码： Private Sub Shape1_Click() Me.Sha1.Shape = 1 End Sub Private Sub Shape2_Click() Form1.Sha1 = 3 End Sub 4： 二、简单应用题 1小题 【知识点拔】①某容器(如窗体和框架)中的单选按钮(OptionButton)组常用于提供多个选项之间的唯一选择，其Value属性用于设置或返回每个单选按钮的选中状态：值为False时表示未被选中，值为True时表示被选中，其Caption属性来设置或返回单选按钮的标题内容。②分支控制结构是结构化程序设计的基本结构之一，它所要解决的是根据条件判断的结果决定程序执行的流向。选择控制结构就是其中一种，它是由两个分支构成的，就是说，条件要么是真，要么是假，没有其他的选择。在执行结构时按照所指定的条件进行判断并选择其中一组语句来执行。If语句就是一种选择控制结构，其一般语法为： If 条件Then 语句块A Else 语句块B End If 功能：，真，A部分，B部分。 【审题分析】根据题目要求，在本题的程序设计上，首先以Op1是否选中作为If…Then…Else语句的条件，由此分出两种情况：Op1被选中或Op2被选中。在条件为真(即Op1被选中)时文本框1中显示我是男生，否则显示我是女生；接下来分别判断两个复选框是否选中并相应在文本框2上显示内容。以上判断和显示操作均在C1的Click事件中完成。 【操作步骤】 步骤1：打开考生文件夹下的本题工程文件sjt3.vbp。 步骤2：在窗体Form1中加入两个单选按钮和两个复选框，分别设置它们的相关属性，属性及其值如表3所示。 表3 步骤3：打开代码编辑窗口输入如下代码： 参考代码： Private Sub C1_Click() Dim a As String a = If Op1.Value Then Text1.Text = a Op1.Caption Else Text1.Text = a Op2.Caption End If a = 我的爱好是 If Ch1.Value = 1 Then Text2.Text = a Ch1.Caption a = Text2.Text End If If Ch2.Value = 1 Then Text2.Text = a Ch2.Caption End If End Sub 步骤4：按F5键运行程序，先选中选中一个单选按钮和至少一个复选框，并单击确定按钮，然后单击窗体右上角的关闭按钮结束程序。 步骤5：按要求将文件保存至考生文件夹中。 第2小题 【审题分析】要实现本题中的功能，在窗体的Load事件过程中，令全局变量i的初值为0，然后设置计时器的Interval属性为1000并启用计时器；在计时器的Timer事件中把列表框的第i项显示在标签中，接下来令i+1，一旦i超过了3就将其重新置0以便实现循环显示。 【操作步骤】 步骤1：打开考生文件中的本题工程文件sjt4.vbp，通过属性窗口向列表框添加四个项目，分别是：第一项、第二项、第三项、第四项。 步骤2：在代码编辑窗口，去掉程序中的注释符，将问号?改为正确的内容。 参考代码： i = 0 Timer1.Interval = 1000 Label1.Caption = List1.List(i) 3：