首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在名称为Form1的窗体上添加一个文本框(名称为Text1)和一个水平滚动条(名称为HScroll1),如图1所示。在属性窗口中对滚动设置如下属性: 编写适当的事件过程。程序运行后,通过改变滚动条上的刻度值,则可扩大或缩小文本框的高度,并使得文本
在名称为Form1的窗体上添加一个文本框(名称为Text1)和一个水平滚动条(名称为HScroll1),如图1所示。在属性窗口中对滚动设置如下属性: 编写适当的事件过程。程序运行后,通过改变滚动条上的刻度值,则可扩大或缩小文本框的高度,并使得文本
admin
2016-06-30
68
问题
在名称为Form1的窗体上添加一个文本框(名称为Text1)和一个水平滚动条(名称为HScroll1),如图1所示。在属性窗口中对滚动设置如下属性:
编写适当的事件过程。程序运行后,通过改变滚动条上的刻度值,则可扩大或缩小文本框的高度,并使得文本框的宽度始终是其高度的1.2倍。程序运行后的窗体如图2所示。要求程序中不得使用任何变量。
注意:存盘时必须存放在考生文件夹下,工程文件名保存为sjt2.vbp,窗体文件名保存为sjt2.frm。
选项
答案
步骤1:建立界面,并设置控件的属性。程序中用到的控件及属性见表3。 [*] 步骤2:编写程序代码。 Private Sub HScrolll_Change() Text1.Height=HScroll1.Value Text1.Width=1.2*Text1.Height End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
通过调整滚动条滑块的位置即可改变其Value属性的值,滚动条的Max和Min属性为滚动条所能表示的最大值和最小值,LargeChange属性用于设置当单击滑块与两侧箭头间区域时Value属性值的改变量,SmalIChange属性用于设置当单击滚动条两侧箭头时Value属性值的改变量。当改变滚动条滑块位置后将触发其Change事件。
文本框的高度和宽度分别由其Height属性值和Width属性值设定。
转载请注明原文地址:https://kaotiyun.com/show/dqLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体模块的通用声明段中声明变量时,不能使用()关键字。
若要求在菜单中包含分隔条,则设计时,在菜单的标题属性中应设置为______。
在Selectcase结构中,使用“To表达式”来指定一个范围时,必须把______的值写在前面。
在树形结构中,树根结点没有______。
要使菜单项MenuOne在程序运行时失效,使用的语句是
如果在C盘当前文件下已存在名称为studata.dat的顺序文件,那么执行语句Open"c:studata.dat"ForAppendAs#1之后,将
在窗体上用复制、粘贴的方法建立了一个命令按钮数组,数组名为M1。设窗体Form1标题为“myform1”,双击控件数组中的第3个按钮,打开代码编辑器,写下如下代码:PrivaeSubM1_Click(IndexAsInteger)F
下列关于线性链表的描述中,正确的是()。I、只含有一个指针域来存放下一个元素地址Ⅱ、指针域中的指针用于指向该结点的前一个或后一个结点(即前件或后件)Ⅲ、结点由两部分组成:数据域和指针域。
一棵二叉树的前序遍历结果是ABCEDF,中序遍历结果是CBAEDF,则其后序遍历的结果是()。
随机试题
慢性支气管炎大叶性肺炎
患者身体浮肿,腰以下甚,畏寒肢冷,腰膝酸冷,纳差便稀,舌淡胖,苔白滑,脉沉无力,宜诊为()
杭州公司可采取的救济手段包括()。如果本案通过仲裁程序处理,杭州公司申请仲裁委员会对香港公司的财产采取保全措施,仲裁委员会应当将杭州公司的申请提交(),由后者采取财产保全措施。
两根矩形截面悬臂梁,弹性模量均为E,横截面尺寸如图所示,两梁的载荷均为作用存自由端的集中力偶。已知两梁的最大挠度相同,则集中力偶Me2是Me1的:(悬臂梁受自由端集中力偶M作用,自由端挠度:ML2/2EI)
《节能建筑评价标准》规定,节能建筑评价应涵盖的阶段是()。
材料:随着高考竞争的日益激烈,高考焦虑的学生也呈现出逐年增多的趋势。王某是某市重点中学高三年级的一名学生,近段时间以来一直情绪低落。每天在家闷闷不乐,不愿与人交流,睡眠不好,饭量减少,萎靡不振,上课时注意力难以集中。尽管每天学习时间很长,但学习效
袁老师中途接手小学三年级(3)班的班主任,有几个学生经常缺交数学作业,经过了解,发现只要题目难一点或计算量大一点,这几个同学就不能按时完成作业。不仅如此,在各项活动中也有一些同学叫苦叫累。如果你是班主任的话,可在全班进行()。
事后检验的方法有哪些?
一个字长为8位的无符号二进制整数能表示的十进制数值范围是()。
Lookatthetenstatementsforthispart.Youwillhearapassageabout"AResearchonSleep".Youwilllistentoittwice.
最新回复
(
0
)