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

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

　　（1）在名称为Form1的窗体上画一个名称为H1的水平滚动条，请在属性窗口中设置它的属性值，满足以下要求：它的最大刻度值为100，最小刻度值为1， 在运行时鼠标单击滚动条上滚动框以外的区域（不包括两边按钮），滚动框移动10个刻度。再在滚动条下面画两个名称分别为L1、L2的标签，并分别显示1、100 ，运行时的窗体如图所示。

　　*注意：

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

　　解题思路：

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

　　在该窗体上画一个水平滚动条控件，通过其属性窗口将名称设为H1，Min属性设为1，Max属性设为100，LargeChang属性设为10。画二个标签控件，通过其属性窗口将名称分别设为L1、L2，标题（Caption属性）分别设为1、100。

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

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

　　（2）在名称为Form1 的窗体上画两个文本框，名称分别为Text1和Text2，均无初始内容；再建立一个下拉菜单，菜单标题为“操作”，名称为M1，此菜单下含有两个菜单项，名称分别为Copy 和Clear，标题分别为“复制”、“清除”，请编写适当的事件过程，使得在运行时，单击“复制”菜单项，则把Text1中的内容复制到Text2中，单击“清除”菜单项，则清除Text2中的内容（即在Text2中填入空字符串）。运行时的窗体如图所示。要求在程序中不得使用任何变量，每个事件过程中只能写一条语句。

　　*注意：

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

　　解题思路：

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

　　在该窗体上画二个文本框控件，通过其属性窗口将名称分别设为Text1、Text2，文本内容（Text属性）均设为空。通过菜单编辑器建立一个主菜单，在菜单编辑器的标题处输入“操作”，名称处输入M1，在该菜单下有二个子菜单，在菜单编辑器的标题处分别输入“复制”、“清除”，名称处分别输入Copy和Clear。

　　单击“操作”菜单中的“复制”命令（即运行Click事件过程），在该Click事件过程中加入语句：

　　Private Sub copy_Click()

　　Text2 = Text1

　　End Sub

　　单击“操作”菜单中的“清除”命令（即运行Click事件过程），在该Click事件过程中加入语句：

　　Private Sub clear_Click()

　　Text2 = ""

　　End Sub

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

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