首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在名称为Form1的窗体上添加一个文本框(名称为Text1)和一个水平滚动条(名称为HScroll1),如图1所示。在属性窗口中对滚动设置如下属性: 编写适当的事件过程。程序运行后,通过改变滚动条上的刻度值,则可扩大或缩小文本框的高度,并使得文本
在名称为Form1的窗体上添加一个文本框(名称为Text1)和一个水平滚动条(名称为HScroll1),如图1所示。在属性窗口中对滚动设置如下属性: 编写适当的事件过程。程序运行后,通过改变滚动条上的刻度值,则可扩大或缩小文本框的高度,并使得文本
admin
2016-06-30
41
问题
在名称为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全国计算机二级
相关试题推荐
在运行阶段,要在文本框Text1获得焦点时选中文本框中所有内容,对应的事件过程是()
程序测试分为静态分析和动态测试。其中______是指不执行程序,而只是对程序文本进行检查,通过阅读和讨论,分析和发现程序中的错误。
设已打开5个文件,文件号分别为1,2,3,4,5。要关闭所有文件,以下语句正确的是
下面程序运行结果是()。PrivateSubForm_Click() DimxAsSingle,yAsSingle x=InputBox("请输入数据25"):y=InputBox("请输入数据10")
在VisualBasic工程中,可以作为“启动对象”的程序是()。
有时候需要暂时关闭计时器,这可以通过______属性来实现。
窗体的对象名用______表示。
设A="123456",则表达式Val(Left(A,4)+Mid(A,4,2))的值为
按“先进后出”原则组织数据的数据结构是______。
下图中,图1、图2是应用程序的部分界面。运行程序首先出现图1的对话框,要求用户输入口令,输入完毕后单击“确定”按钮。如果输入的口令正确,则显示图2的界面。如果输入的门令错误,则出现图3的信息框。单击图1中的“取消”按钮,则结束程序。PrivateSub
随机试题
以下关于出版物发行商流、物流、信息流和资金流之间关系的说法,不正确的是()。
根据米曼氏方程改写成双倒数方程作图,纵轴表示
下列关于审判监督程序特点的说法正确的是:()
王某住在山区,当地野狼危害庄稼的情况严重。听说邻县使用“智能防盗系统”,效果很好,就买回一台。王某安装好防盗系统,并在野狼可能出没的山上拉上裸电线,距地面40厘米。在裸线通过的路口上均设置了警告牌,并告知通电的时间为:晚7点开电,早6点收电。村民李某盗伐林
关于质量体系审核,下列说法正确的是()。
关于原始分数,下列说法正确的有()
Inrecentdecades,scientistshavebecomeincreasinglyawareoftheparttheobserver【C1】______inthescientificprocess.Inthe
もし操作の仕方()正しければ、機械は動きます。
HenryJameswasregardedasoneofthepioneersof
A、Throughawidevarietyofhigh-frequencysounds.B、Throughawidevarietyoflow-frequencysounds.C、Throughtheirvariedswim
最新回复
(
0
)