首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在名称为Form1的窗体上画一个垂直滚动条和一个命令按钮,其名称分别为VScroll1和Command1,编写适当的事件过程。程序运行后,如果单击命令按钮,则按如下要求设置垂直滚动条的属性: Max=窗体高度 Min=0 Large
在名称为Form1的窗体上画一个垂直滚动条和一个命令按钮,其名称分别为VScroll1和Command1,编写适当的事件过程。程序运行后,如果单击命令按钮,则按如下要求设置垂直滚动条的属性: Max=窗体高度 Min=0 Large
admin
2016-06-30
87
问题
在名称为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全国计算机二级
相关试题推荐
在窗体上建立通用对话框需要添加的控件是()。
下列程序的执行结果为()。n=0j=1DoUntiln>2 n=n+1 j=j+n*(n+1)LoopPrintn;j
数据库设计分为以下6个设计阶段:需求分析阶段、______、逻辑设计阶段、物理设计阶段、实施阶段及数据库运行和维护阶段。
有一个事件过程,其功能是:从已存在于磁盘上的顺序文件NM1.txt中读取数据,计算读出数据的平方值,将该数据及其平方值存入新的顺序文件NM2.txt中。请填空。PrivateSubForm_Click()DimxAsSingle,
当文本框ScrollBars属性设置了非零值,却没有效果,原因是
阅读下列程序:PrivateSubCommand1_Click()DimiAsInteger,kAsInteger k=2 Fori=1To3 PrintFun(k); Ne
在窗体上画一个文本框,名称为Text1,画一个命令按钮,名称为Command1。程序运行时,单击命令按钮,能将事先输入到文本框中的内容一个字符一个字符地写入顺序文件test.dat中。请在空格处填上适当的内容,将程序补充完整。PrivateSub
设有如下程序:PrivateSubCommand1_Click() DimcAsInteger,dAsInteger c=4 d=InputBox("请输入一个整数") DoWhiled>0
要求产生10个随机整数,存放在数组arr中。从键盘输入要删除的数组元素的下标,将该元素中的数据删除,后面元素中的数据依次前移,并显示删除后剩余的数据。现有如下程序:OptionBase1PrivateSubC
将E-R图转换到关系模式时,实体与联系都可以表示成()。
随机试题
下列选项中,属于社会公德内容的有
Thereisonethingthateveryonewantsmorethananythingelse.Somepeopletrytogetitbymakingmoney.Theythinkthatwhen
秦先生,高血压病,近期血压波动较大,为该病人测量血压时应做到
关于慢性胃炎的叙述,正确的是()。
根据《公司登记管理条例》的规定,自治区、直辖市工商行政管理局负责本辖区内()的登记。
大宇电子有限公司为一般纳税人,增值税率17%。2007年因生产经营所需要,于年初开始自营建造厂房一幢,发生如下业务,要求:根据以下业务编制会计分录。4月30日经查明原因,定额内损耗3000.00元,不可抗力发生意外损耗11000.00元,仓库保管员玩
中国近代葡萄酒酿造业始于()。
某市工商局春节期间出台叫停“禁止自带酒水”等六项措施,引起了中国烹饪协会高调反弹,工商部门作出解释声明:这是对于不规范行为的合法做法。此事件引起社会极大反响,并持续发酵!请问你怎么看?
人民检察院决定逮捕犯罪嫌疑人、被告人的,由人民检察院执行。()
下列可以激活属性窗口的操作是()。
最新回复
(
0
)