首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在名称为Form1,标题为“滚动条属性设置”的窗体上画1个名称为VScrolll的垂直滚动条,设置属性,使得滚动块在最上面时,其位置值为10;滚动块在最下面时,其位置值为30;窗体刚显示时,滚动块处在中间位置,如图3.27所示。 (1)在名称
(1)在名称为Form1,标题为“滚动条属性设置”的窗体上画1个名称为VScrolll的垂直滚动条,设置属性,使得滚动块在最上面时,其位置值为10;滚动块在最下面时,其位置值为30;窗体刚显示时,滚动块处在中间位置,如图3.27所示。 (1)在名称
admin
2017-09-22
55
问题
(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://kaotiyun.com/show/XjGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个名称为Text1的文体框,然后画一个名称为HScrolll的滚动条,其Min和Max属性分别为0和100。程序运行后,如果移动滚动框,则在文本框中显示滚动条的当前值,如图所示。以下能实现上述操作的程序段是
下面的程序执行时,将把当前目录下的顺序文件smtext1.txt的内容读入内存,并在文本框Text1中显示出来。请填空。PrivateSubCommandl_Click()DiminDataAsString
下列程序运行后的输出结果是【】。PrivateSubf(k,s)s=1Forj=1Toks=s*jNextEndSubPrivateSubCommand1_Click()Sum=0Fori=1
阅读下列程序: PrivateSubCommand1_Click() DimiAsInteger,kAsInteger k=2 Fori=1To3 PrintH(k); Nexti EndSub Fu
在窗体上有一个命令按钮,然后编写如下事件过程 PrivateSubCommand1_cickc() a=InputBox("enterthefirstinteger") b=InputBox("enterthesecon
一个工程中含有窗体Form1、Form2和标准模块Model1,如果在Fomil中有语句PublicXAsInteger,在Model1中有语句PublicYAsInteger.则以下叙述中正确的是
以下程序计算自然数e的值,要求精确到1015,阅读下列程序。已知e的计算公式为:e=1+1/1!+1/2!+…+1/n!。请在【】和【】处填上正确内容。PrivateSubCommandl_Click()【】n=0:term
下面程序运行后,输出的结果是如下矩阵:471058116912请在程序[]处填入正确的内容。
如果准备读文件,打开顺序文件“text.dat”的正确语句是
决定一个窗体有无控制菜单的属性是______。
随机试题
某县扶贫办副主任甲,利用职务将一项造价20万的扶贫工程定价40万,对外招标。甲冒用A公司的营业执照、安全许可证等证明材料,参与该项目招标,又通过职权运作使“A公司”中标。之后,甲以“A公司”的名义将工程交给村民乙承建,并在工程完工验收后,利用职权将40万元
《孔雀东南飞》首句“孔雀东南飞,五里一徘徊”使用的修辞手法是()
导痰汤是由二陈汤加哪些药物组成
背景材料:A工程公司将某厂房制作安装栈桥的任务分包给B专业承包公司(包工、包料)。B专业承包公司用塔式起重机将重约3t的斜梁吊装找正后,用电焊将斜梁与栈桥点焊固定在一起。根据以往的经验,电焊工认为可以摘钩了,但摘钩时斜梁倾翻,2名作业人员从6m高处坠落,
发生额试算平衡,是指某某一个账户借方发生额等于贷方发生额。( )
有限责任公司清算,其清算组应当自成立之日起()内通知债权人,并于()内在报纸上公告
部分行业企业被曝光严惩后仍难改变环保现状,究竟是什么原因,这需要具体问题具体分析,也需要“_____________”。但必须指出的是,仅靠环保部公开曝光排污企业是远远不够的,必须要根据法律法规从严从重处罚。只有对每一起违法个案从重处罚,被罚企业才能不再犯
Between1852,when【C1】______wasfirstestablishedthatMountEverestwasthehighestmountainonearth,and1953,whenEdmundHi
Formany,thepursuitofhappinessisalsothepursuitofprosperity.PartoftheAmericandreamistheabilitytoprovide【M1】__
Withthousandsofyearsofhistoryandmythology【C1】______Athens--named【C2】______theolive-tree-lovingAthena(goddessofwi
最新回复
(
0
)