首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp,在窗体上给出了所有控件和不完整的程序,请去掉程序中的注释符,把程序中的“?”改为正确的内容。本程序的功能是:如果单击“取数”按钮,则把考生目录下的in5.txt文件中的15个姓名读到数组a中,并在窗体上显示这些
在考生文件夹下有一个工程文件sjt5.vbp,在窗体上给出了所有控件和不完整的程序,请去掉程序中的注释符,把程序中的“?”改为正确的内容。本程序的功能是:如果单击“取数”按钮,则把考生目录下的in5.txt文件中的15个姓名读到数组a中,并在窗体上显示这些
admin
2017-09-22
59
问题
在考生文件夹下有一个工程文件sjt5.vbp,在窗体上给出了所有控件和不完整的程序,请去掉程序中的注释符,把程序中的“?”改为正确的内容。本程序的功能是:如果单击“取数”按钮,则把考生目录下的in5.txt文件中的15个姓名读到数组a中,并在窗体上显示这些姓名;当在Text1中输入一个姓名,或一个姓氏后,如果单击“查找”按钮,则进行查找,若找到,就把所有与Text1中相同的姓名或所有具有Text1中姓氏的姓名显示在Text2中(如图3.101所示);若未找到,则在Text2中显示“未找到!";若Text1中没有查找内容,则在Text2中显示“未输入查找内容!"。
注意:考生不得修改程序的其他部分和控件的属性,最后把修改后的文件按原文件名存盘。
选项
答案
步骤1:打开考生文件夹中的本题工程文件sjt5.vbp,打开代码编辑窗口,去掉程序中的注释符“’”,将问号“?”改为正确的内容。参考代码: Close #1 n=Len(Text1.Text) If Left(a(k),n)=Text1.Text Then c=c+" "+a(k) Text2.Text=c 步骤2:按要求将文件保存至考生文件夹中。
解析
由本题程序源代码及要求可知,在程序运行时,首先单击“取数”按钮,使用Open语句打开考生目录下的in5.txt文件,然后利用For循环结合Input语句将15个姓名读到数组a中,并在窗体上显示这些姓名,循环结束后使用Close语句关闭打开的文件。
在“查找”按钮的单击事件中,首先判断Text1中文本的长度,如果长度大于0则意味着文本框中有输入,此时利用一个循环依次比较数组中每个元素的开头字符是否等于Text1中的内容。若相等则意味着是要找的结果,将其连接到变量c上,直到循环完毕判断变量c是否为空字符串,若不为空则显示在Text2中。
转载请注明原文地址:https://kaotiyun.com/show/xjGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
对长度为N的线性表进行顺序查找,在最坏情况下所需要的比较次数为______。
一个工程中含有窗体Form1、Form2和标准模块Model1,如果在Fomil中有语句PublicXAsInteger,在Model1中有语句PublicYAsInteger.则以下叙述中正确的是
在下图中,要在窗体的标签Label1上显示“二级VB等级考试”字样,标签属性应设置为______。
下列语句的输出结果是【】。PrintFormat(Int(12345.6789*100+0.5)/100,"0000,0.00")
若有一个动态数组a有两个元素a(0)和a(1),现要令数组a有三个元素a(0)、a(1)和a(2),则应当使用【】语句。
如果存在如下过程:PrivateFunctionFun(a()AsInteger)DimFirstAsInteger,LastAsInteger,iAsInteger First=LBound(a) La
在窗体中添加一个命令按钮,名称为Command1,然后编写如下程序:PrivateSubCommand1_Click()DimaAsInteger,bAsString,cAsIntegera=1234:
窗体上画一个文本框(其名称为Text1)和一个标签(其名称为Label1)。要求程序运行后,如果在文本框中输入字符,则立即在标签中显示相同的内容。以下可以实现上述操作的事件过程是______。
随机试题
我国新闻单位的单一型媒体格局主要表现在两个方面:一是媒体经营的单一;另一个是【】
A.左肾右命门说B.两肾总号命门说C.“七节之旁,中有小心”说D.“命门者,目也”说
自营性个人住房贷款,是指银行运用信贷资金向在城镇或农村购买、建造或大修各类住房的个人发放的贷款。()
潘婷(PANTENE)润发精华素系列平面稿口号:爱上你的秀发(Loveyourhair)标题:一见钟情正文:只要你试一次,这种滋润的感觉,你期待已久。虽然是第一次,发质会有意想不到的改善。全新潘婷润发精华素,每次洗发后使用
下列支出中属于收益性支出的有()。
求曲线r=3cosθ,r=1+cosθ所围成的图形含于曲线r=3cosθ内部的公共部分的面积。
ByusingMP3,a600M-bytemusicCDcanbe(1)to50Mbytesorless.Itcanbestreamed(downloadedinchunks)sothatyoucanbe
以下叙述正确的是
Therearemanywaysinwhichthephenomenaoflanguageandcultureareintimatelyrelated.Allphenomenaareuniquetohumans
Thereareasgoodfishinthesea______evercameoutofit.
最新回复
(
0
)