首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有工程文件sj5.vbp及窗体文件sj5.frm,该程序是不完整的。窗体Form1中有一命令按钮与一个水平滚动条。命令按钮的名称为Commandl,标题为“移动”;水平滚动条的名称为HScroll1。单击“移动”按钮后,在弹出的对话框中输入数
在考生文件夹下有工程文件sj5.vbp及窗体文件sj5.frm,该程序是不完整的。窗体Form1中有一命令按钮与一个水平滚动条。命令按钮的名称为Commandl,标题为“移动”;水平滚动条的名称为HScroll1。单击“移动”按钮后,在弹出的对话框中输入数
admin
2009-03-26
42
问题
在考生文件夹下有工程文件sj5.vbp及窗体文件sj5.frm,该程序是不完整的。窗体Form1中有一命令按钮与一个水平滚动条。命令按钮的名称为Commandl,标题为“移动”;水平滚动条的名称为HScroll1。单击“移动”按钮后,在弹出的对话框中输入数值。输入一个整数后,单击“移动”,滚动条中的滚动块移动到指定的刻度,如果超过了滚动条的最大刻度,则不移动,并且在窗体上显示“输入的数值太大”,如果超过了滚动条的最小刻度,则不移动,并且在窗体上显示“输入的数值太小”,如图1—5所示。
注意:请在有“?”的地方填入正确内容,然后删除“?”及代码前的所有注释符(即“’”号),但不能修改其他部分。存盘时不得改变文件名和文件夹。
选项
答案
本题主要考查滚动条的属性和IF语句的使用。 滚动条常用于取代数据的键盘输入,通过调整滚动条滑块的位置即可改变其Value属性的值。滚动条的Max属性、Min属性限定了滚动条所能表示的最大值和最小值,即Value属性值的取值范围,在程序中改变Value属性的值,滚动条滑块会随之移动到相应位置。 InputBox()函数用于显示一个输入框,提示用户输入一个数据,该函数返回值默认为字符串类型。在代码窗口编写如下代码: Private Sub Command1_Click() Dim a As Integer a=Val(InputBox("请输入数值")) ’通过输入对话框输入数值 If a>HScrolll.Max Then’如果数值大于滚动条的最大值 Cls Print"输入的数值太大" ’在窗件上显示“输人的数值太大” ElseIf a
Value=a ’如果在范围内,则将滚动条移动指定的距离 End If End Sub 单击[*]按钮运行程序,并按要求保存。
解析
转载请注明原文地址:https://kaotiyun.com/show/KV1p777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
J2SDK的基本命令中用于Java类文件归档的是【】。
下列安全控制命令中,属于现实证书缓存区和密钥表项命令的是()。
设有如下程序:publicclassSun{publicstaticvoidmain(Stringargs[]){intx,y;x=(int)Math.sqrt
能够支持javadoc命令的注释语句是()。
数据库设计的根本目标是要解决()。
执行下面的程序段后,x的值为()。publicclassSun{publicstaticvoidmain(Stringargs[]){intx=5;for(int
执行下列程序时,会产生什么异常publicclassTest{publicstaticvoidmain(Stringargs[]{intd=101;intb=220;longa=
下列关于类、包和源文件的描述中,不正确的一项是()
变量属性是描述变量的作用域,按作用域分类,变量有局部变量、类变量、方法参数和【】。
使得线程放弃当前分得的CPU时间,但不使线程阻塞,即线程仍处于可执行状态,随时可能再次分得CPU时间的方法是【】。
随机试题
真菌性角膜溃疡可见角膜基质炎可见
A.具有大学本科以上学历和良好的职业品德B.具有较高学术水平和丰富的实践经验、技术专长和良好的职业品德C.从事中医药专业工作20年以上并担任高级专业职务10年以上D.受聘于医疗卫生机构从事中医药工作,担任高级专业技术职务E.具有中级以上专业技术职务
同病异治的实质是()。
演奏交响音乐的乐队称为()。
在教师指导下,学习者接受事物意义的学习称为()
政府为公众服务的服务性特点,首先表现在()。
甲、乙二人在400米的环形跑道上练习跑步,甲出发1分钟后乙同向出发,乙出发3分钟后第一次追上甲,又过了10分钟,乙第二次追上甲。此时,乙比甲多跑了300米,则甲、乙的出发点在跑道上相距多远?
根据所给资料,回答下列问题。2015年上半年,A市新设内资企业20518户,注册资本(金)1651.8亿元,同比分别增长39.7%和133%。其中私营企业20187户,注册资本(金)1258.76亿元,同比分别增长30.4%和224%。
Hewas____________knowingeverythingaboutthecourseshewastotakeattheuniversity.
IndustrialproductionmanagerscoordinatetheresourcesandactivitiesrequiredtoproducemillionsofgoodseveryyearintheU
最新回复
(
0
)