题目:
(1)在名称为Forml的窗体上添加一个名称为H1水平滚动条,,请在属性窗口中设置它的属性值,满足下列要求:它的最小刻度值为1,最大刻度值为100,在程序运行时鼠标单击滚动条上滚动框以外的区域(不包括两边按钮),滚动框移动10个刻度。再在滚动条下面画两个名称分别为L1、L2的标签,并分别显示1、100,运行时的窗体如图所示。
注意:存盘时必须存放在考生文件夹下,工程文件名为sjt1.vbp,体文件名为
sjt1.frm.
(2) 在名称为Form1的窗体上添加两个名称分别为Text1和Text2的文本框,初始内容均为空;再建立一个下拉菜单,菜单标题为”操作”,名称为M1,此菜单下含有两个菜单项,,名称分别为Copy和Clear,标题分别为”复制”、”清除”,请编写适当的事件过程,使得在程序运行时,单击”复制”选项菜单,则把Text1中的内容复制到Text2中,单击”清除”选项菜单,则清除Text2中的内容(即在Text2中填入空字符串)。运行时的窗体如图所示。要求在程序中不得使用任何变量,每个事件过程中只能写一条语句。
注意:存盘时必须存放在考生文件夹下,工程文件名为sjt2.vbp,窗体文件名为
sjt2.frm.
解析:
(1)【解题思路】水平滚动条的最大刻度值和最小刻度值分别由Max和Min属性设置;单击滚动条上滚动框以外的区域移动刻度值大小由LargeChange属性设置,而单击滚动条两边按钮移动刻度大小由
SmallChange属性设置,本题要求”单击滚动条上滚动框以外的区域移动刻度大小”则由LargeChange属性设置;标签标题显示由Caption属性设置。
【操作步骤】
步骤1:打开VisualBasic,按照题目的要求新建窗体并添加一个水平滚动条控件。步骤2:在属性窗口中,设置水平滚动条的名称为H1,然后设置其LargeChange的值为10,Max的值为100,Min的值为1。
步骤3:再在窗体上水平滚动条的左右两端的下方添加两个标签控件Label1和Label2.
步骤4:在属性窗口中将Label1的名称设置为L1,将Caption属性设置为1;再将Label1的名称设置为L2,,将Caption属性设置为100.程序中用到的控件及属性见表3.1。
表3.1
步骤5:按下键盘上的F5键运行程序。
步骤6:保存工程,设置工程文件名为
sjt1.vbp,设置窗体文件名为sjt1.frm。
【举一反三】可以通过第40套第一大题的第二小题来进行同类知识点的练习。
(2)【解题思路】在编辑窗体中单击右键选择”菜单编辑器”来创建菜单,在菜单的
Click事件中,通过对Text2.Text属性的设置来完成对于内容的清除和复制。
【操作步骤】
步骤1:新建窗体,按表3.2建立菜单项并设置其属性。
表3.2
步骤2:菜单项设置完成后,单击”确定”按钮。
步骤3:添加文本框控件,按照表3.3设置文本框的属性。
表3.3
控件文本框1文本框2
R I Name Name
设置值Text1Text2
步骤4:编写程序代码。
参考答案
Private Sub Clear_Click()
Text2.Text = IIII
End Sub
Private Sub Copy_Click()
Text2.Text = Text1.Text
End Sub
步骤5:调试并运行程序,关闭程序后按题目要求存盘。
【举一反三】可以通过第32套第一大题的第一小题来进行同类知识点练习。