首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)请在名称为Forml的窗体上添加一个名称为H1的水平滚动条,并在属性窗口中设置它的属性值,使其满足下列要求:它的最小刻度值为1,最大刻度值为100,在程序运行时,用鼠标单击滚动条上滚动框以外的区域(不包括两边按钮),滚动框移动10个刻度。再在滚动条下
(1)请在名称为Forml的窗体上添加一个名称为H1的水平滚动条,并在属性窗口中设置它的属性值,使其满足下列要求:它的最小刻度值为1,最大刻度值为100,在程序运行时,用鼠标单击滚动条上滚动框以外的区域(不包括两边按钮),滚动框移动10个刻度。再在滚动条下
admin
2019-06-24
21
问题
(1)请在名称为Forml的窗体上添加一个名称为H1的水平滚动条,并在属性窗口中设置它的属性值,使其满足下列要求:它的最小刻度值为1,最大刻度值为100,在程序运行时,用鼠标单击滚动条上滚动框以外的区域(不包括两边按钮),滚动框移动10个刻度。再在滚动条下面画两个名称分别为L1和L2的标签,并分别显示1和100,运行时的窗体如图所示。
注意:存盘时必须存放在考生文件夹下,工程文件名为sjt1.vbp,窗体文件名为sjt1.frm。
(2)在名称为Forml的窗体上添加两个名称分别为Text1和Text2的文本框,初始内容均为空;再建立一个下拉菜单,菜单标题为“操作”,名称为M1,此菜单下含有两个菜单项,名称分别为Copy和Clear,标题分别为“复制”、“清除”,请编写适当的事件过程,使得在程序运行时,单击“复制”选项菜单,则把 Text1中的内容复制到Text2中,单击“清除”选项菜单,则清除Text2中的内容(即在Text2中填入空字符串)。运行时的窗体如图所示。要求在程序中不得使用任何变量,每个事件过程中只能写一条语句。
注意:存盘时必须存放在考生文件夹下,工程文件名为sit2.vbp,窗体文件名为sjt2.frm。
选项
答案
(1)【操作步骤】 步骤1:打开Visual Basic开发环境,按照题目的要求新建窗体并添加一个水平滚动条控件,如图4.1所示。 [*] 步骤2:在属性窗口中,按照题目的要求设置水平滚动条的相关属性,如图4.2所示。 [*] 步骤3:按照题目的要求,在窗体上添加两个标签控件,如图4.3所示。 [*] 步骤4:按照题目的要求设置两个标签的相关属性,如图4.4所示。 [*] 程序中用到的控件及属性见表4.1。 [*] 步骤5:按下键盘上的F5键运行程序,程序运行后的窗体界面如图4.5所示。 [*] 步骤6:按题目要求保存工程和窗体,如图4.6所示。 [*] (2)【操作步骤】 步骤l:新建窗体,按表4.2建立菜单项并设置其属性,如图4.7所示。 [*] 步骤2:同步骤1,输入第3项的标题和名称,单击确定即可。 步骤3:添加文本框控件,按表4.3设置文本框的属性。 [*] 步骤4:打开代码编写窗口,编写程序代码,如图4.8所示。 [*] 参考答案 Private Sub Clear_Click() Text2.Text="" End Sub PriVate Sub Copy Click() Text2.Text =Text1.Text End Sub 步骤5:调试并运行程序,关闭程序后按题目要求存盘。
解析
(1)水平滚动条的最大刻度值和最小刻度值分别由Max和Min属性设置;单击滚动条上滚动框以外的区域移动刻度值大小由LargeChange属性设置,而单击滚动条两边按钮移动刻度大小由SmallChange属性设置,本题要求“单击滚动条上滚动框以外的区域移动刻度大小”,由Large-Change!属性设置;标签标题显示由Caption属性设置。
(2)在编辑窗体中单击鼠标右键选择“菜单编辑器”来创建菜单,在菜单的Click事件中,通过对’Fext2.‘text属性的设置来完成对内容的清除和复制。
转载请注明原文地址:https://jikaoti.com/ti/24N0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Form1的窗体上画一个名称为List1的列表框,在属性窗口中为列表框添加三个选项:北京、上海、天津。再建立一个下拉菜单,菜单标题为“文件”,名称为File,此菜
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Form1的窗体上建立一个名称为Command1的命令按钮数组,含三个命令按钮,它们的Index属性分别为0、1、2,标题依次为“是”、“否”、“取消”,每个按钮
编写如下程序:PrivateSubCommand1_Click()DimscoreAsIntegerscore=86Ifscore>85Thenr=1ElseIfscore>60
现有语句:y=IIf(x>0,xMod3,0)设x=10,则y的值是
编写如下程序:PrivateSubCommand1_Click()Dima(3,3)AsInteger,sAsIntegerFori=lTo3Forj=1To3a(i,j)=i*j+
设窗体上有一个名称为HSl的水平滚动条,如果执行了语句:HS1.Value=(HS1.Max-HS1.Min)/2+HS1.Min则:
设a=2,b=3,c=4,d=5,下列表达式的值是a>bAndcc
在软件开发中,需求分析阶段产生的主要文档是
随机试题
女,38岁,风湿性心脏病、二尖瓣狭窄并关闭不全。心悸、气短、下肢水肿。地高辛0.25mg/d,间断服氢氯噻嗪已2个月,心电图示室性期前收缩二联律。治疗上应采取的措施首选为
活动对人有何意义( )。
在Oyz正交坐标系中,设图形对y、z的惯性矩分别为Iy和Iz,则图形对坐标原点的极惯性矩为()。
下列不属于文明施工基本要求的是( )。
车辆技术改造的作用可以表现在()。
某公司专门从事劳务派遣业务。最近,该公司与某培训中心签订了一份劳务派遣协议,约定向其派遣20名教学辅助人员,分为两个周期,每个周期为1年,每个周期结束前订立新的劳务派遣协议。该公司根据这份协议。招收了20名被派遣劳动者,并与他们签订了劳动合同。可此时,因招
根据增值税法律制度的规定,服装厂发生的下列行为中,属于视同销售货物行为的有()。
以下关于减刑制度的说法,错误的是()。
作函数的图形.
It’sthefirstquestionparentsaskwhentheirchildisdiagnosedwithautism(自闭症).Willhisfuturebrothersorsistershavea
最新回复
(
0
)