首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在名称为Form1的窗体上,画1个名称为Label1、标题为“程序设计”的标签,大小可根据标题内容自动调整,该标签的字体为“宋体10号字”。再画1个名称为HScroll1的水平滚动条,其表示的最小值和最大值分别为10和50。如图所示。 要求:编写
在名称为Form1的窗体上,画1个名称为Label1、标题为“程序设计”的标签,大小可根据标题内容自动调整,该标签的字体为“宋体10号字”。再画1个名称为HScroll1的水平滚动条,其表示的最小值和最大值分别为10和50。如图所示。 要求:编写
admin
2019-08-21
88
问题
在名称为Form1的窗体上,画1个名称为Label1、标题为“程序设计”的标签,大小可根据标题内容自动调整,该标签的字体为“宋体10号字”。再画1个名称为HScroll1的水平滚动条,其表示的最小值和最大值分别为10和50。如图所示。
要求:编写适当的事件过程,通过单击滚动箭头改变滚动框位置,从而改变Label1的字体大小,使它保持与滚动条的取值一致。
存盘时,将文件保存至考生文件夹下,工程文件名为Sjt2.vbp,窗体文件名为sjt2.frm。
注意:要求程序中不得使用变量,每个事件过程中只能写一条语句。
选项
答案
步骤1:新建一个窗体,在窗体上添加一个Label控件,按照表3设置该控件的相关属性。 [*] 步骤2:向窗体中添加一个Hscroll控件,按照表4设置控件的相关属性。 [*] 步骤3:双击Hscrolll控件,打开代码编辑窗口,在代码编辑窗口指定位置编写以下代码(阴影部分是需要填入的内容)。 Private Sub HScroll 1_Change() Label1.FrontSize=HScroll1.Value End Sub 步骤4:调试并运行程序,关闭程序后按题目要求存盘。
解析
新建一个Form1窗体,在窗体中添加一个Label标签控件,设置Caption属性为“程序设汁”,AutoSize属性为True,字体为“宋体10号字”,再添加一个HScrol控件,设置Max属性值为50,Min属性值为10,并为Hscroll控件的Change事件添加代码。
转载请注明原文地址:https://kaotiyun.com/show/JOUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设有如下通用过程:PublicFunctionFun(xStrAsString)AsStringDimtStrAsString,strLAsIntegertStr="":strL=Len(xStr)i=strL/2
有如下程序:PrivateSubForm_Click()DimiAsInteger,nAsIntegerFori=1To20i=i+4:n=n+iIfi>10ThenExitForNext
软件按功能可以分为应用软件、系统软件和支撑软件(或工具软件)。下面属于应用软件的是()。
设x为一整型变量,且情况语句的开始为:SelectCasex,则不符合语法规则的Case子句是()。
以下说法中正确的是()。
有三个关系R、S和T如下:由关系R和S通过运算得到关系T,则所使用的运算为()。
某系统结构图如下图所示该系统结构图的宽度是()。
表达式Abs(-5)+Len("ABCDE")的值是()。
以下说法中正确的是
随机试题
董事、监事、高级管理人员违反忠实义务和勤勉义务,损害公司利益,()可以书面请求监事会或不设监事会的有限责任公司的监事向人民法院提起诉讼。
在Excel2013中,每个工作簿默认含有1个工作表,该工作表由1048576行和16384列组成。()
2010年10月19日,我国发布了《可扩展商业报告语言(XBRL)技术规范系列国家标准和通用分类标准》。下列财务管理环境中,随之得到改善的是()。
西南矿业公司产出的矿产原材料金属含量比较高,是富矿,在市场上的售价比其他矿高。目前冶炼产品的市场竞争激烈,从经济效益的角度来看,对自己的矿进行进一步冶炼再出售不合算,所以西部矿业决定停止加工冶炼业务,直接出售自己的矿,以获取更大的利润。这反映的风险管理工具
【2014四川泸州】将猫、狗、鼠概括为“动物”,属于()。
跨国公司在全球寻找最优区位,最终目的是()。
“意识在任何时候都只能是被意识到了的存在。而人们的存在就是他们的实际生活过程”。这说明
UnderitsCharter,thefirststatedaimoftheU.N.wasWhendidtheU.N.comeintoexistence?
Peoplecancleanthingswithit.Youcancookyourmealsthere.
Labelthemapbelow.Writethecorrectletter,A-H,nexttoquestions15-20.restaurant______
最新回复
(
0
)