首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在名称为Form1,标题为“滚动条属性设置”的窗体上画1个名称为VScrolll的垂直滚动条,设置属性,使得滚动块在最上面时,其位置值为10;滚动块在最下面时,其位置值为30;窗体刚显示时,滚动块处在中间位置,如图3.27所示。 (1)在名称
(1)在名称为Form1,标题为“滚动条属性设置”的窗体上画1个名称为VScrolll的垂直滚动条,设置属性,使得滚动块在最上面时,其位置值为10;滚动块在最下面时,其位置值为30;窗体刚显示时,滚动块处在中间位置,如图3.27所示。 (1)在名称
admin
2017-09-22
54
问题
(1)在名称为Form1,标题为“滚动条属性设置”的窗体上画1个名称为VScrolll的垂直滚动条,设置属性,使得滚动块在最上面时,其位置值为10;滚动块在最下面时,其位置值为30;窗体刚显示时,滚动块处在中间位置,如图3.27所示。
(1)在名称为Form1,标题为“滚动条属性设置”的窗体上画1个名称为VScrolll的垂直滚动条,设置属性,使得滚动块在最上面时,其位置值为10;滚动块在最下面时,其位置值为30;窗体刚显示时,滚动块处在中间位置,如图3.27所示。
注意:存盘时必须存放在考生文件夹下,工程文件名为sjtl.vbp,窗体文件名为sjtl.frm。
(2)在名称为Form1的窗体上,画1个名称为Label1的标签,其标题为“等级考试",显示为宋体10号字,且能根据标题内容自动调整标签的大小,并有凹陷效果,如图3-28所示。再画1个名称为Timerl的计时器控件,通过属性窗口设置有关属性,使其不可用,时间间隔为1秒。
要求:编写适当的事件过程,使得程序运行时,单击Label1标签,则每隔1秒,Label1中所显示的内容在原有基础上增大1个字号;单击窗体,Label1中的内容停止增大。
注意:要求程序中不得使用变量,事件过程中只能写一条语句。存盘时必须存放在考生文件夹下,工程文件名为sjt2.vbp,窗体文件名为sjt2.frm。
选项
答案
(1)步骤1:新建一个“标准EXE”工程,在窗体Form1中加入一个垂直滚动条。按表4.18设置其相关属性。 [*] 步骤2:按要求将文件保存至考生文件夹中。 (2)步骤1:新建一个“标准EXE”工程,在窗体Form1中加入一个标签和定时器。按表4.19设置其相关属性。 [*] 步骤2:在打开的代码编辑窗口中,编写标签、窗体的Click事件代码和定时器Timer事件代码。参考代码: Private Sub Form_Click() Timerl.Enabled=False End Sub Private Sub Label1_Click() Timerl.Enabled=True End Sub Private Sub Timerl_Timer() Label1.FontSize=Label1.ForltSize+1 End Sub 步骤3:按要求将文件保存至考生文件夹中。
解析
(1)根据题目要求,在窗体上添加一个垂直滚动条,并设置其属性。滚动条的Max属性、Min属性限定了滚动条所能表示的最大值和最小值,也是Value属性值的取值范围,在程序中改变Value属性的值,滚动条滑块会随之移动到相应位置。
设置滚动块位于滚动条的中间位置,即把Value属性设置为Min和Max平均值。
(2)根据题目要求在单击标签框的时候周期性地增大1个字号,需要在标签的Click事件代码里面使能定时器Timerl。在定时器的Timer事件代码里面将标签的FontSize增加1。早单击窗体时,停止增大,说明在窗体的Click事件代码里面禁用定时器Timerl。
转载请注明原文地址:https://www.kaotiyun.com/show/XjGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个名称为Text1的文体框,然后画一个名称为HScrolll的滚动条,其Min和Max属性分别为0和100。程序运行后,如果移动滚动框,则在文本框中显示滚动条的当前值,如图所示。以下能实现上述操作的程序段是
数据库系统的三级模式分别为【】模式、内部级模式与外部级模式。
在链表的运算过程中,能够使空表与非空表的运算统一的结构是______。
在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框,然后编写如下程序:PrivateSubCommand1_Click()Dimx,y,zAsIntegerx=5y=7
在下图中,要在窗体的标签Label1上显示“二级VB等级考试”字样,标签属性应设置为______。
若有一个动态数组a有两个元素a(0)和a(1),现要令数组a有三个元素a(0)、a(1)和a(2),则应当使用【】语句。
如果存在如下过程:PrivateFunctionFun(a()AsInteger)DimFirstAsInteger,LastAsInteger,iAsInteger First=LBound(a) La
一个工程中含有窗体Form1、Form2和标准模块Model1,如果在Form1中有语句PublicXAsInteger,在Model1中有语句PublicYAsInteger,则以下叙述中正确的是()。
随机试题
A.阴凉处贮存B.凉暗处贮存C.冷处贮存D.避光贮存E.室温贮存2~10℃的贮存方式为
男性,36岁。口内多处溃疡,疼痛不能进食;双颊及舌背粘膜,可见小米粒的溃疡十余个,散在分布,周围粘膜广泛充血红肿。以往曾有多次类似发作病史。该患者应诊断为
A.扑米酮B.苯妥英钠C.丙戊酸钠D.苯巴比妥E.乙琥胺
现场审核中需用到的审核工作文件主要包括:()、审核检查表、审核记录等。
位于浙江桐庐境内的垂云通天河,全长()公里。
斯巴达和雅典两种教育体系出现于欧洲的()。
否定之否定是指在事物的发展过程中,经过两次否定所达到的阶段,否定之否定阶段的特征是“重新达到了原来的出发点,但这是在更高阶段上达到的”。根据上述定义,以下关于否定之否定的说法错误的是:
培育和践行社会主义核心价值观的重要意义有()
"RisingSeaLevels"Sealevelmustbeexpressedasarangeofvaluesthatareunderconstantreassessment.Duringthelastce
Theauthorthinksthatthetrendtowardsarapidriseinconsumptionwas"undesirable"because______.Theword"registered"in
最新回复
(
0
)