首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)考生文件夹中有工程文件sjt3.vbp。窗体上已有部分控件。在窗体上画一个名称为Text1的文本框,设置相应属性,使得该文本框能够显示多行文本,且有垂直滚动条,如图3—26所示。运行程序时,将在文本框Text1中显示一段英文短文。 要求:向文本框Te
(1)考生文件夹中有工程文件sjt3.vbp。窗体上已有部分控件。在窗体上画一个名称为Text1的文本框,设置相应属性,使得该文本框能够显示多行文本,且有垂直滚动条,如图3—26所示。运行程序时,将在文本框Text1中显示一段英文短文。 要求:向文本框Te
admin
2017-03-26
71
问题
(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=1To Len(str1) MsgBox str2&"的起始位置是:"&i If i>Len(str1)Then MsgBox"没有找至4!" ’或If i>Len(Text1.Text) 步骤3:按要求将文件保存至考生文件夹中。 第2小题 步骤1:打开考生文件夹中的本题工程文件sjc4.vbp,在代码编辑窗口中,去掉程序中的注释符“’”,将问号“?”改为正确的内容。 参考代码: If showPic.Caption="显示图片"Then Picture1.Picture=LoadPicture(" ") Picture1.Visible=False Open App.Path&"\data4.dat"For Input As#1 Text1.Text=s 步骤2:按要求将文件保存至考生文件夹中。
解析
第1小题:题目要求实现字符串的查找,分析代码可知,变量str1和str2分别保存Text1和Text2文本框的内容,“If Mid(str1,i,n)=RTrim(str2)Then”是比较str1里面的i位置开始的n个字符是否和str2一样,凶此循环搜索是在str1里面搜索str2。第一个“?”处是计算n的值,从If判断语句里面可知n的值应和str2的长度一样;第二个“?”处是补充循环的结束条件,通过循环不断从str1往后找str2,因此循环结束条件是str1的长度;第三个“?”是显示找到str2字符串的位置i;第四个“?”处是判断没有找到字符串str2弹出提示对话框,如果循环结束都没有找到str2,此时循环变量i会大于str1的长度。
第2小题:题目要求点击不同的菜单项的时候对控件的属性进行设置。第一个“?”处是判断showPic的标题是否是“显示图片”,如果是则改成“清空图片”,否则改成“显示图片”;第二个“?”处是清空图片,使用LoadPicture函数,传入空参数;第三个“?”处是隐藏图片框,即把Visible属性设置为False;第四个“?”处是补充打丌方式,从data4.dat读取文件,显示是以Input方式打开;最后一个“?”处是把从文件读出的内容s显示在文本框上。
转载请注明原文地址:https://kaotiyun.com/show/j1Gp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
为了使标签能自动调整大小以显示全部文本内容,应把标签的【】属性设置为True。
在窗体上画一个名称为Command1的命令按钮,编写如下事件过程PrivateSubCommand1_Click()DimaAsStringa=【】Fori=1
有如下函数过程:Functiongys(ByValxAsInteger,ByValyAsInteger)AsIntegerDoWhiley0preminder=x/yx=yy=preminderLoopgys=xE
要使文件列表框中的文件随目录列表框中所选择的当前目录的不同而发生变化,应该
关于MDI窗体,下列说法正确的是()。
下列程序段的执行结果为a=6Fork=1To0a=a+kNextPrintk;a
下列叙述中,不正确的是
一棵二叉树第六层(根结点为第一层)的结点数最多【】个。
在先左后右的原则下,根据访问根结点的次序,二叉树的遍历可以分为三种:前序遍历、【】遍历和后序遍历。
为了使用窗体输出,使Print方法在Form_Load事件中起作用,必须设置窗体的()属性。
随机试题
A.K-K反应B.Ravmond反应C.Hcl-Mg粉反应D.Liebermann-Burchard反应E.Gibb反应鉴别α-去氧糖的反应是
A、四逆汤B、当归四逆汤C、回阳救急汤D、右归丸E、大建中汤手足厥寒,舌淡苔白,脉沉细者,治疗应选用
下列除哪项外,均与脂瘤无关()
A山茱萸B桑螵蛸C莲子肉D诃子E金樱子具有补脾止泻,养心安神功效的药物是()
证券公司可以在客户资产管理业务范围内为客户办理()。Ⅰ.定向资产管理业务Ⅱ.特定目的的专项资产管理业务Ⅲ.集合资产管理业务Ⅳ.其他资产管理业务
资本公积经批准后可用于派发现金股利。()
爱尔兰有大片泥煤蕴藏量丰富的湿地。环境保护主义者一直反对在湿地区域采煤。他们的理由是开采泥煤会破坏爱尔兰湿地的生态平衡,其直接严重后果是会污染水源。然而,这一理由是站不住脚的。据近50年的相关统计,从未发现过因采煤而污染水源的报告。以下哪项,如果
右图是一个长方形花坛,阴影部分是草地,空地是四块同样的菱形,求草地与空地的面积之比。()
增加复合嵌体的固位措施有()。
某公司某个部门的人员都参加了MBA考试,关于他们的考试结果有如下判断:(1)此部门不可能有人没通过。(2)此部门的小芳以高分通过。(3)此部门有的人没通过。(4)并非此部门所有人都没有通过。假设上述断定只有两个是对的
最新回复
(
0
)