首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)考生文件夹中有工程文件sjt3.vbp。窗体上已有部分控件。在窗体上画一个名称为Text1的文本框,设置相应属性,使得该文本框能够显示多行文本,且有垂直滚动条,如图3—26所示。运行程序时,将在文本框Text1中显示一段英文短文。 要求:向文本框Te
(1)考生文件夹中有工程文件sjt3.vbp。窗体上已有部分控件。在窗体上画一个名称为Text1的文本框,设置相应属性,使得该文本框能够显示多行文本,且有垂直滚动条,如图3—26所示。运行程序时,将在文本框Text1中显示一段英文短文。 要求:向文本框Te
admin
2017-03-26
72
问题
(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全国计算机二级
相关试题推荐
已知变量boo1Var是一个布尔型的变量,如果要给其赋值为True,则正确的赋值语句就是______。
在窗体上画一个文本框,一个命令按钮和一个标签,其名称分别为Text1、Command1和Label1,文本框的Text1属性设置为空白,然后编写如下事件过程:PrivateSubCommand1_Click()x=Int(Val
为了防止用户随意将光标置于控件上,应将控件的______属性设置为False。
在窗体中添加一个通用对话框Commondialog1和一个命令按钮Command1,当单击按钮时,打开颜色对话框,能实现此功能的程序段是
在窗体上画一个通用对话框,其名称为CommonDialog1,然后画一个命令按钮,并编写如下事件过程:PrivateSubCommand1_Click()CommonDialogFlags=cdlOFNHideReadOntyC
数据流的类型有【】和事务型。
假定有以下循环结构DoUntil条件表达式循环体Loop则以下正确的描述是
下列叙述中,不属于软件需求规格说明书的作用的是
如果进栈序列为e1,e2,e3,e4,则可能的出栈序列是______。
随机试题
suprasegmentalfeatures
新年来临,公司宣传部需要为销售部门设计并制作一份新年贺卡以及包含邮寄地址的标签,由销售部门分送给相关客户。按照下列要求完成贺卡以及标签的设计和制作。参考下图1中所示标签样例,为每位已拥有贺卡的客户制作一份贴在信封上用于邮寄的标签,要求如下:
简述工伤保险制度的作用。
可以导致血胆固醇增高的药品是()。
A.药品生产企业B.药品批发企业C.药品零售企业D.药品使用机构E.药品研发组织()经营处方药、甲类非处方药应当配备执业药师或者其他依法经过资格认定的药学技术人员,负责审核处方、调配和提供用药指导。
患儿,女,8岁。因咳嗽咳痰高热三天就诊。X线胸片示右肺片状阴影。诊断为肺炎住院治疗,低热,正确的出院指导是
下列属于税收法律的有()。
本题涉及增值税、消费税、城建税、教育费附加及地方教育附加。位于城市市区的一家电视机生产企业(以下简称甲企业)和一家百货商场(以下简称乙商场)均为增值税一般纳税人。2020年2月份发生以下业务:(1)甲企业销售给乙商场一批电视机,不含税销售额为70万元,
操作系统作为系统软件,位于软件系统的哪一个层面?()
在VisualFoxPro中,关于过程调用的叙述正确的是( )。
最新回复
(
0
)