计算机等级考试第一套题答案.doc

计算机等级考试第一套题答案 基础操作 (1)【解题思路】水平滚动条的最大刻度值和最小刻度值分别由Max和Min属性设置；单击滚动条上滚动框以外的区域移动刻度值大小由LargeChange属性设置，而单击滚动条两边按钮移动刻度大小由SmallChange属性设置，本题要求单击滚动条上滚动框以外的区域移动刻度大小则由LargeChange属性设置；标签标题显示由Caption属性设置。 【操作步骤】 步骤1：打开Visual Basic，按照题目的要求新建窗体并添加一个水平滚动条控件。 步骤2：在属性窗口中，设置水平滚动条的名称为H1,然后设置其LargeChange的值为10，Max的值为100，Min的值为1。 步骤3：再在窗体上水平滚动条的左右两端的下方添加两个标签控件Label1和Label2。 步骤4：在属性窗口中将Label1的名称设置为L1，将Caption属性设置为1;再将Label1的名称设置为L2，将Caption属性设置为100.程序中用到的控件及属性见表3.1。 表3.1 控件 滚动条 标签1 标签2 属性 Name Min Max Large-Change Name Caption Name Caption 设置值 H1 1 100 10 L1 1 L2 100 步骤5：按下键盘上的F5键运行程序。 步骤6：保存工程，设置工程文件名为sjt1.vbp,设置窗体文件名为sjt1.frm。 (2)【解题思路】在编辑窗体中单击右键选择菜单编辑器来创建菜单，在菜单的Click事件中，通过对Text2.Text属性的设置来完成对于内容的清除和复制。 【操作步骤】 步骤1：新建窗体，按表3.2建立菜单项并设置其属性。 表3.2 标题 操作 复制 清除 名称 M1 Copy Clear 内缩符号 0 1 1 步骤2：菜单项设置完成后，单击确定按钮。 步骤3：添加文本框控件，按照表3.3设置文本框的属性。 表3.3 控　件 文本框1 文本框2 属　性 Name Name 设置值 Text1 Text2 步骤4：编写程序代码。 参考答案 Private Sub Clear_Click() Text2.Text = End Sub Private Sub Copy_Click() Text2.Text = Text1.Text End Sub 步骤5：调试并运行程序，关闭程序后按题目要求存盘。 简单应用 (3)【解题思路】通过文本框的Name属性设置文本框名称；在窗体上添加单选按钮，通过Name属性设置名称，右击单选按钮进行复制，弹出对话框，选择创建单选按钮数组，并通过Caption属性设置每一个单选按钮的标题；通过命令按钮Name和Caption属性分别设置命令按钮的名称和标签；设置两个字符型变量a、b ，a ＝ 我坐，b ＝ 我开，用于Select Case选择语句的字符串连接；通过对单选按钮数组Index属性查询，实现单击单选按钮完成字符串连接和文本框显示操作的功能。 【操作步骤】 步骤1：打开本题工程文件，在窗体中添加一个单选按钮数组，包含3个单选按钮。再添加一个文本框。 步骤2：按照题目要求设置控件的属性，见表3.4。 表3.4 控件 单选按钮1 单选按钮2 单选按钮3 文本框 属性 Caption Index Caption Index Caption Index Name 设置值 飞机 0 火车 1 火车 2 Text1 步骤3：分析并编写程序代码。　 Private Sub Op1 Click(Index As Integer) Dim a As String, b As String, c As String a = 我坐 b = 我开 Select Case ? Case 0 Text1.Text = a ＋ Me.Op1(0)．Caption ＋ 去 Case 1 Text1.Text = ? ＋ Me.Op1(1)．Caption ＋ 去 Case 2 Text1.Text = b ＋ Me.Op1(2)．Caption ＋ 去 End Sel