2012年计算机二级VB上机试题及解题思路第45套

　　1. 基本操作(2小题，每小题15分，共计30分)

　　注意：下面出现的“考生文件夹”均为%USER%

　　请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。

　　(1)在名称为Form1的窗体上画一个名称为Frame1、标题为“框架”的框架，在框架内添加两个名称分别为Option1、Option2 的单选按钮，其标题分别为“第一项”、“第二项” 。要求通过设置控件的属性将“第二项”设置为被选中，框架为不可用。运行程序后的窗体如图所示。

　　注意：

　　存盘时必须存放在考生文件夹下，工程文件名为sjt1.vbp，窗体文件名为sjt1.frm。

　　解题思路：

　　启动Visual Basic系统，创建一个Form1窗体。

　　在该窗体上画一个框架控件，通过其属性窗口将名称设为Frame1，标题(Caption属性)设为“框架”，Enabled属性设为False。在F1框架中画二个单选按钮控件，通过其属性窗口将名称分别设为Option1、Option2，标题(Caption属性)分别设为“第一项”、“第二项”，“第二项”的Value属性设为True。

　　参考文件：c:\wexam\26990001\hlpsys\参考答案\sjt1.vbp、sjt1.frm、sjt1.vbw

　　请把这些文件复制到c:\wexam\26990001中，然后打开sjt1.vbp文件并运行。

　　(2)在名称为Form1的窗体上画一个名称为Drive1的驱动器列表框，一个名称为Dir1的目录列表框，一个名称为File1的文件列表框，名称为Label1、标题为“文件名”的标签和名称为Label2、BorderStyle为 1的标签。窗体的标题设置为“文件系统控件”，如图所示。 请编写适当的程序，使得这三个文件系统控件可以同步变化， 即当驱动器列表框中显示的内容发生变化时，目录列表框和文件列表框中显示的内容同时发生变化。 单击文件列表框时，将选中的文件名显示在Label2中。

　　注意：

　　要求程序中不得使用变量，事件过程中只能写一条语句。

　　存盘时必须存放在考生文件夹下，工程文件名为sjt2.vbp，窗体文件名为sjt2.frm。

　　解题思路：

　　启动Visual Basic系统，创建一个Form1窗体。

　　在该窗体上画一个驱动器列表框控件，通过其属性窗口将名称设为Drive1。画一个目录列表框控件，通过其属性窗口将名称设为Dir1。画一个文件列表框控件，通过其属性窗口将名称设为File1。画一个标签控件，通过其属性窗口将名称设为Label1，标题(Caption属性)设为“文件名”。画一个标签控件，通过其属性窗口将名称设为Label2，BorderStyle属性设为1。激活Form1窗体，通过其属性窗口将标题(Caption属性)设为“文件系统控件”。

　　当目录列表框的内容发生变化时(即运行Change事件过程)，在该Change事件过程中加入语句：

　　Private Sub Dir1_Change()

　　Form1.File1.Path = Form1.Dir1

　　End Sub

　　当驱动器列表框的内容发生变化时(即运行Change事件过程)，在该Change事件过程中加入语句：

　　Private Sub Drive1_Change()

　　Dir1 = Drive1

　　End Sub

　　单击文件列表框(即运行Click事件过程)，在该Click事件过程中加入语句：

　　Private Sub File1_Click()

　　Label2 = File1.FileName

　　End Sub

　　参考文件：c:\wexam\26990001\hlpsys\参考答案\sjt2.vbp、sjt2.frm

　　请把这些文件复制到c:\wexam\26990001中，然后打开sjt2.vbp文件并运行。

　　相关推荐：

　　2012年计算机等考四级数据库工程师备考笔记汇总

　　2012年计算机等级考试二级VB重点知识汇总

　　2012年下半年计算机等级考试报名时间及入口汇总