首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在考生文件夹下有工程文件sj3.vbp及窗体文件sj3.frm,该程序是不完整的。本程序只有一个窗体,当把鼠标光标移到窗体上时,每双击一次鼠标,就变换一种鼠标光标的形状,依次显示鼠标光标的15种属性。程序运行后的窗体如图59—4所示。 注意:
(1)在考生文件夹下有工程文件sj3.vbp及窗体文件sj3.frm,该程序是不完整的。本程序只有一个窗体,当把鼠标光标移到窗体上时,每双击一次鼠标,就变换一种鼠标光标的形状,依次显示鼠标光标的15种属性。程序运行后的窗体如图59—4所示。 注意:
admin
2009-03-26
4
问题
(1)在考生文件夹下有工程文件sj3.vbp及窗体文件sj3.frm,该程序是不完整的。本程序只有一个窗体,当把鼠标光标移到窗体上时,每双击一次鼠标,就变换一种鼠标光标的形状,依次显示鼠标光标的15种属性。程序运行后的窗体如图59—4所示。
注意:请在有“?”的地方填入正确内容,然后删除“?”及代码前的所有注释符(即“’”号),但不能修改其他部分。存盘时不得改变文件名和文件夹。
(2)在考生文件夹下有工程文件sj4.vbp,窗体文件sj.frm,该程序是不完整的。在窗体上已经域出一个图像框,名称为Imagel;一个水平滚动条,名称为HScroll1。要求考生不改动Imagel的Height与width属性。当运行程序时,图像框中加载考生文件夹下的图片test.bmp。滚动水平滚动条中的滚动块时,图片会随着滚动条的滚动进度逐渐显露出来,如图59—5所示。
注意:请在有“?”的地方填入正确内容,然后删除“?”及代码前的所有注释符(即“’”号),但不能修改其他部分。修改后的工程及窗体文件,均以原名保存在考生文件夹下。
选项
答案
(1)本题主要考查考生对鼠标的MousePointer属性的掌握情况。 MousePointer属性用于设置鼠标经过某对象时光标的形状类型,既可以在属性窗口设置,也可以通过代码设置。IVLousePointer属性值可以是0~15之间的任一整数,不同的值代表不同的形状。MousePointer属性值通过代码设置的一般格式为:对象名.MousePointer=n(n为0~15间的整数)。 根据题意,将两个标签添加到窗体中,名称分别为Labell和Label2、Caption属性分别为“当前鼠标形状为:”和“1”,并设置MousePointer属性为1。双击Forml进入代码窗口,补充后的具体代码如下: Private Sub Form_DblClick() If Me.
MousePointer
<15 Then Me.
MousePointer
=Me.
MousePointer
+1 ’双击后鼠标的形状属性加l Else Me.
MousePointer
=1 ’当鼠标的形状属性大于15,则变回1 End If Label2.
Caption
=Me.
MousePointer
’在label2上显示鼠标当前属性 End Sub 单击[*]按钮运行程序,并按要求保存。 (2)窗体加载时触发Form_Load事件。滚动条的事件主要有Scroll和Change事件。当在滚动条内拖动滑块时触发Scroll事件(单击滚动箭头或滚动条时不发生Scroll事件),而改变滑块的位置后会触发Change事件。Scroll事件用于跟踪滚动条中的动态变化,Change事件则用来得到滚动条最后的值。加载图片可以在属性窗口的Picture属性中设置,也可以在代码中通过LoadPicture(“图像文件路径”)图片加载函数加入图片。 根据题意,将一个水平滚动条控件和一个图像控件添加到窗体中,水平滚动条的名称为HScrolll、Min属性为400、Max属性为2 295,Image的名称为Imagel,并在其Picture属性中加载考生文件夹下的“test.bmp”图片。双击HScrolll进入代码 窗口,编写如下代码: Private Sub Form_Load() Imagel.
Width
=HScrolll.
Value
’初始化,显示大小为水平滚动条的当前值 End Sub Private Sub HScrolll_Change() Imagel.
Width
=HScrolll.
Value
’图像显示的大小是由水平滚动条决定的 End Sub 单击[*]按钮运行程序,并按要求保存。
解析
转载请注明原文地址:https://jikaoti.com/ti/tLq0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列关于Applet的叙述中,错误的是()。
在传递给实现了java.awt.event.MouseMotionListener接口的类中,mouseDragged()方法的事件对象是【】类。
结构化程序设计所规定的3种基本控制结构是循环结构、选择结构和【】。
和AWT有关的所有事件类都是从类()派生而来。
当检索一个压缩文件时,首先要建立压缩文件输入流对象,该对象()
软件设计模块化的目的是【】。
按运算符操作数的数目划分,运算符?:的类型是()。
若有以下定义inta[]={1,2,3,4,5,6,7};charc1=’b’,c2=’2’;则数值不为2的表达式是()。
赋值表达式是由位于赋值运算符左边的变量和右边的【】组成。
下列属于正则表达式的是()。
随机试题
无因管理是指未受委托,并无法定或约定义务而为他人管理事务。根据上述定义,下列不属于无因管理的是()。
A.10例B.30例C.100例D.300例E.500例Ⅰ期临床试验受试者数()。
下列属于个人所得税应税所得项目的是()。
资产负债比例管理的基本原则是()。
以下四川的自然保护区中,没有被列入联合国《人与生物圈保护网络》的一项是()。
给定资料1.2016年2月19日,党的新闻舆论工作座谈会在北京召开。习近平总书记主持并发表重要讲话,“做好党的新闻舆论工作,事关旗帜和道路,事关贯彻落实党的理论和路线方针政策,事关顺利推进党和国家各项事业,事关全党全国各族人民凝聚力和向心力,事关
第一次世界大战中规模最大的日德兰海战发生于()
Peekthroughtheinspectionwindowsofthenearly100three-dimensional(3D)printersquietlymakingthingsatRedEye,acompany
Tomcouldhardly_____hisexcitementasheknewthathehadmadearealdiscovery.
A、Byplane.B、Bycar.C、Bytrain.D、Bybus.D听者应该关注女士“but”后面的话。该女士认为坐汽车比自己开车或坐飞机更划算,故选D。
最新回复
(
0
)