首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在考生文件夹下有一个工程文件sjt3.vbp,其窗体中有一个红色方框和一个计时器控件。程序运行时每隔0.5秒,方框的颜色交替变为黄色和红色(黄色值为&HFFFF&;红色值为&HFF&);若单击鼠标右键,则停止变色;若单击鼠标左键,则方框左上角移到鼠标
(1)在考生文件夹下有一个工程文件sjt3.vbp,其窗体中有一个红色方框和一个计时器控件。程序运行时每隔0.5秒,方框的颜色交替变为黄色和红色(黄色值为&HFFFF&;红色值为&HFF&);若单击鼠标右键,则停止变色;若单击鼠标左键,则方框左上角移到鼠标
admin
2016-12-29
27
问题
(1)在考生文件夹下有一个工程文件sjt3.vbp,其窗体中有一个红色方框和一个计时器控件。程序运行时每隔0.5秒,方框的颜色交替变为黄色和红色(黄色值为&HFFFF&;红色值为&HFF&);若单击鼠标右键,则停止变色;若单击鼠标左键,则方框左上角移到鼠标点击的位置处(如图2-45所示)。请将事件过程中的注释符去掉,把?改为正确的内容,以实现上述程序功能。
注意:考生不得修改窗体文件中已经存在的控件和程序,最后将程序按原文件名存盘。
(2)在考生文件夹下有一个工程文件sjt4.vbp,其窗口上有2个名称分别为Commandl和Command2,标题分别为“开始查找”和“重新输入”的命令按钮;有2个名称分别为Text1和Text2、初始值均为空的文本框。
1)在Text1文本框中输入仅含字母和空格(空格用于分隔不同的单词)的字符串后,单击“开始查找”按钮,则可以将输入字符串中最长的单词显示在Text2文本框中,如图2-46所示;
2)单击“重新输入”按钮,则清除Text1和Text2中的内容,并将焦点设置在Text1文本框中,为下一次输入做好准备。请将“开始查找”命令按钮Click事件过程中的注释符去掉,把?改为正确内容,以实现上述程序功能。
注意:考生不得修改窗体文件中已经存在的控件和程序。最后,程序按原文件名存盘。
选项
答案
第1小题 【知识点拨】鼠标事件分点击事件和状态事件:点击事件有单击(Click)和双击(DblCliek),不区分左键、右键;状态事件有按下(MouseDown)、移动(MouseMove)和弹起(MouseUp),能够区分出鼠标的左键、有键和中间键。按下鼠标键事件过程的一般格式为: Private Sub Form_MouseDown(Button As Integer, Shift As Integer,X As Single,Y As Single) End Sub 其中各参数的含义:Button表示被按下的鼠标键,可以取3个值,1为左键、2为右键、4为中间键:ShiR表示Shift键、Ctrl键和Alt键的状态,ShiR键为1、Ctrl键为2、Alt键为4;X,Y表示鼠标光标的当前位置。 【操作步骤】 步骤1:打开考生文件下的本题工程文件sjt3.vbp,在代码编辑窗口中,_去掉程序中的注释符“”’,将问号“?”改为正确的内容。 参考代码: Timerl.Interval=500 Shapel.Left=X Shapel.Top=Y Timerl.Enabled=False If Shapel.BackColor=vbRed Then 步骤2:按要求将文件保存至考生文件夹中。 第2小题 【操作步骤】 步骤1:打开考生文件下的本题工程文件sjt4.vbp,在代码编辑窗口中,去掉程序中的注释符“”’,将问号“?”改为正确的内容。 参考代码: word—s=S S=Mid(s,m+1) If n
解析
转载请注明原文地址:https://kaotiyun.com/show/G9Gp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
以下程序的功能是从随机产生的20个20~200(含20和200)的整数中,找出能够同时被3和5整除的数的最大值,并显示出来,请填空。OptionBaselPrivateSubCommandlClick()Dima(2
窗体上有一个名称为Picturel的图片框控件,一个名称为Timerl的计时器控件,其Interval属性值为1000。要求每隔5秒钟图片框右移100。现编写程序如下:PrivateSubTimerlTimer()Static
窗体上有一个名称为Commandl的命令按钮,并有如下程序:PrivateSubCommandlClick()x=15DoWhilex2>0x=x-3x=IIf(Int(x/5)=x/5,X+2,
窗体上有一个名称为Labell的标签和一个名称为Commandl的命令按钮。命令按钮的单击事件过程如下:PrivateSubCommandlClick()x=InputBox("输入x:":..0)y=InputBox(
为了实现鼠标自动拖放,必须把_______________属性设置为_______________;而为了执行手动拖放,必须把该属性设置为_______________。
用下面的语句所定义的数组的元素个数是:______。Dimarr(3To5,-2to2)
改变驱动器列表框的Drive属性值将激活______事件。
下列程序代码实现生成20个0~100之间的随机整数,存于数组中,打印数组中大于50的数,并求这些数的和。请选择正确的程序段(),完成程序。PrivateSubCommandlClick()Dimarr(1To20)
在用Open语句打开文件时,如果省略“For方式”,则打开的文件的存在方式是______。
能够将Picture对象Pic1加载当前目录中的face.bmp的语句是
随机试题
大革命失败后,中国共产党确定武装推翻国民党统治的总方针制订于()。
X线管具有高度的真空,能够
止带方适用于带下病的哪种证候()
党参来源于
根据我国宪法和法律,下列行为中构成违宪的有哪些?()
属于矿井工业广场主要安全、环保设施的建(构)筑物有()。
某县公安局在处理一起故意伤害案中,对张某作出拘留10天的行政处罚决定。张某不服,向上一级公安机关市公安局提起行政复议。市公安局经过审查认为,县公安局对张某的处罚偏重,作出变更拘留5天的处罚决定。张某仍然不服,向法院提起行政诉讼。本案应以谁为被告?为什么
下列叙述中错误的是
Lifelearning(sometimescalledun-schoolingorself-directedlearning)isoneofthoseconceptsthatarealmosteasiertoexplain
Goodcommunicationskillsand______inatleastoneofficesoftwareprogramarerequiredfortheexecutiveassistantposition.
最新回复
(
0
)