首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在名称为Form1的窗体上画一个垂直滚动条和一个命令按钮,其名称分别为VScroll1和Command1,编写适当的事件过程。程序运行后,如果单击命令按钮,则按如下要求设置垂直滚动条的属性: Max=窗体高度 Min=0 Large
在名称为Form1的窗体上画一个垂直滚动条和一个命令按钮,其名称分别为VScroll1和Command1,编写适当的事件过程。程序运行后,如果单击命令按钮,则按如下要求设置垂直滚动条的属性: Max=窗体高度 Min=0 Large
admin
2016-06-30
83
问题
在名称为Form1的窗体上画一个垂直滚动条和一个命令按钮,其名称分别为VScroll1和Command1,编写适当的事件过程。程序运行后,如果单击命令按钮,则按如下要求设置垂直滚动条的属性:
Max=窗体高度
Min=0
LargeChange=50
SmallChange=10
如果移动垂直滚动条的滚动框,则在窗体上显示滚动框的刻度值。
程序的运行情况如图所示。
要求:不得使用任何变量。
注意:存盘时必须存放在考生文件夹下,工程文件名保存为sjt2.vbp,窗体文件名保存为sjt2.frm。
选项
答案
步骤1:建立界面,并设置控件的属性。程序中用到的控件及属性见表3。 [*] 步骤2:编写程序代码。 Private Sub Commandl_Click() VScroll1.Max=Form1.Height VScroll1.Min=0 VScroll1.LargeChange=50 VScroll1.SmallChange=10 End Sub Private Sub VScroll1_Change() Print VScroll1.Value End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
根据题意,在命令按钮的单击事件过程中用代码动态设置垂直滚动条的属性,并且在垂直滚动条的Change事件过程中,用Print方法将垂直滚动条滑块位置的Value属性值输出到窗体上。
转载请注明原文地址:https://kaotiyun.com/show/ZeLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
随机文件以______为单位读写。
若要清除列表框的所有内容,则实现的方法是()。
下面程序段的运行结果是()。PrivateSubForm_Click() ForI=3to1step-1 PrintSpc(10-I); Forj=1to2*I-1 print"*
在窗体上画一个名称为Command1的命令按钮,编写如下程序:PrivateSubCommand1_Click()Printp1(3,7)EndSubPublicFunctionp1(xAsSingle,n
单击命令按钮时,下列程序段的执行结果为()。PublicSubProcl(nAsInteger,ByValmAsInteger) n=nMod10 m=m\10EndSubPrivate
下面关于VisualBasic6.0工具栏的说法不正确的是()。
下列说法正确的是
以下关于选项按钮的说法,正确的是()。
将E-R图转换到关系模式时,实体与联系都可以表示成()。
在考生文件夹下有一个工程文件sjt5.vbp,其功能是:①单击“读数据”按钮,则把考生文件夹下in5.dat文件中的100个0~999之间的整数读入数组a中;②单击“计算”按钮,则对这100个整数中的所有水仙花数(当一个数的值等于该数中各位数字的立方和
随机试题
下列药品需要用专柜由专人负责储存的是()。
有关系统性红斑狼疮皮肤病变错误的是
中度路基构造物损坏应为勾缝损坏、沉降缝损坏、表面破损、钢筋外露和锈蚀等,每10m计1处,不足10m按1处计算。()
勘测定界工作前期的准备工作不包括()。
在采用获利指数法进行互斥方案的选择时,正确的选择原则是选择获利指数最大的方案。( )
泰山摩崖石刻居各名山之最,是中国书法艺术品的一座宝库。()
根据以下文字资料,回答问题。2007年,全国研究与试验发展(R&D)经费总支出为3710.2亿元,增长23.5%,研究与试验发展(R&D)经费投入强度(与国内生产总值之比)为1.49%。按研究与试验发展人员(全时工作量)计算的人均经费支出为21.4万元,
假设消费者收入增加25%,会导致某种商品的需求量增加10%,则该商品的类型为()。
在下列关于PCI局部总线的叙述中,哪个是错误的?
Crimehasitsowncycles,amagazinere-portedsomeyearsbefore.Policerecordsthat【M1】______.werestudiedforfiveyearso
最新回复
(
0
)