首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在考生文件夹下有一个工程文件sjt3.vbp。程序的功能是: 1)程序运行时,文件列表框显示当前文件夹中的所有扩展名为.jpg的文件。 2)双击文件列表框中某个图片文件名时,能在图像框中显示出该张图片,并将该图片文件的信息(包括路径及
(1)在考生文件夹下有一个工程文件sjt3.vbp。程序的功能是: 1)程序运行时,文件列表框显示当前文件夹中的所有扩展名为.jpg的文件。 2)双击文件列表框中某个图片文件名时,能在图像框中显示出该张图片,并将该图片文件的信息(包括路径及
admin
2017-09-22
40
问题
(1)在考生文件夹下有一个工程文件sjt3.vbp。程序的功能是:
1)程序运行时,文件列表框显示当前文件夹中的所有扩展名为.jpg的文件。
2)双击文件列表框中某个图片文件名时,能在图像框中显示出该张图片,并将该图片文件的信息(包括路径及文件名)显示到标签中,如图3-42所示。
3)“下一张"命令按钮的功能:选中并显示上次选中文件的下一个图片文件(如果文件列表框中没有被选中的图片文件或上次选中的是最后一个文件名,则从第1个图片文件始)。
在当前程序所在文件夹中,已经提供了所需要的图片文件,运行时窗体如图所示。
在给出的窗体文件中已经有了全部控件,但程序不完整。请将事件过程中的注释符去掉,把“?”改为正确的内容,以实现上述程序功能。
注意:考生不得修改窗体文件中已经存在的控件和程序,最后将程序按原文件名存盘。
(2)在考生文件夹下有一个工程文件sjt4.vbp。程序的功能是:程序运行时,文本框中显示一篇英文短文,单击“查找”按钮时可输入查找内容,如图3-43所示。
若未找到查找内容,查找结束;若找到查找-内容,被找到的内容在文本框中以反相显示(即呈选中状态),每找到一次都给出提示,并在左下角文本框中显示累计的次数,如图3 44所示,若单击提示对话框的“是”按钮,则继续向后查找;若单击“否”按钮,则终止查找。在给出的窗体文件中已经有了全部控件,但程序不完整。请将事件过程中的注释符去掉,把“?”改为正确的内容,以实现上述程序功能。
注意:考生不得修改窗体文件中已经存在的控件和程序,最后将程序按原文件名存盘。
选项
答案
(1)步骤1:打开考生文件夹中的本题工程文件sjt3.vbp,在代码编辑窗口中,去掉程序中的注释符“’”,将问号“?”改为正确的内容。参考代码: If Filel.ListIndex =-1 Or Filel.ListIndex=Filel.ListCount-1 Then Filel.ListIndex=Filel.ListIndex+1 Label1.Caption=App.Path + "\" + Filel.FileName Filel.Pattern= "*.jPg" 步骤2:按要求将文件保存至考生文件夹中。 (2)步骤1:打开考生文件夹中的本题工程文件sjt4.vbp,在代码编辑窗口中,去掉程序中的注释符“*”,将问号“?”改为正确的内容。参考代码: Text1.SelStart=pos-1 Text1.SelLength=Len(fstr) times=times+1 pos=InStr(pos,ostr,fstr) 步骤2:按要求将文件保存至考生文件夹中。
解析
(1)本题主要考察文件列表框的属性和事件响应。文件列表框的Path属性用来设置或返回其当前的目录(缺省值是当前路径);文件列表框的FileName属性可返回所选文件的文件名;Pattern属性设置要显示的文件类型,默认表示所有文件;ListCount属性返回文件列表框中匹配Pattern属性设置的文件个数;ListIndex返回控件中当前项目的索引号,取值范围是0~ListCount-1。
第一个“?”处是的If判断文件列表框当前的ListIndex是不是最后一个或者文件列表框里面没有文件,即ListIndex的值为-1;第二个“?”处是在命令按钮的事件代码里面把图片向后移动一个,然后调用ShowInfor来显示图片,因此第二个“?”处是将ListIndex加1;第三个“?”处是显示图片的路径和名称,图片的名称可通过列表框的FileName属性得到;最后一个“?”是设置文件列表框的属性,包括Path和Pattern属性,因为题目要求文件列表框显示扩展名为jpg的文件。
(2)题目要求在一个字符串里面查找另外一个字符串,由于字符串可能出现多次,因此需要使用循环来遍历。字符串查找使用InStr函数,该函数指定一字符串在另一字符串中最先出现的位置,如果没有找到返回0。因此在循环中,用一个变量保存InStr的返回值,只要InStr返回值不为0,就可以继续往后查找。第一个和第二个“?”处是设置找到的字符反相显示,即把找到的字符串设置为选中状态,通过设置SleStart和SelLength两个属性。第三个“?”处是统计找到的次数变量times加1,根据“Text2.Text=times”可知times是统计变量;最后一个“?”处如果If成立则需要再次查找,因为下次进入循环的时候直接设置选中状态,说明在下次进入循环前已经找到了。
转载请注明原文地址:https://kaotiyun.com/show/JjGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在VisualBasic中按文件的访问方式不同,可以将文件分为顺序文件,随机文件和【】。
事件驱动是一种适用于______的编程方式。
单击一次命令按钮后,下列程序的执行结果为 PrivateSubCommand1_Click() DimmAsInteger,IAsInteger,x(10)AsInteger ForI=0To4:x(I)=I+1
一个工程中含有窗体Form1、Form2和标准模块Model1,如果在Fomil中有语句PublicXAsInteger,在Model1中有语句PublicYAsInteger.则以下叙述中正确的是
CommonDialog控件可以显示______种对话框。
为了清除列表框中的所有内容,应使用的方法是______。
下列代码运行后输出结果是DefstrB-EPrivateSubCommand1_Click()B$="123"C="456"PrintB+C$EndSub
如果存在如下过程:PrivateFunctionFun(a()AsInteger)DimFirstAsInteger,LastAsInteger,iAsInteger First=LBound(a) La
使用驱动器列表框的______属性可以返回或设置驱动器列表中当前选中的磁盘驱动器的索引值。
决定一个窗体有无控制菜单的属性是______。
随机试题
提取挥发油最常用的超临界流体是
男性。60岁。近日出现上腹不适,疼痛,进食后加重,消瘦、贫血。应高度警惕的是
“生气之源”的脏指的是()。
下列贷款中,不属于房地产开发贷款的是()。
关于事业单位无形资产的处置,下列会计处理中,错误的是()。
关于广播广告中的间隙的描述正确的是()。
Themeasureofaman’srealcharacteriswhathewoulddoifheknewhewouldneverbefoundout.—ThomasMacaulaySomethir
公文中应使用法定计量单位,还要保持计量单位的()性。
【宋学】中国人民大学2005年中国通史真题;陕西师范大学2016年中国史真题
阅读下列说明和图,回答以下问题,将解答填入答题纸的对应栏内。【说明】某电子商务系统采用以数据库为中心的集成方式改进购物车的功能,详细需求如下:1.加入购物车。顾客浏览商品,点击加入购物车,根据商品标识从商品表中读取商品信息,并
最新回复
(
0
)