首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
有一个工程文件ylc6.vbp,它的功能是在文本框中输入一个整数,单击“移动”按钮后,如果输入的是正数,滚动条中的滚动框向右移动与该数相等的刻度,但如果超过了滚动条的最大刻度,则不移动,并且显示“文本框中的数值太大”;如果输入的是负数,则滚动框向左移动与该
有一个工程文件ylc6.vbp,它的功能是在文本框中输入一个整数,单击“移动”按钮后,如果输入的是正数,滚动条中的滚动框向右移动与该数相等的刻度,但如果超过了滚动条的最大刻度,则不移动,并且显示“文本框中的数值太大”;如果输入的是负数,则滚动框向左移动与该
admin
2009-03-17
75
问题
有一个工程文件ylc6.vbp,它的功能是在文本框中输入一个整数,单击“移动”按钮后,如果输入的是正数,滚动条中的滚动框向右移动与该数相等的刻度,但如果超过了滚动条的最大刻度,则不移动,并且显示“文本框中的数值太大”;如果输入的是负数,则滚动框向左移动与该数相等的刻度,但如果超过了滚动条的最小刻度,则不移动,并且显示“文本框中的数值太小”,如图18所示。
题目中提供的“移动”按钮控件Command1的Click事件的源代码如下:
Private Sub Command1_Click()
Dim nCount As Integer
nCount=CInt(Text1.Text)
If(nCount>=?)Then
HScrolll.Value=HScrolll.Max
?
Else
If (nCount<=HScrolll.Min) Then
?=HScrolll.Min
MsgBox("文本框中的数字太小")
Else
HScrolll.Value=?
End If
End If
End Sub
注意:不能修改程序中的其他部分,不能修改控件的属性,最后把修改后的程序以原来的文件名存盘。存盘时必须存放在考生文件夹下。
选项
答案
操作步骤 (1)在Visual Basic集成环境中选择“文件”→“打开工程”命令,在对话框中选择 ylc6.vbp工程文件,单击“确定”按钮打开。 (2)选择工具箱中的TextBox控件,在窗口上拖动,创建该控件命名为Text1,设置属性为空。 (3)选择工具箱中的CommandButton控件,在窗口中拖动并画出该控件。在属性编辑框命名为Command1,标题设置为“移动”。 (4)选择工具箱中的HScrollBar控件,在窗口上拖动创建该控件,命名为HScrolll,在属性窗口根据题目的要求设置Value属性值为0。 (5)题目要求在移动到最左或最右边时,停止移动并显示提示信息。因此,在属性中设置它的最大最小值,即设置Max属性为256,设置Min属性的值为-256。 2.行为编码 Cormnand1的Click事件,代码如下: Private Sub Command1_Click() Dim nCount As Integer nCount=CInt(Text1. Text) ’当前值与最大值比较 If (nCount>=HScrolll.Max) Then HScrolll.Value=HScrolll.Max ’信息提示框提示 MsgBox("文本框中的数字太大") Else ’当前值与最小值比较 If (nCount<=HScrolll.Min) Then HScrolll.Value=HScrelll.Min ’信息提示框提示 MsgBox("文本框中的数字太小") Else ’把当前值赋给滚动条 HScrolll.Value=nCount End If End If End Sub 3.存盘保存 执行“文件”→“保存工程”命令,工程文件名为ylc6.vbp,窗体文件名为ylc6.frm。
解析
(1)本题考查考生对HScrollBar相关属性的设置,包括对HScrollBar控件的最大、最小值的设置,滚动设置,以及判断语句的运用和实现显示用户提示信息。
(2)注意HScrollBar控件的最大、最小值设置,滚动条的值设置,CommandButton控件的Click事件处理的功能。
(3)在每次单击“移动”按钮后,将文本框中的数值与HScrollBar的Max属性值和Min属性值进行比较。若超出HScrollBar的值域范围则弹出太大或太小提示信息,否则移动滚动条。
转载请注明原文地址:https://kaotiyun.com/show/ak1p777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列程序的执行结果是()。publicclassTest{publicstaticvoidmain(Stringargs[]){bytey=4;long
下列哪一项不是J2ME中的Profile所定义的内容?()
下列命令中用于为远程对象生成stub和skeleton的是()。
下列关于异常类型的说明中错误的是()。
类中限定为()的成员变量和成员方法可以被除了不同包中的非子类访问。
下列各项中代表单精度浮点数的是()。
下列各项中不是JDBCAPI向JDBCDriverManager发出请求的内容的是()。
如果抛出异常,则应用语句()。
在深度为5的满二叉树中,叶子结点的个数为()。
在深度为7的满二叉树中,非叶子结点的个数为()。
随机试题
较为保守的财务经理通常喜欢使用的营运资本筹资决策是__________。
抢救时做好记录,其中时间记录包括和到达时间、及();记录执行医嘱的内容及病情的动态变化。
法洛四联症最早且主要的表现是
对于喷管气体流动,在马赫数M>1的情况下,气流速度随断面增大变化情况为()。
银行业金融机构的经营行为若不能严格地遵守规则.势必会导致其承担过高的风险,危及其稳健运行。()
关于仲裁程序的说法,正确的是()。
营养教育是通过改变人们()而达到改善营养状况的一种有目的、有计划的活动
电视剧分类,按题材样式分,可分为()、神话故事题材电视剧、家庭题材电视剧、()、少数民族题材电视剧。
某项目采购人员接到一个紧急采购任务后启动了询价流程。关于询价,下面说法不正确的是____________。
下列哪个样式能够显示这样一个边框:上边框10像素、下边框5像素、左边框20像素、右边框1像素?()
最新回复
(
0
)