首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp,在窗体上给出了所有控件和不完整的程序,请去掉程序中的注释符,把程序中的“?”改为正确的内容。本程序的功能是:如果单击“取数”按钮,则把考生目录下的in5.txt文件中的15个姓名读到数组a中,并在窗体上显示这些
在考生文件夹下有一个工程文件sjt5.vbp,在窗体上给出了所有控件和不完整的程序,请去掉程序中的注释符,把程序中的“?”改为正确的内容。本程序的功能是:如果单击“取数”按钮,则把考生目录下的in5.txt文件中的15个姓名读到数组a中,并在窗体上显示这些
admin
2017-09-22
34
问题
在考生文件夹下有一个工程文件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全国计算机二级
相关试题推荐
关系R和S进行自然连接时,要求R和S含有一个或多个公共______。
在VisualBasic中按文件的访问方式不同,可以将文件分为顺序文件,随机文件和【】。
下列程序运行后的输出结果是【】。PrivateSubf(k,s)s=1Forj=1Toks=s*jNextEndSubPrivateSubCommand1_Click()Sum=0Fori=1
阅读下列程序: PrivateSubCommand1_Click() DimiAsInteger,kAsInteger k=2 Fori=1To3 PrintH(k); Nexti EndSub Fu
在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框,然后编写如下程序:PrivateSubCommand1_Click()Dimx,y,zAsIntegerx=5y=7
为了清除列表框中的所有内容,应使用的方法是______。
以下程序代码用来实现如下功能:单击命令按钮弹出对话框,在其中输入正数后单击确定,弹出一个提示信息显示刚才输入的正数,否则提示"error"。请填空。PrivateSubCommand1_Click()DimaAsInteger,bAsSt
如果存在如下过程:PrivateFunctionFun(a()AsInteger)DimFirstAsInteger,LastAsInteger,iAsInteger First=LBound(a) La
如果准备读文件,打开顺序文件“text.dat”的正确语句是
在窗体上画一个命令按钮Command1,然后编写如下程序:PrivateSubCommand1_Click()Dimarr()AsIntegerReDimarr(3)Fori=0To3al
随机试题
帝场信息有哪两个主要来源?
心理评估常用方法不包括
下列对离婚案件的诉讼管辖的表述中正确的有哪些?()
《安全生产法》规定,负有安全生产监督管理职责的部门依法对生产经营单位的安全生产情况进行监督检查时,可以行使的职权有()。
下列关于我国期货交易的说法,正确的是()。
一般资料:求助者,男性,38岁,私营企业总经理。案例介绍:求助者有一天到儿子的学校开家长会,遭老师当众批评,心烦、燥热,突然觉得透不过气来。胸闷、心慌,非常难受,认为自己得了心脏病,因此非常紧张、害怕,手脚发麻,浑身颤抖。求助者迅速离开学校,乘出
Internet中不同网络和不同计算机相互通信的基础是
【B1】【B5】
AnumberofbookslikeReadingFacesandBodyLanguagehave【C1】______theindividual’stendencytobroadcastthingsthroughallm
Ingeneral,oursocietyisbecomingoneofgiantenterprisesdirectedbyabureaucraticmanagementinwhichmanbecomesasmall,
最新回复
(
0
)