2012年计算机二级VB第九套上机试题与解析.docVIP

更多试题请访问 HYPERLINK 下载 1. 基本操作（2小题，每小题15分，共计30分） 　　注意：下面出现的“考生文件夹”均为%USER% 　　********************************************************************** 　　请根据以下各小题的要求设计Visual Basic应用程序（包括界面和代码）。 　　（1）在名称为Form1 的窗体上画两个命令按钮，其名称分别为Command1和Command2，标题分别为“扩大”和“移动”。如图所示，编写适当的事件过程。程序运行后，如果单击Command1命令按钮，则使窗体在高、宽方向上各增加0.2倍（变为原来的1.2倍）；如果单击Command2命令按钮，则使窗体向右移动200，向下移动100。 　　要求： 　　程序中不得使用变量。 　　存盘时必须存放在考生文件夹下，工程文件名为sjt1.vbp，窗体文件名为sjt1.frm。 　　解题思路： 　　启动Visual Basic系统，创建一个Form1窗体。 　　该窗体上画二个命令按钮控件，通过其属性窗口将名称分别设为Command1、Command2，标题（Caption属性）分别设为“扩大”和“移动”。 　　单击“扩大”按钮（即运行Click事件过程），在该Click事件过程中加入语句： 　　Private Sub Command1_Click() 　　Height = 1.2 * Height 　　Width = Width * 1.2 　　End Sub 　　单击“移动”按钮（即运行Click事件过程），在该Click事件过程中加入语句： 　　Private Sub Command2_Click() 　　Left = 200 + Left 　　Top = Top + 100 　　End Sub 　　参考文件：c:\wexamhlpsys\参考答案\sjt1.vbp、sjt1.frm、sjt1.vbw 　　请把这些文件复制到c:\wexam，然后打开sjt1.vbp文件并运行。 　　********************************************************************** 　　（2）在名称为 Form1的窗体上画一个标签，其名称为Label1，标题为“计算机等级考试”，Left属性为0； 再画一个水平滚动条，其名称为HScroll1，在属性窗口中设置其属性如下： 　　Min 0 　　Max 3000 　　SmallChange 10 　　LargeChange 100 　　编写适当的事件过程。程序运行后，如果移动滚动条上的滚动框，则可使标签向相应的方向移动，标签距窗体左边框的距离等于滚动框的位置，程序的运行情况如图所示。 　　要求： 　　程序中不得使用变量，每个事件过程中只能写一条语句。 　　注意： 　　存盘时必须存放在考生文件夹下，工程文件名为sjt2.vbp，窗体文件名为sjt2.frm。 　　解题思路： 　　启动Visual Basic系统，创建一个Form1窗体。 　　在该窗体上画一个标签控件，通过其属性窗口将名称设为Label1，标题（Caption属性）设为“计算机等级考试”，Left属性设为0。画一个水平滚动条控件，通过其属性窗口将名称设为HScroll1，Min属性设为0，Max属性设为3000，SmallChange属性设为10，LargeChange属性设为100。 　　移动滚动条上的滚动框（即运行Scroll事件过程），在该Scroll事件过程中加入语句： 　　Private Sub HScroll1_Scroll() 　　Label1.Left = Form1.HScroll1 　　End Sub 　　单击滚动条上的方向按钮（即运行Click事件过程）也能实现题目所要求的功能，在该Click事件过程中加入语句： 　　Private Sub HScroll1_Change() 　　Label1.Left = Me.HScroll1 　　End Sub 　　参考文件：c:\wexamhlpsys\参考答案\sjt2.vbp、sjt2.frm、sjt2.vbw 　　请把这些文件复制到c:\wexam，然后打开sjt2.vbp文件并运行。 2. 简单应用（2小题，每题20分，计40分） 　　注意：下面出现的“考生文件夹”均为%USER% 　　***************************************