首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)考生文件夹中有工程文件sjt3.vbp。窗体上已有部分控件。在窗体上画一个名称为Text1的文本框,设置相应属性,使得该文本框能够显示多行文本,且有垂直滚动条,如图3-26所示。运行程序时,将在文本框Text1中显示一段英文短文。 要求:向文
(1)考生文件夹中有工程文件sjt3.vbp。窗体上已有部分控件。在窗体上画一个名称为Text1的文本框,设置相应属性,使得该文本框能够显示多行文本,且有垂直滚动条,如图3-26所示。运行程序时,将在文本框Text1中显示一段英文短文。 要求:向文
admin
2017-09-22
43
问题
(1)考生文件夹中有工程文件sjt3.vbp。窗体上已有部分控件。在窗体上画一个名称为Text1的文本框,设置相应属性,使得该文本框能够显示多行文本,且有垂直滚动条,如图3-26所示。运行程序时,将在文本框Text1中显示一段英文短文。
要求:向文本框Text2中输入一个字符串(例如enjoy),然后单击“查找”命令按钮,则判断输入的字符串是否存在于Text1显示的文本中。如果存在,则显示它在Text1中首次出现的位置(Text1中第1个字符的位置为1);否则用消息框显示“没有找到!”。
注意:按照题目要求在窗体上添加控件,并设置有关属性。去掉程序中的注释符,把程序中的“?”改为正确的内容。考生不得修改窗体文件中已经存在的程序。最后把修改后的文件按原文件名存盘。
(2)在考生目录下有一个工程文件sjt4.vbp。窗体上已有文本框Text1和图片框Picture1(两者位置重叠),并建立了菜单。要求单击“显示图片”菜单项时,隐藏文本框,在图片框中显示图片Pic4.bmp,同时将该菜单标题改为“清除图片”;单击“清除图片”菜单项时,清除图片框中的图片,同时将菜单标题改为“显示图片”;单击“显示文本”菜单项,则隐藏图片框,并将指定文件的内容显示在文本框中。在给出的窗体文件中已经有了全部控件,但程序不完整。
要求:去掉程序中的注释符,把程序中的“?”改为正确的内容。最后把修改后的文件按原文件名存盘。
选项
答案
(1)步骤1:打开考生文件夹中的本题工程文件sjt3.vbp,在窗体中加入一个文本框。按步骤2:在代码编辑窗口中,去掉程序中的注释符“’”,将问号“?”改为正确的内容。参考代码: 表4.17设置其相关属性。 [*] 步骤2:在代码编辑窗口中,去掉程序中的注释符“’”,将问号“?”改为正确的内容。参考代码: n=Len(str2) ’或n=Len(Text2.Text) For i=1 To Len(strl) MsgBox str2 &"的起始位置是:"&,i If i>Len(strl)Then MsgBox”没有找到!” ’或If i>Len(Text1.Text) 步骤3:按要求将文件保存至考生文件夹中。 (2)步骤1:打开考生文件夹中的本题工程文件sjt4.vbp,在代码编辑窗口中,去掉程序中的注释符“’”,将问号“?”改为正确的内容。参考代码: If showPic.caption="显示图片"Then Picture1.Picture=LoadPieture("") Picture1.Visible=False Open App.Path &"\data4.dat"For Input As#1 Text1.Text=s 步骤2:按要求将文件保存至考生文件夹中。
解析
(1)题目要求实现字符串的查找,分析代码可知,变量strl和str2分别保存Text1和Text2文本框的内容,“If Mid(strl,i,n)=RTrim(str2)Then”是比较strl里面的i位置开始的n个字符是否和str2一样,因此循环搜索是在strl里面搜索str2。第一个“?”处是计算n的值,从If判断语句里面可知n的值应和str2的长度一样;第二个“?”处是补充循环的结束条件,通过循环不断从strl往后找str2,因此循环结束条件是strl的长度;第三个“?”是显示找到str2字符串的位置i;第四个“?”处是判断没有找到字符串str2弹出提示对话框,如果循环结束都没有找到str2,此时循环变量i会大于strl的长度。
(2)题目要求点击不同的菜单项的时候对控件的属性进行设置。第一个“?”处是判断showPic的标题是否是“显示图片”,如果是则改成“清空图片”,否则改成“显示图片”;第二个“?”处是清空图片,使用LoadPicture函数,传入空参数;第三个“?”处是隐藏图片框,即把Visible属性设置为False;第四个“?”处是补充打开方式,从data4.dat读取文件,显示是以Input方式打开;最后一个“?”处是把从文件读出的内容s显示在文本框上。
转载请注明原文地址:https://kaotiyun.com/show/ckGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
如果在立即窗口中执行以下操作(<CR>是回车键):a=8<CR>b=9<CR>printa>b<CD>则输出结果是_________。
在一个顺序存储的循环队列中,队头指针指向队头元素的______。
要获取当前驱动器,应使用驱动器列表框的()属性。
在窗体上有一个文本框控件,名称为TextTime;一个计时器控件,名称为Timed。要求每一秒在文本框中显示一次当前的时间。程序为:PrivateSubTimerl_______TextTime.text=TimeEndSu
下面的程序执行时,将把当前目录下的顺序文件smtext1.txt的内容读入内存,并在文本框Text1中显示出来。请填空。PrivateSubCommandl_Click()DiminDataAsString
单击一次命令按钮后,下列程序的执行结果为 PrivateSubCommand1_Click() DimmAsInteger,IAsInteger,x(10)AsInteger ForI=0To4:x(I)=I+1
在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框,然后编写如下程序:PrivateSubCommand1_Click()Dimx,y,zAsIntegerx=5y=7
下列代码运行后输出结果是DefstrB-EPrivateSubCommand1_Click()B$="123"C="456"PrintB+C$EndSub
为命令按钮的Picture属性装入了一个图片,但却发现图片没有显示出来,要使图片显示出来,应设置它的【】属性。
在关系代数运算中,有5种基本运算,它们是()。
随机试题
预防医学是研究外界环境因素与
实现政策目标和有效性的基础是
急性阑尾炎早期腹痛尚未转移至右下腹时,具有诊断意义的体征是
不能产生避孕效果的是
A.禁忌证B.新药信息C.药品不良反应D.药物相互作用E.合理用药信息告知“人促红细胞生成素可引起纯红细胞再生障碍性贫血”属于()。
某城市隧道工程项目,采用喷锚暗挖法施工,该工程施工项目部针对工程的特点,在施工组织设计的每一个环节抓住其关键,做出了最恰当的安排,并选择了合理有效的措施。在施工过程中,喷锚暗挖加固支护的方法采用小导管注浆措施,小导管注浆采用石灰砂浆,并充满钢管及周围空隙,
在万能寿险中,保单持有人在缴纳了一定量的首期保险费后,可以按照自己的意愿选择任何时候缴纳任何数量的保险费。那么,保单持有人享有这种权利的前提条件是()。
下列可以成为个人独资企业投资人的是()。
导游人员是指依照《导游人员管理条例》的规定取得导游证,接受旅行社委派,为旅游者提供向导及相关旅游服务的。()
检索有职工的工资大于或等于“WH1”仓库中所有职工“工资”的仓库号,正确的命令是( )。检索至少有一名职工信息的“仓库号”及仓库的“所在地”和“人数”,正确的SQL命令是( )。
最新回复
(
0
)