首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在考生文件夹下有一个工程文件sjt3.vbp,其窗体中有一个红色方框和一个计时器控件。程序运行时每隔0.5秒,方框的颜色交替变为黄色和红色(黄色值为&HFFFF&;红色值为&HFF&);若单击鼠标右键,则停止变色;若单击鼠标左键,则方框左上角移到鼠标
(1)在考生文件夹下有一个工程文件sjt3.vbp,其窗体中有一个红色方框和一个计时器控件。程序运行时每隔0.5秒,方框的颜色交替变为黄色和红色(黄色值为&HFFFF&;红色值为&HFF&);若单击鼠标右键,则停止变色;若单击鼠标左键,则方框左上角移到鼠标
admin
2019-06-11
66
问题
(1)在考生文件夹下有一个工程文件sjt3.vbp,其窗体中有一个红色方框和一个计时器控件。程序运行时每隔0.5秒,方框的颜色交替变为黄色和红色(黄色值为&HFFFF&;红色值为&HFF&);若单击鼠标右键,则停止变色;若单击鼠标左键,则方框左上角移到鼠标点击的位置处(如图3—53所示)。请将事件过程中的注释符去掉,把“?”改为正确的内容,以实现上述程序功能。
注意:考生不得修改窗体文件中已经存在的控件和程序,最后将程序按原文件名存盘。
(2)在考生文件夹下有一个工程文件sjt4.vbp,其窗口上有2个名称分别为Command1和Command2,标题分别为“开始查找”和“重新输入”的命令按钮;有2个名称分别为Text1和Text2、初始值均为空的文本框。
1)在Text1文本框中输入仅含字母和空格(空格用于分隔不同的单词)的字符串后,单击“开始查找”按钮,则可以将输入字符串中最长的单词显示在Text2文本框中,如图3—54所示。
2)单击“重新输入”按钮,则清除Text1和Text2中的内容,并将焦点设置在Text1文本框中,为下一次输入做好准备。请将“开始查找”命令按钮Click事件过程中的注释符去掉,把“?”改为正确内容,以实现上述程序功能。
注意:考生不得修改窗体文件中已经存在的控件和程序。最后,程序按原文件名存盘。
选项
答案
第1小题 步骤1:打开考生文件下的本题工程文件sjt3.vbp,在代码编辑窗口中,去掉程序中的注释符“’”,将问号“?”改为正确的内容。 参考代码: Timer1.Interval=500 Shape1.Left=X Shape1.Top=Y Timer1.Enabled=False If Shape1.BackColor=vbRed Then 步骤2:按要求将文件保存至考生文件夹中。 第2小题 步骤1:打开考生文件下的本题工程文件sjt4.vbp,在代码编辑窗口中,去掉程序中的注释符“’”,将问号“?”改为正确的内容。 参考代码: word_s=s s=Mid(s,m+1) If n<Len(word_s)Then Text2.Text=Word_max 步骤2:按要求将文件保存在考生文件夹中。
解析
第1小题鼠标事件分点击事件和状态事件:点击事件有单击(Click)和双击(DblClick),不区分左键、右键:状态事件有按下(MouseDown)、移动(MouseMove)和弹起(MouseUp),能够区分出鼠标的左键、右键和中间键。按下鼠标键事件过程的一般格式为:
Private Sub Form_MouseDown(Buaon As Integer,Shift As Integer,X As Single,Y As Single)
End Sub
其中各参数的含义:Button表示被按下的鼠标键,可以取3个值,1为左键、2为右键、4为中间键;Shift表示Shift键、Ctrl键和Alt键的状态,Shift键为1、Ctrl键为2、Alt键为4;X,Y表示鼠标光标的当前位置。本题在计时器的Timer事件过程中,完成方框的颜色交替,因此在Timer事件中应该是一个选择语句,如果颜色为红色(vbred),将其设置为黄色,否则设置为红色。由于要求0.5秒交替显示一次,因此计时器的Interval属性应该设置为500。
在窗体的MouseDown事件中,首先要判断按下的是鼠标的哪个键,如果是左键,则令形状的Left和Top属性分别为鼠标事件的参数X和Y;如果是右键,则令计时器停止工作。
第2小题:本题源程序在“开始查找”按钮的Click事件过程中,先检验文本框Text1(已赋值给变量s)中是否读入数据,并用InStr函数检查空格的位置,以空格为单词分隔依据找出每个单词。每找到一个单词,就将该单词使用Left函数在s中分离出来,然后将s中的这个单词去掉,判断单词的长度并且和预存的最长单词长度相比较,若其比最长单词还长,则这个单词的长度成为新的最长单词长度,这个单浏成为新的最长单词。循环结束后即可得出最长的单词。
转载请注明原文地址:https://www.kaotiyun.com/show/C8Up777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
某人编写了下面的程序,希望能把Textl文本框中的内容写到out.txt文件中PPrivateSubCommand1_Click()Open"out.txt"ForOutputAs#2Print"Text1"Close#2EndSub
在下列模式中,能够给出数据库物理存储结构与物理存取方法的是
下面叙述中错误的是
有下面程序代码:PrivateSubCommand1_Click()DimaAsStringa="COMPUTER"n=search(a,"T"):PrintIIf(n=0,"未找到",n)EndSubPrivateFunctio
输入VB源程序时,若一个命令行中包含两个语句,则两个语句之间的分隔符应使用
在窗体上画一文本框,其名称为Text1,为了在程序运行后隐藏该文本框,应使用的语句为
似定有如下的程序段:DimintVarAsIntegerintvar=TruePrintintVar则输出结果是
下面不属于软件工程过程的4种基本活动
()控件可以使图形根据控件大小而改变大小。
设循环队列的存储空间为Q(1:50),初始状态为front=rear=50。现经过一系列入队与退队操作后,front=rear=1,此后又正常地插入了两个元素。最后该队列中的元素个数为()。
随机试题
在Excel2000单元格输入的过程中,出现错误“#VAIME!”,该错误的含义是______。
耳部CT扫描的适应证不包括
观察人体对于新药的耐受程度和药代动力学,为制定给药方案提供依据是初步评价药物对目标适应症患者的治疗作用和安全性的是
通过实测水文水质资料建立河流稳态水质数学模型后,预测排污对菏流水质的影响需要确定()。
事件,是指不以民事法律关系主体的主观意志为转移的一种客观事实。下列属于社会事件的是()。
下列属于措施项目费中的安全文明施工费的是()
工程量清单计价由()编制。
银行业金融机构在反洗钱方面应承担的义务是()。
因签订集体合同发生争议,双方当事人不能自行协商解决的,()认为必要时可视情况进行协调处理。
用人单位安排()就业的比例不得低于本单位在职职工总数的1.5%。[2009年真题]
最新回复
(
0
)