首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)考生文件夹中有工程文件sjt3.vbp。窗体上已有部分控件。在窗体上画一个名称为Text1的文本框,设置相应属性,使得该文本框能够显示多行文本,且有垂直滚动条,如图3—26所示。运行程序时,将在文本框Text1中显示一段英文短文。 要求:向文本框Te
(1)考生文件夹中有工程文件sjt3.vbp。窗体上已有部分控件。在窗体上画一个名称为Text1的文本框,设置相应属性,使得该文本框能够显示多行文本,且有垂直滚动条,如图3—26所示。运行程序时,将在文本框Text1中显示一段英文短文。 要求:向文本框Te
admin
2017-03-26
27
问题
(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://jikaoti.com/ti/Wqy0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
为了使标签能自动调整大小以显示全部文本内容,应把标签的【】属性设置为True。
已知变量boo1Var是一个布尔型的变量,如果要给其赋值为True,则正确的赋值语句就是______。
要使标签的背景样式为不透明,应将BackStyle属性设置为【】。
在下列概念中,不属于面向对象方法的是______。
数据流的类型有【】和事务型。
声明一个变量为局部变量应该用()。
顺序存储方法是把逻辑上相邻的结点存储在物理位置【】的存储单元中。
下列叙述中,不属于软件需求规格说明书的作用的是
对n个记录的序列进行快速排序,所需的辅助存储空间为()。
随机试题
每一个进程在执行过程中的任一时刻,可以处于()个状态。
证见带下量多,色黄粘稠,有臭气。应选证见带下量多,色白质稀,淋漓不断,小便频数。应选
稽留热最常见于
某中外合资经营企业合营合同中约定了经营期限于2009年9月1日届满,如果合营各方同意延长合营期限的,根据《中外合资经营企业法》的规定,合营各方应当在()前向审批机关提出申请。
设立于某经济特区的中外合资甲化妆品有限公司为增值税一般纳税人,2006年初开业,2006年至2007年适用的企业所得税法定税率为15%。2011年度为减半征税第二年,当年相关生产经营资料如下:(1)甲公司坐落在某市区,全年实际占用土地面积共计10万
Y公司为2001年1月1日设立的股份有限公司,执行《企业会计制度》,年报于次年的4月对外公布,2001~2003年度发生的相关交易和事项及会计处理如下:(1)2001年,Y公司认为应付账款——K公司80万元无法支付,将其计入了当年的营业外收入,该处
竞争:淘汰
甲在营业厅自助机交话费,不小心把手机号输错,把200元话费充值给了乙。下列说法错误的是:
祛律关系是一种思想关系。()
It’shotnowinAfghanistan,where35%ofthepopulationisunder-fed.Butsoonitwillbecold,andmanyofthecountry’sroads
最新回复
(
0
)